Aplikasyonun kapanmaması sorunu

[ErolU]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Arkadaşlar,
Ekteki belgede model şifre ile belgeye giriş izni var.

sifreform adlı UserFormdaki UserForm_Activate ve Private Sub Label_ana_MouseUp isimli makrolarda dosyanın kapatılması ile ilgili kodlar var.
Bu kodlar normalde sorunsuz çalışıyor.

Private Sub Workbook_Deactivate kodu belgeye eklenince şöyle bir sorun ortaya çıkıyor:
Model şifreyi 3 kez yanlış çizince veya 30 saniye içerisinde şifre çizmeyince kitap kendiliğinden kapanıyor ama aplikasyon kapatılmıyor.

Bu sorunu nasıl çözebilirim?

 

Texbox İçerisinde İki Sütundan Süzme Olayı

Kodda Revize Veri Girişi Engelleme

[AhmetRasim]

Merhabalar Sn. @Erol U.
-- sifreform adlı UserFormda

Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

olan satırlardaki 1 değerini 2 olarak değiştiriniz.

Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

-- Private Sub Workbook_Deactivate bölümü içinde End With satırından önce

Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

satırını ekleyiniz.

 

[ErolU]

İyi günler sayın AhmetRasim,
Öneriniz üzerine yapmış olduğum denemelerde sorunun çözüldüğü görülüyor.
Çok teşekkür ederim.

 

[AhmetRasim]

Rica ederim.
Saygılarımla, iyi çalışmalar.