[Débutant] Mettre a jour une base access depuis Word [Résolu]

[pat04]

Bonjour,

Je souhaite depuis un courrier Word, ouvrir ma base Access, y ajouter un enregistrement et mette à jour ce dernier avec des variables saisies par un utlisateur dans un courrier Word (pour info, je ne peux changer la procédure ci-dessus qui est imposée par un traitement non modifiable).

Est-ce possible et si oui comment faire ?

Je n'ai pas trouvé la réponse dans les FAQs, mais dans la mesure où je viens juste de découvrir ce site, peut-être rien d'étonnant.

Merci de votre aide

[SilkyRoad]

bonsoir

tu pourrais utiliser une procedure de ce type :

Code :

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
28
29
30
31
Sub exportDonnees_Word_Vers_Access()
    'ajoute un enregistrement dans une table Access
    'necessite d'activer la reference
    'Microsoft ActiveX Data Objects x.x Library
    Dim Conn As ADODB.Connection
    Dim rsT As ADODB.Recordset
    Dim maTable As String
 
    Set Conn = New ADODB.Connection
    Set rsT = New ADODB.Recordset
 
    maTable = "Table1"
 
    With Conn
        .Provider = "Microsoft.JET.OLEDB.4.0"
        .Open "C:\MaBase_V01.mdb"
    End With
 
    With rsT
        .ActiveConnection = Conn
        .Open maTable, LockType:=adLockOptimistic
        .AddNew
        .Fields("Nom").Value = "Nom10"
        .Fields("PrixUnit").Value = 666
        .Fields("Matricule").Value = 12345
        .Update
    End With
 
    rsT.Close
    Conn.Close
End Sub

reste à comment l'utilisateur saisie les données afin d'adapter ces 3 lignes:

Code :

1
2
3
        .Fields("Nom").Value = "Nom10"
        .Fields("PrixUnit").Value = 666
        .Fields("Matricule").Value = 12345

bonne soiree
michel

[pat04]

Envoyé par SilkyRoad

bonsoir

tu pourrais utiliser une procedure de ce type :

Code :

reste à comment l'utilisateur saisie les données afin d'adapter ces 3 lignes:

Code :

bonne soiree
michel

bonjour,

je te remercie pour le code communiqué, j'ai mis en pratique, ça marche nickel et en plus c'est totalement transparent pour les utilisateurs.

Merci encore

Patrick