Arka planda excel görünmesin sadece userform görünsün

[puslukurt]

Öncelikle Dünyadaki Bütün Müslümanların Kurban Bayramlarını kutlarım.

excelde yapılmış programlarda gördüm. exceli açtıktan sonra excel arka planda kalarak userform ile çalışıyorsun yani ekranda sadece userform görünüyor gerek kayıt işlemini gerekse veri alma işlemini yine excelden alıyor.Bunu yapabilmek için nasıl bir kod yazmak lazım.

 

[Yakut]

Application.Visible = False
userform1.show

tabii bundan önce formlarin hazir olmasi lazim

 

[zamenya]

merhaba thesworkbok e bu kodu yapıştırın
Private Sub Workbook_Open()
Call baslangıc

Application.Visible = False

UserForm1.Show
End Sub

 

[puslukurt]

teşekkür ederim saolun oldu

 

[kelkitli]

Selamlar,
Thisworkbook kod kısmına

Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub

UserForm kod kısmına

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Visible = True
End Sub

 

[NBATMAN]

arkadaşlar iyi bayramlar.

Burada verdiğiniz kodları bende denedim , tamam excel kitabı açılınca bir süre excel sayfası gözüküyor sonra userform otomatik açılıp excel kitabı kapnıyor( gizleniyor ) fakat user form kapandığında tekrar gizlenmiş olan excel kitabı çıkmıyor ( gösterilmiyor ) bundan dolayı aynı kitabı tekar açmam gerekiyor, " bu kitap zaten açık yinede açmak istiyormusunuz" mesajı çıkıyor bu durumla sizde karşılaşıyormusunuz yoksa benim kodlarımda mı bir gariplik var acaba.

 

[zamenya]

Butonun ismini değiştirerek bu kodla yapa bilirsin

Private Sub excelegit_Click() 'EXCELE DÖN BUTONU
Application.Visible = True
End Sub