Appeler un groupe d'onglets [Résolu/Fermé]

Signaler
Messages postés
58
Date d'inscription
mardi 16 avril 2013
Statut
Membre
Dernière intervention
8 août 2017
-
Messages postés
58
Date d'inscription
mardi 16 avril 2013
Statut
Membre
Dernière intervention
8 août 2017
-
Bonjour,

Je suis nouveau sur le forum.

J'ai un fichier Excel avec plusieurs onglets. Je voudrais créer sous vba un groupe où sont inscrits que certains de ces onglets permettant un appel avec for each.

je voudrais ensuite que ce groupe d'onglet soit publique et donc utilisable dans toutes mes macros

pour l'instant je procède via une petite macro qui ne fonctionne pas


Public onglets As Variant
Sub xxxx()

onglets = Array("b", "c", "d", "e", "f")

End Sub

3 réponses

Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
570
Bonjour,

Voici un exemple simple :

Dim Onglet As Worksheet 
Dim groupe_Onglet As New Collection 

groupe_Onglet.Add Sheets("Feuil2") 
groupe_Onglet.Add Sheets("Feuil4") 

For Each Onglet In groupe_Onglet 
    Onglet.Select 
    MsgBox Onglet.Name 
    MsgBox Onglet.Cells(1, 1) 
Next Onglet


C'est la création d'une collection de feuilles.
On peut choisir les feuilles à mettre dans la collection avec la syntaxe .Add
Ensuite chaque membre de la collection dans la boucle peut être utilisé comme une feuille du classeur. Ici on sélectionne la feuille, on affiche son nom puis on affiche la valeur de la cellule A1

A+

Cordialement,
Messages postés
58
Date d'inscription
mardi 16 avril 2013
Statut
Membre
Dernière intervention
8 août 2017

Merci beaucoup
Je voudrais faire ceci:
J'ai plusieurs macros dans un même module que je dois tester et je voudrais ne pas avoir à appeler dans chaque macro cette macro que vous m'avez fait précédement.

Comment faire?

Merci d'avance =)
Messages postés
58
Date d'inscription
mardi 16 avril 2013
Statut
Membre
Dernière intervention
8 août 2017

C'est bon j'ai trouvé.
à mettre dans "thisworkbook" dans la fenetre gauche de la fenetre de code, dossier "microsoft excel objects"