Sujet Précédent Sujet Suivant

Erreur 91 sur workbooks.open

Résolu/Fermé
chaymaek Messages postés 6 Date d'inscription lundi 2 septembre 2019 Statut Membre Dernière intervention 2 février 2020 - Modifié le 2 sept. 2019 à 13:50
baladur13 Messages postés 47367 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 4 mars 2025 - 2 sept. 2019 à 13:53
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

Réponse 1 / 2
yg_be Messages postés 23480 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 3 mars 2025 Ambassadeur 1 568
2 sept. 2019 à 12:49
bonjour,
merci d'utiliser les balises de code quand tu partages du code.
suggestion: 
set GEPAMA = Workbooks.Open(chemin & fichier, 0)
1
Réponse 2 / 2
chaymaek Messages postés 6 Date d'inscription lundi 2 septembre 2019 Statut Membre Dernière intervention 2 février 2020
2 sept. 2019 à 13:49
Je vous remercie, c'est le "Set" qui manquait!
0
baladur13 Messages postés 47367 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 4 mars 2025 13 583
2 sept. 2019 à 13:53
Bonjour
A toutes fins utiles ==> https://www.commentcamarche.net/infos/25917-marquer-un-fil-de-discussion-comme-etant-resolu/
0

Discussions similaires

Voxbone ? qui est-ce ?
fanfan54 -
djakool4 -

158 réponses
Erreur 3005 sur France TV
Cambodgil -
Cambodgil -

4 réponses
Code erreur 3000
Laurent -
JM -

5 réponses
Erreur 5000 message No Renderer Found
Joma -
Panth33ra -

1 réponse
Reçoit-on des notifications pour un "j'aime" si on clique sue "je
ju17 -
E -

2 réponses