TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Paritec

XLDnaute Barbatruc

• 30 Mai 2009

• #2

Re : TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Bonjour Vaucluse, le forum

Private Sub CheckBox1_Click()
If CheckBox1 = True Then UserForm2.Show (0) Else UserForm2.Hide
End Sub

maintenant tu peux aussi décharger l'userform2 au lieu de le réduire?
comme tu n'en parles pas

Private Sub CheckBox1_Click()
If CheckBox1 = True Then UserForm2.Show (0) Else Unload UserForm2
End Sub

essayes et redis moi
a+
papou

 

Dernière édition: 30 Mai 2009

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 30 Mai 2009

• #3

Re : TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Salut Christian, Paritec, le Forum

Pour le placement de l'USF joue sur les propriétés Top
Un essai en pièce Jointe

Code:

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
    With UserForm2
        .Show 0
        .Top = 380
    End With
        Else
    Unload UserForm2 [COLOR=Green]'ou Userform2.Hide[/COLOR]
End If
End Sub

Bonne Journée

 

Pièces jointes

• Christian.zip

  11.5 KB · Affichages: 52
• Christian.zip

  11.5 KB · Affichages: 49
• Christian.zip

  11.5 KB · Affichages: 52

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 30 Mai 2009

• #4

Re : TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Hello Immo, Papou, Dull,

La version ToggleButton...

Ne pas oublier de mettre aussi UserForm1.Show 0 !!

Cdt, Hulk.

 

Pièces jointes

• Test.xls

  37.5 KB · Affichages: 56
• Test.xls

  37.5 KB · Affichages: 60
• Test.xls

  37.5 KB · Affichages: 60

Dernière édition: 30 Mai 2009

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 30 Mai 2009

• #5

Re : TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Re,

Oups désolé Dull, je n'avais pas vu que tu avais aussi mis la version Toggle 😛
En plus j'oublie toujours l'Else... 😡 😀

Bon WE à tous.

Cdt, Hulk.

 

Dernière édition: 30 Mai 2009

Vote positif 0 Vote négatif

MuscatMimi

XLDnaute Accro

• 30 Mai 2009

• #6

Re : TogglButton dans Usf pour Ouvrir et fermer un autre Usf

Bonjour Paritec,Dull,Hulk

Merci a tout les trois,
Vos Codes Fonctionne super

Bon week-end a vous trois

 

Vote positif 0 Vote négatif