Soru İkinci çalışma kitabının koddan dolayı kendiliğinden kapanması

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
638
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Arkadaşlar,
Forumda Ergün Güler arkadaşımızın burada hazırladığı dosyayı birtakım değişikliklerle kullanıyorum.

Şöyle bir sorunum oldu:
Aşağıya eklediğim dosyalardan (İkisi de aynı özelliklere sahiptir.) birincisi açık durumdayken ikincisi açılmaya çalışılırken
A) Model üç kez yanlış çizildiğinde
B) Belirlenen sürede model çizilemeyince
sifreform adlı formdaki kodlar yardımıyla dosya kendini kapatıyor. Bu durum normal fakat kendini kapattıktan sonra
1. Önceden açılmış dosyayı da kapatmaya çalışıyor.
2. Kapalı olan Ribbon menüsünü açıyor.
Bu iki durumu çözebilir miyiz?

Not: Sorunun kaynağı ThisWorkbook bölümü Private Sub Workbook_Deactivate() başlığı altındaki If .Workbooks.Count = 1 Then Application.Quit kod satırıdır.
Bu satırı kullanma nedenim: Bilgisayarda sadece aşağıya eklediğim dosyalardan biri açıksa ve model yanlış çizilip dosya kendini kapattığında excel uygulamasının (çalışma kitabı değil) açık kalmaması içindir.
 

Ekli dosyalar

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
638
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Günceldir.
 
Üst