Discussion :

[Mut]

Voila tout est dans le titre je souhaiterais pouvoir
gérer l'erreur des doublons au moment de l'update d'un recordset.

Voici mon code :

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
 
Set Plage = Workbooks(ClRecap).Worksheets(Fexportation).Range("A2:" & Range("A2").End(xlDown).Address)
For Each Cellule In Plage
 
        With rsT
            .AddNew
            .Fields("N°Equipt").Value = Cellule.Value
            .Fields("Des_PT").Value = Cellule.Offset(columnoffset:=1)
            .Fields("Criticite").Value = Cellule.Offset(columnoffset:=2)
            .Fields("Soumission").Value = Cellule.Offset(columnoffset:=3)
            .Update
        End With
 
Next
 
    rsT.Close
    Set rsT = Nothing
    Conn.Close
    Set Conn = Nothing

Voila en fait je voudrais que l'erreur soit transparente c'est à dire que s'il l'enregistrement est dejà
dans la base,qu'il passe au suivant (et qu'il me l'indique si possible)

Je ne vois pas comment faire....

[SfJ5Rpw8]

tu as essayé la gestion d'erreur :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
(...)
 On Error Resume Next
     .Update
    if Err.numBer > 0 then
        MsgBox Err.Number & " " & Err.Description
        Err.clear
    end if
   End With
(...)

[random]

regarde dans l'aide à commit trans
rollback etc

[Mut]

la solution de bbil fonctionne très bien !!

Merci beaucoup !