Salut,

J'ai trouve une solution, je ne sais pas si c tres propre sachant que je ne suis pas programmeur de formation :

Dim Connection As Connection
Dim wrkODBC As Workspace
Set wrkODBC = CreateWorkspace("Name", "User", "Password", dbUseODBC)

Set Connection = wrkODBC.OpenConnection("ODBC;DATABASE=name;UID=User;PWD=Password;DSN=Test Connection")
Set rs2 = Connection.OpenRecordset("UPDATE F_DOCENTETE SET DO_COORD04 = '" & Left(TxtRecepisse.Value, 8) & "' WHERE DO_TYPE = 3 and DO_PIECE = '" & Left(TxtBLencours.Value, 8) & "'", dbOpenDynaset)
Do While rs2.StillExecuting
Debug.Print " [en cours d'exécution...]"
Loop

Connection.Close


Meme avec la piece ouverte dans SAGE, je n'ai pas de conflit. Il ne s'agit que d'une ecriture dans des champs libres.

Je teste et reteste mais ca fonctionne pour l'instant.

Amicalement,

Patrick