Dosyayı Kapatmaya İzin Vermeme

Bu dosya, zorunlu alanlar doldurulmadan çalışma kitabının kapatılmasını engelleyen makrolu bir form şablonudur. Kapatma denendiğinde boş kalan hücreler sayfa adıyla birlikte bir uyarı penceresinde listelenir ve alanlar tamamlanana kadar kapatma iptal edilir. Dosya İngilizce hazırlanmıştır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosyayı açmadan önce diğer Excel dosyalarınızı kapatmanız önerilir; zorunlu alanlar boşken dosyayı kapatmak zor olacaktır.

Dosyanın içeriği​

• GROUP PROFILE: Grup adı, grup iletişim kişisi, telefon, faks, e-posta, TPA ve pazarlama temsilcisi bilgileri ile sözleşme türü (Fully Insured, Self Funded, ASO) alanları. Alanlar için 13 veri doğrulama kuralı tanımlıdır.
• ELIGIBILITY GUIDELINES: Bekleme süresi, bağımlı kişiler, yeni doğan kapsamı ve faturalama tipi gibi uygunluk kuralları. 19 veri doğrulama kuralı içerir.
• CLASSES AND BENEFITS: Market no, faturalama profili, ürün adı, sınıf numarası ve sınıf açıklaması sütunlarından oluşan tablo.
• COBRA: COBRA sınıfı, TPA adı, üyeleri kimin faturalandırdığı, senkronizasyon dosyası ve onay kutuları. 9 veri doğrulama kuralı içerir.

Dosyada formül bulunmaz; kontrol tamamen makrolarla yapılır.

Makrolar​

• Workbook_BeforeClose (ThisWorkbook): Dosya kapatılırken GROUP PROFILE, ELIGIBILITY GUIDELINES ve COBRA sayfalarındaki zorunlu hücreleri denetler. Boş hücreler adresleriyle listelenir, onay kutularının çelişkili ya da işaretsiz olduğu belirtilir ve Cancel = True ile kapatma durdurulur. Eksik yoksa bir kaydetme/yazdırma formu (UserForm1) açılır.
• CommandButton1_Click (UserForm1): Seçime göre dosyayı B5 hücresindeki grup adıyla .xls olarak kaydeder; ikinci seçenekte ayrıca tüm sayfaları yazdırır.
• Workbook_Open: Açılışta bir bilgi formu gösterir (5 saniye sonra otomatik kapanır) ve ClearSelectedCells ile form alanlarını ve onay kutularını temizler.
• Module6 içindeki ikinci kapatma denetimi: Group Profile sayfasındaki zorunlu hücreler doluysa dosyayı masaüstüne "DailyInputs" ve günün tarihinden oluşan adla kaydeder. Bunun için WScript.Shell nesnesi kullanılır; dış bağlantı ya da dosya silme işlemi yoktur.
• ImportTextfile: Ayraçla ayrılmış metin dosyasını etkin hücreden başlayarak sayfaya aktarır.
• PrintAllSheets: Tüm sayfaları birer kopya yazdırır.
• CompareSheets ve UndoDifHilites: Seçilen iki sayfayı karşılaştırır, farklı hücreleri sarıya boyar; Ctrl+U ile geri alınır.
• DelEmptyRow ve Find_Matches: Seçimdeki boş hücrelerin satırlarını siler; seçimi E3:E75 aralığıyla karşılaştırıp eşleşenleri yan sütuna yazar.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. GROUP PROFILE, ELIGIBILITY GUIDELINES ve COBRA sayfalarındaki alanları doldurun, COBRA sayfasındaki onay kutularını işaretleyin.
3. Dosyayı kapatmayı deneyin; eksik hücreler varsa uyarı penceresindeki liste doğrultusunda tamamlayın.
4. Tüm alanlar dolunca açılan formdan kaydetme ya da kaydetme ve yazdırma seçeneğini belirleyin.