Erreur 91 sur workbooks.open

Résolu
chaymaek Messages postés 6 Statut Membre -  
baladur13 Messages postés 50033 Statut Modérateur -
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 24281 Statut Contributeur Ambassadeur 1 584
 
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 Statut Membre
 
Je vous remercie, c'est le "Set" qui manquait!
0
baladur13 Messages postés 50033 Statut Modérateur 13 708
 
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 -
ntrece13 -

159 réponses
Erreur 3005 sur France TV
Cambodgil -
PK -

5 réponses
Code erreur 3000
Laurent -
JM -

5 réponses
Panne T32 sur telecommande Orange
rayseg22G -
Fifi -

6 réponses
Comment supprimer un contact
Lilou -
Lilou -

2 réponses