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

Comment dire "Si la feuille est activée" ???

  • Initiateur de la discussion Initiateur de la discussion zeltron
  • Date de début Date de début

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 !

zeltron

XLDnaute Occasionnel
Bonjour à tout le forum,

J'ai une macro concernant une feuille ( Feuille "A"), j'aimerais également pouvoir appliquer cette macro sur une autre feuille ( feuille "B").

Cette macro fait apparaitre un USF. J'ai donc écrit la même macro dans la feuile "A" et dans la feuille "B".

Nb: cette macro fait apparaitre un USF avec un textbox. C'est le contenu de ce textbox à l'initialisation de l'USF qui change en fonction de la feuille active.

J'ai donc écrit ce code à l'initialisation du USF:

Sub...
If sheets("A") is activate Then...
...
end if

If sheets("B") is activate then..
...
end if
End sub

Cela bloque au niveau de l'initialisation de l'USF. Je ne vois pas pourquoi.

Pouvez vous m'aider?

Merci d'avance pour votre coup de main

Cordialement

Zeltron
 
Re : Comment dire "Si la feuille est activée" ???

Bonjour Zeltron

essaye peut être le code ci dessous :

Code:
If ActiveSheet.Name = "A" Then UserForm1.Show

bon après midi
@+

Edition aar Pascal, t'avais pas vu, bonne journée
 
Re : Comment dire "Si la feuille est activée" ???

re

tu as bien fait d'intervenir Pierrot j'étais tellement focalisé sur le fait de mettre 2 fois le même code à 2 endroits différents que j'avais oublié de modifier cette partie de code

Bonne journée
 
Re : Comment dire "Si la feuille est activée" ???

Merci beaucoup pour votre aide vos 2 solutions répondent parfaitement à mon besoin.

Merci encore et bonne journée.

Cordialement

Zeltron
 
- 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

Réponses
3
Affichages
256
D
  • Question Question
Réponses
5
Affichages
249
Didierpasdoué
D
Réponses
9
Affichages
508
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…