Ouvrir un fichier contenant un onglet préchoisi

[elokapo]

Bonjour,

Voilà mon soucis et ma/mes question(s) : j'ai 4 fichiers Excel qui ont toujours le meme nom, dans lesquels plusieurs onglets existent. Chaque nom d'onglet est différent.

Je voudrai à partir d'une inputbox (dans un fichier A) entrer le début du libellé d'un des onglets (se trouvant dans un fichier B, C OU D) , et que par magie, l'onglet s'imprime (sans ouvrir le fichier 😉 )

En fait, il faudrait lui faire chercher dans chacun des fichiers B C et D si l'onglet 'X' existe.

Je sais comment faire pour vérifier si un fichier est existant dans un répertoire, et l'ouvrir, (If Dir(".... then .... Workbooks.OpenText Filename:=".....)) mais là, sur ce problème je bloque !

Pourriez vous m'aiguiller svp ?

Merci encore pour toutes vos solutions !

Elokapo

 

[michel_m]

Re : Ouvrir un fichier contenant un onglet préchoisi

bonjour,

comme je n'ai pas 2003 ni la maquette de ce que je t'avais envoyé, on va essayer de feinter...

A la place de

For Each feuil In cat.tables
If Left(feuil.Name, 6) = onglet Then

essaies

Dim cptr as byte

For cptr=1 to cat.tables.count
If Left(sheets(cptr).Name, 6) = onglet Then

en espérant que...

 

[elokapo]

Re : Ouvrir un fichier contenant un onglet préchoisi

Bonjour,

L'erreur suivante apparait : Run time error '9' - Subscript out of range.

Ci joint le fichier pour voir si je n'ai effectué une quelconque erreur.

Merci et à plus !
Elokapo