XL 2013 Erreur dans macro... help

[Kaizers]

Bonjour à tous,

J'ai fait une macro il y a 4 semaines, elle fonctionnait, aujourd'hui plus du tout...

Sub CREATION_BACKUP_CASSE()

Dim M4, M19, M18 As String

M4 = Sheets("MACRO").Range("M37").Value
M19 = Sheets("MACRO").Range("M52").Value
M18 = Sheets("MACRO").Range("M51").Value

If ExisteFichier(M19) Then MsgBox "/!\ ATTENTION /!\" & vbNewLine & vbNewLine & M18 & vbNewLine & vbNewLine & " LE BACKUP EXISTE DEJA !!!": Exit Sub
    FileCopy M4, M19

   
End Sub

Et j'ai toujours ce message d'erreur... je ne sais pas pourquoi...





Merci pour votre aide

 

[Dranreb]

Bonjour.
Vous déclarez M19 As Variant (assumé puisque non précisé) et le paramètre de votre Function ExisteFicher est probablement passé ByRef (assumé puisque probablement non précisé ByVal) As String (probablement. C'est caché dans l'image par la boîte du message d'erreur)

 

[Kaizers]

Ah...

Je pensais que le fais de faire Dim x, y As String, que le "As String" s'applique au deux, aussi bien au x qu'au y.
Donc effectivement c'était bien ça, merci à toi, pour le coup ça fait 2 mois que je fais des macros bancales...

Merci pour ton aide