Excel dosyamın açılışında isimleri x ve y olan sayfalar haricinde sayfa varsa bu sayfaların silinmesini nasıl sağlayabilirim?
VBA penceresinde ThisWorkbook bölümünde aşağıdaki kodu yapıştırın

 Private Sub Workbook_Open()Application.DisplayAlerts = False Tekrar: For i = 1 To Worksheets.Count If Worksheets(i).Name = "x" Or Worksheets(i).Name = "y" Then GoTo ATLA Worksheets(i).Delete GoTo Tekrar: ATLA: Next i Application.DisplayAlerts = True End Sub

Kutulara fareyle çıft tıklayarak onay (check) işareti yazdırabilir, aynı yöntemle işareti silebilirsiniz (ayrıca klavyeden a tuşu ile de onay işaretini yazdırabilirsiniz)
Hücrelerde koşullu biçimlendirme bulunmaktadır. Eğer Olumlu ise “Mavi” Olumsuz ise “Kırmızı” renkte görünmektedir.
Onay işaretlerinin olduğu hücrenin yazı fontu Marlett olmalı (varsıyılan)
Denetleme sonucunu sil düğmesine tıklayarak kutucukları silebilirsiniz….
Dosyayı düzgün çalıştırabilmek için makroların etkinleştirilmesi gerekmektedir.
Dosyanın Ön İzleme Fotosu (Fikir Sahibi Olmanız Açısından)

3091 Taşınmaz Mal zilyedliğine yapılan tecavüzlerin önlenmesi hakkındaki kanun uygulaması sonucunda tanzim edilen karar’a ait excel fotmatında bir miktar formül yazılarak hazırlanmış örnek dosya.


3091 Sayılı Kanun Karar Örneği

10/07/2010 tarih ve 27637 sayılı Resmi Gazetede yayınlanan, içişleri bakanlığı merkez ve taşra teşkilatı arşiv hizmetleri yönetmeliği’nin 15. ve 16. maddeleri gereğince hazırlanan, arşivinin korunması ile ilgili hususları içerir arşiv koruma talimatı örneği.