TogglButton dans Usf pour Ouvrir et fermer un autre Usf

[MuscatMimi]

Bonjour au Forum

J'aimerais savoir s'il est possible d' Ouvrir , et Fermer un Usf
avec un ToggleButton?? ou CheckBox

J'ai un Usf, et dans cet Usf, je vais placer un ToggleButton, afin d'ouvrir et Fermer un autre Usf,qui s'affichera juste en dessous
ou si qq a une autre idée??
Cordialement

 

[Paritec]

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

 

[Dull]

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

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

 

[Hulk]

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.

 

[Hulk]

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.

 

[MuscatMimi]

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