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 47075 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 18 décembre 2024 - 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

A voir également:

Application.workbooks.open vba
Erreur 0x80070643 - Accueil - Windows
Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
Erreur 1001 outlook - Accueil - Bureautique
Erreur 3005 france tv - Forum TV & Vidéo
Erreur 5000 france tv - Forum iPhone

2 réponses

Réponse 1 / 2

yg_be Messages postés 23400 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 décembre 2024 Ambassadeur 1 557
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)

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!

baladur13 Messages postés 47075 Date d'inscription mercredi 11 avril 2007 Statut Modérateur Dernière intervention 18 décembre 2024 13 494
2 sept. 2019 à 13:53

Bonjour
A toutes fins utiles ==> https://www.commentcamarche.net/infos/25917-marquer-un-fil-de-discussion-comme-etant-resolu/

Discussions similaires

Voxbone ? qui est-ce ?

Instagram "Désolé, une erreur s'est produite"

Erreur vidéo inconnue sur le Freebox Player

Code erreur 3000

Free erreur 38 : impossible d'envoyer des SMS