Ouvrir un fichier contenant un onglet préchoisi

elokapo

XLDnaute Junior
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

XLDnaute Accro
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

XLDnaute Junior
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
 

Pièces jointes

  • OUvre le bon mais vraiment le bon onglet.xls
    32.5 KB · Affichages: 31

Discussions similaires

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 822
dernier inscrit
kader55