Sadece belirli bir excel belgesini çalışırken gizlemek

[Mahmut Kök]

Application.Visible = False

komutu ile, çalışan excel belgelerini gizliyorum, sadece userform gözüküyor; ama bu kodun geçtiği belge açıkken, yani bu kod faal iken, diğer excel belgelerini de gizliyor. Sadece kodun geçtiği belge görünmesin, diğerleri normal şekilde gözüksün istiyorum; bu kodda nasıl bir değişiklik yapmalıyım veya başka bir kod mu girmeliyim.. Olur inşallah.

Şimdiden teşekkür ediyorum, iyi çalışmalar..

 

[programer]

Sayın Mesleki aynı sorun bendede var bende bu sorunun cevabını arıyordum forumda ama bir türlü bulamadım. Elbette bir yolu vardır. Üstatlarımızdan gelicek cevapları bekliyorum sabırsızlıkla

 

[alpi]

Bir dosyayı gizlemek için

Windows(ThisWorkbook.Name).Visible = False

Göstermek için

Windows(ThisWorkbook.Name).Visible = true

 

[programer]

Sub Autpen()
Ip_Har_Frm.Show
Windows(ThisWorkbook.Name).Visible = False
End Sub

Sayın alipi verdiğiniz cevap için teşekkür ederim. Ama vediğiniz kod sadece çalışma kitabını gizliyor ve Ip_Har_Frm.Show kısmında hata veriyor. Excel'in tamamen arka planda çalışmasını istiyorum. Forumda bunun örnekleri çok ama 2 veya daha fazla excel açık olduğu zaman bunların tamamını gizliyor. Örnek Kod

Sub Autpen()
Application.Visible = False
UserForm1.Show
End Sub

bunu kullandığım zaman açık olan tüm ezcel dosyalarını gizliyor. Bunu dosya ismi vererek yapmamız mümkünmü. Yardımlarınız için şimdiden teşekkür ederim.

 

[alpi]

Sayın programer aşağıdakş gşbş deneyin

Sub Auto_Open()
    If Workbooks.Count = 1 Then
        Application.Visible = False
    Else
        Windows(ThisWorkbook.Name).Visible = False
    End If
    Ip_Har_Frm.Show
End Sub

Ip_Har_Frm.Show satırı en sonda olmalı yada ShowModal özelliği False olmalı.