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

Signaler
Messages postés
215
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
6 septembre 2020
-
Messages postés
215
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
6 septembre 2020
-
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


A voir également:

2 réponses

Messages postés
8539
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
20 juillet 2021
1 682
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
215
Date d'inscription
vendredi 28 novembre 2008
Statut
Membre
Dernière intervention
6 septembre 2020
14
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 !