Variable workbook : l'indice n'appartient pas à la sélection [Résolu/Fermé]

Signaler
Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
-
Mouftie
Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
-
Bonjour,
Bonjour,

je voudrais travailler sur des fichiers, dont les noms se trouvent dans une table (TbFic)

J'ai écrit :

Sub test()
Dim Fc As String, WbFc As Workbook
Fc = Sheets("Données").Range("B4").Value
Set WbFc = Workbooks(Fc)
WbFc.Activate
End Sub


j'ai un message d'erreur "l'indice n'appartient pas à la sélection."

NB. la cellule B4 est de la forme "NomFichier.xlsm"

Pouvez-vous m'aider, svp. merci


2 réponses

Messages postés
7906
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
16 janvier 2020
1263
Bonjour,

Le message d'erreur est dû au fait que le fichier Fc ne fait pas partie de la collection des fichiers qui sont ouverts !

Pour Ouvrir un fichier il faut employer :
Set WbFc = Workbooks.Open(CheminCompletDuFichier)

Messages postés
213
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
8 octobre 2019
8
Merci pour votre réponse.

Effectivement, quand j'ai commencé à écrire mon code, le fichier était ouvert, mais après je l'ai fermé et j'ai oublié qu'il était fermé.

Je suis restée un bon moment sans comprendre. C'est couillon !