Bu dosya, makro ile seçili hücrelere X işareti yazılmasını ve bu işlemin Excel'in Geri Al komutuyla geri alınabilmesini gösteren bir örnektir. Aktif hücreye ya da seçili hücre aralığına çarpı koymak gerektiğinde, makro kodu kendi çalışmalarınıza uyarlanabilir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sheet1: A1:J32 aralığında deneme verisi bulunur. A8 hücresinde "Macro Undo Example" başlığı yer alır; altındaki satırlarda A, C ve E sütunlarında örnek değerler vardır. Bazı hücrelerde (C11, C14, J17) X işareti görülür.
- Ark1: Aynı örnek verinin Norveççe başlıklı kopyasıdır (A1:F35).
Kullanılan formüller
Her iki sayfada tek formül bulunur. A22 hücresi, A8 hücresindeki başlığı çağırır:=A8
Makrolar
Makrolar UndoModule modülünde yer alır ve iki prosedürden oluşur.- EditRange: Seçili alanın hücre olup olmadığını kontrol eder. Hücre değilse (örneğin seçili nesne bir şekilse) işlem yapmadan çıkar. Değişiklikten önce her hücrenin içeriğini (formül dahil) ve adresini kaydeder, sonra seçili tüm hücrelere X yazar. Ardından Excel'in Geri Al listesine bir kayıt ekler; kayıt metni ülke ayarı Norveç ise Norveççe, değilse İngilizce görünür.
- UndoEditRange: Geri Al seçildiğinde çalışır. İşlemin yapıldığı çalışma kitabını ve sayfayı etkinleştirir, kaydedilen içerikleri hücrelere geri yazar ve geçici kayıtları temizler.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- X yazılacak hücreyi ya da hücre aralığını seçin.
- Geliştirici sekmesinden Makrolar penceresini açın (Alt+F8) ve EditRange makrosunu çalıştırın.
- Seçili hücrelere X yazılır.
- İşlemi geri almak için Geri Al komutunu (Ctrl+Z) kullanın; hücreler önceki içeriğine döner.
- Makroyu kendi dosyanıza almak için UndoModule modülünü dosyanıza aktarın.