Bonjour,

j'ai une problème lorsque je veux ouvrir un excel à partir d'un macro, mon script est le suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
ChDir "D:\MonDossier\" 'Specifier le dossier ici
        monfichier = Application.GetOpenFilename("Fichiers Excel (*.xl*), *.xl*")
If monfichier <> False Then
        Workbooks.Open Filename:=monfichier
Else
Exit Sub
End If
ouverture de la boite de dialogue se passe bien, mais lorsque j'arrive sur le IF, j'ai le message suivant :

'erreur d'execution 13
incompatibilité de type'

merci pour votre aide.