Lancer un USF en fonction de la feuille active

G

Guest

Guest

• 3 Octobre 2008

• #2

Re : Lancer un USF en fonction de la feuille active

Bonjour EvelyneEtFrançois,

Code:

If ActiveSheet.Name ="CC" Then
UserFormDLCC.Show
End If

A bientôt

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 3 Octobre 2008

• #3

Re : Lancer un USF en fonction de la feuille active

Bonjour Evelynetfrançois,

essaye :

If ActiveSheet.Name = "CC" Then
UserFormDLCC.Show
End If
If ActiveSheet.Name = "SS" Then
UserFormDLSS.Show
End If


Les objets ne peuvent pas se comparer avec un signe =, je crois... il faut passer par l'opérateur Is de mémoire

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 3 Octobre 2008

• #4

Re : Lancer un USF en fonction de la feuille active

Re,

Ou mieux

Code:

Select Case ActiveSheet.Name
 Case "CC" :UserFormDLCC.Show
 Case "SS" :UserFormDLSS.Show
End Select

A+

[Edition] T'avais pas vu TotoTiti, quand je dis "ou mieux", je pense bien-sûr à ma première proposition.

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 3 Octobre 2008

• #5

Re : Lancer un USF en fonction de la feuille active

Bonjour Hasco,

Mais tout à fait, c'est mieux, puis que ma proposition était la même que ta première 🙂

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 3 Octobre 2008

• #6

Re : Lancer un USF en fonction de la feuille active

MERCI Hasco et Tototiti , pour l efficacite et la rapidité
c est super ca roule maintenant ................
bonne soirée à vous
et encore un grand merciiiii !!!
E et f

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 3 Octobre 2008

• #7

Re : Lancer un USF en fonction de la feuille active

Allez, pour le concours du "encore mieux" ou "encore plus court", je propose :

Code:

       VBA.UserForms.Add("UserFormDL" & ActiveSheet.Name).Show

 

Vote positif 0 Vote négatif