Erreur 91 sur workbooks.open [Résolu]

Signaler
Messages postés
6
Date d'inscription
lundi 2 septembre 2019
Statut
Membre
Dernière intervention
2 février 2020
-
Messages postés
38534
Date d'inscription
mercredi 11 avril 2007
Statut
Modérateur
Dernière intervention
5 juillet 2020
-
Bonjour,
Je veux ouvrir un fichier mais j'ai une erreur 91 sur la ligne en gras (workbooks.open)

Quelqu'un saurait il d'où vient l'erreur?

Merci d'avance

Sub recherche()
Dim fichier As String
Dim chemin As String
Dim GEPAMA As Workbook
chemin = "Y:\compta\9. STOCKS - MACHINES\MACHINES\Machines " & Year(Date) & "\"
fichier = "GESTION PARC MACHINES " & Year(Date) & ".xlsm"
<bold>GEPAMA = Workbooks.Open(chemin & fichier, 0)</bold>
End Sub




Configuration: Windows / Edge 18.17763

2 réponses

Messages postés
11470
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
5 juillet 2020
655
bonjour,
merci d'utiliser les balises de code quand tu partages du code.
suggestion:
set GEPAMA = Workbooks.Open(chemin & fichier, 0)
Messages postés
6
Date d'inscription
lundi 2 septembre 2019
Statut
Membre
Dernière intervention
2 février 2020

Je vous remercie, c'est le "Set" qui manquait!
Messages postés
38534
Date d'inscription
mercredi 11 avril 2007
Statut
Modérateur
Dernière intervention
5 juillet 2020
7 816