Bu dosya, tanımlı bir veri alanının sonuna düğme yardımıyla yeni satır eklenmesini gösteren makro örneğidir. Her eklemede Alan adlı aralık bir satır büyür ve yeni satıra sıra numarası yazılır. Son satırı silen ikinci bir makro da bulunur.
Dosyanın içeriği
- Sayfa1: Veri alanının bulunduğu çalışma sayfasıdır. B3 ve D3 hücrelerinde başlangıç değeri olarak 1 yer alır. 9. satırdaki not, sarı ile işaretlenen bölümün tanımlı alan olduğunu ve bu alana Ekle tuşu ile veri eklendiğini belirtir.
- Module1: Makro kodlarının bulunduğu gizli modüldür.
- Tanımlı adlar: Alan ve Veri adları Sayfa1 sayfasında B3:E3 aralığını gösterir. Makro Alan adını her eklemede yeniden tanımlar.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar dosya silme veya dışarıya bağlantı gibi işlemler yapmaz; yalnızca Sayfa1 üzerindeki alanı değiştirir.- KayitEkle: Alan adlı aralığı bir satır aşağı doğru genişletir ve adı yeni aralığa yeniden verir. Aralığın son satırına, aralıktaki toplam satır sayısını değer olarak yazar. Ardından alanı seçip arka plan rengini (renk indeksi 19) düz dolgu olarak uygular.
- KayitSil: Alan aralığının son satırını siler ve altındaki hücreleri yukarı kaydırır. Aralık tek satıra düştüğünde işlem yapmaz; böylece başlık satırı korunur.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sayfa1 sayfasında sarı ile işaretlenmiş alanı inceleyin.
- Yeni satır eklemek için Ekle düğmesine ( KayitEkle makrosu ) tıklayın; alan bir satır büyür ve sıra numarası yazılır.
- Son satırı kaldırmak için KayitSil makrosunu çalıştırın. Makroya düğme atanmamışsa Alt+F8 ile çalıştırılabilir.
- Kendi çalışmanıza uyarlamak için Alan adının gösterdiği aralığı kendi başlık satırınıza göre değiştirin.
