Userform çıkış engeli hk

[ersoyalan]

Merhaba,

Aşağıdaki kodu kllanarak userform x çıkışını engelledim fakat şimdi sayfanın kod bölümüne giriş yapamıyorum.kod bölümüne hangi yöntemlerle giriş yapabilirim.


Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then
Cancel = 1
MsgBox "Lütfen butonu kullanınız", _
vbOKOnly + vbInformation, "Çıkış İptali"
End If
End Sub



Syg,
E.ALAN

 

[ersoyalan]

Userform sayfa açılışında ekrana geliyor ve sayfada herhangi bir işlem yapmamı engelliyor.

 

[Ferhat Pazarçevirdi]

Ben konuyu pek anlamadım.

Siz Userform açıkken, sağ üstteki "Kapatma" butonuna basıyorsunuz ... Bir mesaj çıkıp size "Burdan kapatamazsın, git düğmeden kapat diyor" ... Sonra o düğmeye basıp Userformu kapatıyorsunuz ... ve sonra VB Editörüne giremiyor musunuz yani ...?

 

[ersoyalan]

hocam mesajdan sonra ok tuşuna basıyorum fakat userform ekranda sabit kalıyor hiç bir şekilde kapatamıyorum.ve sayfada herhangi bir işlem yapamıyorum.

 

[Ferhat Pazarçevirdi]

Kodlarınızın herhangi bir yerinde DoEvents kelimesi geçiyor mu?

 

[ersoyalan]

hocam açıkçası hatırlamıyorum desem

 

[Ferhat Pazarçevirdi]

Formu kapattıktan sonra aşağıdaki seçeneklerin herikisinide deneyin.

1. Ctrl+Pause/Break tuşlarına basın, çalışan kod varsa durdurulacaktır

2. Alt+F11'e basıp girmeyi deneyin.

 

[ersoyalan]

Hocam,

2. Alt+F11'e basıp girmeyi deneyin. deniyordum olmuyordu.
1. Ctrl+Pause/Break tuşlarına basın, çalışan kod varsa durdurulacaktır.Bunu bilmiyordum.Tam istediğimmiş.Dediğiniz gibi çalışan kod durdu şimdi işlem tamamdır.

Yardımlarınız için çok çok teşekkürederim.

Syg,
E.ALAN

 

[mesuttasar]

Kodlarınızın herhangi bir yerinde DoEvents kelimesi geçiyor mu?

Ferhat Abi , selamlar benim kodlarımda DoEvents kelimesi geçiyor , bu yüzdenmi çalışma sayfasında herhangi bir hücreye veri girişi yada düzeltme yapamıyorum acaba?