Acılışta Userform

[HaRaMi]

Selamlar;
Sayın Levent Beyin katkıları ile hazırladığım ekli dosyanın ilk açılışında Userform'un çalışmasını ve Excel'i göster gizle özelliğinin aktif olmasını bir türlü başaramadım. Katkılarınızı bekliyorum.

 

[hamitcan]

Not: Form üzerindeki düğmenin başlığına "GİZLE" yazın.

Private Sub CommandButton5_Click()
If CommandButton5.Caption = "GİZLE" Then
Application.Visible = False
CommandButton5.Caption = "GÖSTER"

'c = 0
Exit Sub
End If
Application.Visible = True
CommandButton5.Caption = "GİZLE"

'c = 1
End Sub

 

[HaRaMi]

Sayın Hamitcan, teşekkürler.
Sayfanın ilk açılışında Userform aktif hale getirilebilir mi ?

 

[hamitcan]

Sub auto_open()
formac
End Sub