Excel açılışında çalışma kitabının gizlenmesi.

[SUHAOZBEK]

Merhaba Çalışma kitabını açtığım zaman aşağıda yer alan kod ile userform aktif çalışma kitabı ise gizleniyor. Ancak diğer çalışma kitapları da gizleniyor.
Diğer çalışma kitapları açık kalacak şekilde kod da nasıl bir düzenleme yapabilirim.
Çalışma kitabının adı DATA001.xlsm

Yardımlarınız ricasıyla.

Sub auto_open()
Application.Visible = False
ENTRANCE.Show
Sheets("DATA").Select
Range("A1").Select
End Sub

 

[Trilenium]

Bunun yerine Application.Visible = False

Bunu kullanın ActiveWorkbook.Windows(1).Visible = False

 

[SUHAOZBEK]

Merhaba,
" ActiveWorkbook.Windows(1).Visible = False "eklediğim zaman ENTRANCE.Show da hata aldı.

Sub auto_open()
ActiveWorkbook.Windows(1).Visible = False
ENTRANCE.Show
Sheets("DATA").Select
Range("A1").Select
End Sub

 

[Trilenium]

Sub auto_open()
ENTRANCE.Show
ActiveWorkbook.Windows(1).Visible = False
Sheets("DATA").Select
Range("A1").Select
End Sub