Sayfadan Sayfaya Kopyalama

Bu dosya, bir sayfadaki verilerin makro ile başka bir sayfaya nasıl kopyalanacağını gösteren örnek çalışmadır. Sayfa1'de yer alan veri alanı makro çalıştırıldığında otomatik seçilir ve Sayfa2'ye yapıştırılır. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A3:C15 aralığında kopyalanacak örnek veriler bulunur. Veriler rastgele metinlerden oluşur ve sütunlara dağınık yerleşmiştir.
• Sayfa2: Hedef sayfadır. Kopyalanan veriler bu sayfada A5 hücresinden başlayarak yapıştırılır.
• Sayfa3: Boş sayfadır, işlemde kullanılmaz.

Dosyada formül bulunmaz; işlem tamamen makro ile yapılır.

Makrolar​

Dosyada Module1 içinde ed adlı tek bir makro vardır. Makro sırasıyla şunları yapar:

1. Ekran güncellemesini kapatır (Application.ScreenUpdating), böylece işlem ekranda titremeden çalışır.
2. Sayfa1'in UsedRange alanını, yani içinde veri bulunan tüm bölgeyi seçer ve kopyalar.
3. Sayfa2'ye geçer, A5 hücresini seçer ve kopyalanan alanı yapıştırır.
4. Kopyalama modunu kapatır (Application.CutCopyMode) ve olay çalışmasını devre dışı bırakır (Application.EnableEvents = False).

Makro dosya silme veya dış bağlantı gibi bir işlem içermez. Son satırda olaylar kapatıldığı için, aynı Excel oturumunda olay tabanlı başka makro kullanılacaksa Application.EnableEvents değerinin yeniden True yapılması gerekir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1'e kopyalanacak verileri yazın veya mevcut örnek verileri kullanın.
3. Alt+F8 tuşlarıyla makro listesini açın, ed makrosunu seçip Çalıştır düğmesine tıklayın.
4. Sayfa2'ye geçin; veriler A5 hücresinden itibaren yapıştırılmış olacaktır.
5. Farklı sayfa adları veya hedef hücre için VBA düzenleyicisinde (Alt+F11) makrodaki sayfa adlarını ve A5 adresini değiştirin.