Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro et sélection d'onglet

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

lerexcel

XLDnaute Junior
Bonjour,

D'abord bon appétit à tous...
Voilà je sollicite votre aide...

J'ai un petit problème de syntaxe, je ne sais pas comment dire dans la fonction :
For each ... in ....

Next


"chaque onglet sélectionné dans le classeur actif".



Merci pour cette précieuse aide
 
Re : Macro et sélection d'onglet

Bonjour Lerexcel,

peut être comme ceci si j'ai bien compris :

Code:
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
'ton code
Next ws

"ActiveWorkbook" pour le classeur actif, quoique si non précisé, le code s'exécutera sur celui ci.

bon après midi
@+
 
Re : Macro et sélection d'onglet

Re

pour exclure des feuilles :

Code:
Dim ws As Worksheet
For Each ws In Worksheets
    If ws.Name <> "nomfeuille1" Or ws.Name <> "nomfeuille2" Then
        'ton code
    End If
Next ws

pour cibler certaines feuilles :

Code:
Dim x() As Variant, i As Byte
x = Array("Feuil1", "Feuil2", "Feuil4")
For i = LBound(x) To UBound(x)
    Sheets(x(i)).Activate
Next i

@+
 
Re : Macro et sélection d'onglet

Bonjour Pierrot,

Merci pour ta réponse bien qu'elle en cible pas tout à fait la demande ( qui était peut-être trop succinte, je m'en excuse).

Bon je vais expliquer le côté "pratique" de mon objectif :

1°) ce code se trouve sur un fichier (juste créer pour lui même), ce code serait appelé par un raccourci ex:Ctrl+f.
2°)Il agirait sur un autre fichier ouvert ( en même temps ) quelqu'il soit, peu importe son nom et le nom des onglets, et cela seulement pour les onglets préalablement sélectionné (ex: avec la touche Ctrl et la souris).

3°) Le but : étant d'appliquer le bénéfice de la macro seulement à la "sélection d'onglet".


J'espère que cette fois-ci j'en n'ai pas trop dis... 🙁

Merci à tous.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
Réponses
4
Affichages
435
DidPouAxi
D
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…