Discussion :

[rcarlyp]

J'ai reecris mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Commande1_Click()
    Dim sql As String
    Dim cheminExterne As String
  ' Chemin d'accès vers la base de données externe
    cheminExterne = "C:\Users\Admin\OneDrive\Documents\MEGA\ser\Main\MainServ.mdb"
 sql = "UPDATE [REGISTRE CLIENT] IN '" & cheminExterne & "' " & _
 "SET [CLIENT] = '" & Me.CLIENT.Value & "', [sexe] = '" & Me.SEXE.Value & "' WHERE [# DOSSIER AUTOMATIQUE] = '" & Me.NOCOMPTECREDIT & "';"
Set db = CurrentDb
Debug.Print sql
db.Execute sql, dbFailOnError
 DoCmd.OpenForm "21sept26EnrgModifINFOSDEMOPATIENT"
End Sub

VOICI LE MESSAGE D'erreur que je recois

[tee_grandbois]

bonsoir,
le libellé de l'erreur est sans équivoque: tu ne peux pas utiliser cette façon d'accéder à la table distante si elle contient un champ multivalué (champ pouvant contenir plusieurs valeurs) même si ce champ n'est pas concerné par la mise à jour.
On t'a proposé depuis le début et plusieurs fois d'attacher la table plutôt que d'utiliser IN, voici une raison supplémentaire de le faire