Bonjour
Regarde ce code mis là pour l'exemple
Private Sub FSN_Renamed(ByVal PathIndex As Integer, ByVal Path As String, ByVal FileName As String, ByVal NewFileName As String)
NewOp "3", PathIndex, Path, FileName, NewFileName ' on appelle la Sub NewOp ( 4 paramètres )
End Sub
' déclaration de la Sub NewOp avec 3 paramètres
Private Sub NewOp(ByVal TypeOp As String, ByVal PathIndex As Integer, ByVal Path As String)
Dossier = Mid(Path, Len(TabSynchro(PathIndex + 1, 1)) + 1)
a = TabSynchro(PathIndex + 1, 2) & Dossier
If NewFileName <> "" Then
a = a & NewFileName
Else
' etc ........
End sub
A la ligne 3 on appelle la Sub NewOp avec 4 paramètres
A la ligne 7 la déclaration de la Sub NewOp n'a que 3 paramètres
Ce qui peut se passer aussi c'est que le nombre de paramètres peuvent être les mêmes mais que leurs types ne soient pas identiques : à l'appel par exemple le premier paramètre est une String et dans la déclaration le premier paramètre est un Integer
C'est une de ces 2 erreurs que tu dois avoir à mon avis