Erreur 424
Daniel
-
Kuartz Messages postés 852 Date d'inscription Statut Membre Dernière intervention -
Kuartz Messages postés 852 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je cherche à récupérer le path de ma base de donnée avec ce bout de code:
Sub GetPath()
Dim FName As Variant
FName = Application.GetOpenFilename(filefilter:="Access Files,*.acc*")
Sheet1.Range("I3").Value = FName
End Sub
mais une erreur 424 apparaît toujours et je ne comprends pas pourquoi
je cherche à récupérer le path de ma base de donnée avec ce bout de code:
Sub GetPath()
Dim FName As Variant
FName = Application.GetOpenFilename(filefilter:="Access Files,*.acc*")
Sheet1.Range("I3").Value = FName
End Sub
mais une erreur 424 apparaît toujours et je ne comprends pas pourquoi