Erreur 91 sur workbooks.open [Résolu]

Messages postés
4
Date d'inscription
lundi 2 septembre 2019
Statut
Membre
Dernière intervention
3 septembre 2019
-
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
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
8555
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
23 septembre 2019
424
1
Merci
bonjour,
merci d'utiliser les balises de code quand tu partages du code.
suggestion:
set GEPAMA = Workbooks.Open(chemin & fichier, 0)

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CommentCaMarche

CCM 60070 internautes nous ont dit merci ce mois-ci

Commenter la réponse de yg_be
Messages postés
4
Date d'inscription
lundi 2 septembre 2019
Statut
Membre
Dernière intervention
3 septembre 2019
0
Merci
Je vous remercie, c'est le "Set" qui manquait!
baladur13
Messages postés
38105
Date d'inscription
mercredi 11 avril 2007
Statut
Modérateur
Dernière intervention
23 septembre 2019
5296 -
Commenter la réponse de chaymaek