Direkt olarak userform açılsın

[ormann]

Arkadaşlar exel sayfasını ilk açığımda user form açılması ve userformu kapattığım zamanda exelden çıkması için nsıl bir kod yazabiliriz

 

[serqet]

User forma

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Quit
End Sub

Çalışma sayfasına

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

yazıp denermisiniz.

 

[Orion1]

Dosyanız ektedir.

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Unload Me
ThisWorkbook.Close
End Sub

Private Sub Workbook_Open()
UserForm1.Show
End Sub

 

[İhsan Tank]

Arkadaşlar exel sayfasını ilk açığımda user form açılması ve userformu kapattığım zamanda exelden çıkması için nsıl bir kod yazabiliriz

merhaba
boş bir module

Sub auto_open()
UserForm1.Show
End Sub

bu kodu
userform'a

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Quit
End Sub

bu kodu ekleyin

 

[ormann]

Sayın Evren açarken userform geliyo fakat kapatırken exelden tamamen çıkmıyo

 

[Orion1]

Sayın Evren açarken userform geliyo fakat kapatırken exelden tamamen çıkmıyo

thisworkbook.close yerine application.quite yazın
ancak bu durmdada açık olan başka excel dosyaı varsa onlarıda kapatır.
Seçiminizi yapın.
40 satırmı?
40 katırmı?

 

[Orion1]

Merhaba.
Şunu kullanırsanız olacak.

if workbooks.count=1 then
   application.quit
else
   thisworkbook.close
end if

 

[yilmazweb]

UserFormdan Excele dönüş

Merhaba
Userform ile açılan çalışmamda, userform üzerindeki excele gitmemi sağlayan botonu yanlışlıkla userform alanının dışında bıraktığımdan excele dönemiyorum.
Lütfen yardım edin.
Teşekkürler.

 

[Murat OSMA]

UserForm'un tasarım ekranına gelin ve o butonu uygun bir yere yerleştirin.

 

[yilmazweb]

Tasarım ekranına gelemiyorum Üstad. Açılış ekranım Userform.

 

[Murat OSMA]

Ctrl + PuseBreak yuşlarına basıp gelen pencedeki Debug butonuna basın. Sizi VBE ekranına götürecektir.

Ya da Makro güvenlik ayarlarından güvenlik seviyesini yüksek olarak ayarlayın.
Makroları etkinleştirmeden VBE penceresini açın ve yapmak istediğiniz yapın sonra dosyayı kapatın ve tekrar açın makrolar etkinleştirin.


Not: UserForm'un ShowModal özelliğini False yaparsanız bu tarz sorunlara takılmazsınız.

 

[yilmazweb]

Teşekkürler Murat Bey.

 

[meken]

Başka bie excel sayfasında makro güvenlik seviyesini yükselt tekrar dene.

 

[Murat OSMA]

Rica ederim Yılmaz Bey, iyi günler.

 

[adoen]

Merhabalar konuyla ilgili userformun excel ile açılıp formdaki buton ile kapanmasının sağladım fakat kapatma sonrası excelde değişiklik olduğu için kaydet - kaydetme - iptal uyarısı geliyor bu uyarıyı kaydetme olarak onaylayarak geçmek istiyorum. Aşağıdaki kodla butona tıkladığım zaman excel kapanıyor yardımcı olabilirmisiniz ?

Private Sub CommandButton32_Click()
   
Sheets("Sheet1").Visible = False
  

ThisWorkbook.Close

End Sub

 

[Emir Hüseyin Çoban]

.close false
İlave ederek deneyiniz.

.

 

[Saban Sertkaya]

Alternatif.

Application.displayalerts=false
Application.quit

 

[adoen]

Sağolun arkadaşlar internette araştırırken ofice resmi sitesinde buldum aradığımı ilginiz için teşekkürler Şaban bey Hüseyin Bey.
Kodu Aşağıda Paylaşıyorum.

Private Sub CommandButton32_Click()

ThisWorkbook.Close savechanges:=False
       
End Sub

 

[adoen]

Sağolun arkadaşlar internette araştırırken ofice resmi sitesinde aradığımı buldum. İlginiz için teşekkürler Şaban bey, Hüseyin Bey.
Kodu Aşağıda Paylaşıyorum.

Private Sub CommandButton32_Click()

ThisWorkbook.Close savechanges:=False
       
End Sub

 

[yilmazweb]

Merhaba
Excel çalışma kitabı açıkken "Kapat" butonuna tıklandığında Userform açılsın istiyorum.
Nasıl yapabilirim.
Teşekkürler.