IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Connecter une bdd sql à des userform excel, faire des mises à jours dans ces userform


Sujet :

Macros et VBA Excel

  1. #1
    Membre habitué
    Inscrit en
    mai 2003
    Messages
    361
    Détails du profil
    Informations forums :
    Inscription : mai 2003
    Messages : 361
    Points : 146
    Points
    146
    Par défaut Connecter une bdd sql à des userform excel, faire des mises à jours dans ces userform
    bonjour,
    j'avoue que je suis un peu perdue avec excell!!
    j'ai besoin de votre aide pour:
    1/connecter ma base sql server à des userforms dans excel.
    2/-afficher le contenu de ma base via un datagrid (par exemple) dans un userform et parcourir mes données
    3/ faire des insertions et des mises à jours dans le userform et voir les mises à jours toujours dans un userform.
    merci de votre aide, car je piétine depuis 2 semaines.

  2. #2
    Membre habitué
    Inscrit en
    mai 2003
    Messages
    361
    Détails du profil
    Informations forums :
    Inscription : mai 2003
    Messages : 361
    Points : 146
    Points
    146
    Par défaut
    voici la connection à ma base, je ne sais pas si elle bonne:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    'Déclaration des variables globales
     
    Public ConBdd As New ADODB.Connection
    Public RsBdd As New ADODB.Recordset
    Public CmdBdd As New ADODB.Command
    Public Const ChCon = "BaseIncidents"
    'Verifier si la connexion est ouverte et l'etablit
    Public Sub OuvBase()
        If ConBdd.State = adstatedclosed Then
            With ConBdd
            .ConnectionString = ChCon
            .Open ChCon
            End With
        End If
    End Sub
     
    Public Sub CmdBase()
    CmdBdd.ActiveConnection = ConBdd
    End Sub
     
    'verifie et ferme la connexion si elle est ouverte
    Public Sub FermBase()
        If ConBdd.State = adStateOpen Then
            ConBdd.Close
            Set ConBdd = Nothing
        End If
    End Sub

Discussions similaires

  1. Connecter une bdd Sql Server et Delphi
    Par tleboukaka dans le forum Bases de données
    Réponses: 9
    Dernier message: 08/04/2009, 13h45
  2. Faire appel à une BDD sql server 2005 express
    Par mrjay42 dans le forum Services Web
    Réponses: 2
    Dernier message: 04/02/2007, 16h53
  3. Afficher la liste des connectés à une BDD
    Par GD91 dans le forum Access
    Réponses: 4
    Dernier message: 04/10/2006, 15h55
  4. [Excel] Faire des liens internes à une feuille
    Par Invité dans le forum Excel
    Réponses: 1
    Dernier message: 25/08/2005, 13h04
  5. manipuler une bdd sql server en MFC ou excel ?
    Par roninou dans le forum Décisions SGBD
    Réponses: 3
    Dernier message: 18/10/2004, 12h51

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo