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

[zeltron]

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

 

[PascalXLD]

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

Bonjour

le mieux est que tu mettes un seul code dans un module et tu appelles cette sub

et la tu n'auras pas de problème

Bonne journée

 

[Pierrot93]

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

Bonjour Zeltron

essaye peut être le code ci dessous :

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

bon après midi
@+

Edition aar Pascal, t'avais pas vu, bonne journée

 

[PascalXLD]

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

 

[zeltron]

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