Dosya simgesi

Listeyi Başka Sayfaya Çoğaltma İşlemi

Bu dosya, liste içinde seçili hücrenin değerini taşıyan tüm satırları bulup başka bir sayfaya kopyalayan bir makro örneğidir. Filtre uygulamadan, tek bir makro çalıştırılarak eşleşen kayıtlar Sayfa2'de toplanır.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • Sayfa1: A1:E2001 aralığında, yaklaşık 2000 satırlık liste verisi yer alır. Makro bu sayfada çalıştırılır.
  • Sayfa2: Başlangıçta boştur. Makronun kopyaladığı satırlar bu sayfaya yazılır.
Dosyada formül bulunmaz; işlem tamamen makro ile yapılır.

Makrolar​

  • SecilenDegeriKopyala (Module1): Aktif hücrenin bulunduğu sütunda, hücrenin çevresindeki bitişik veri bölgesini (CurrentRegion) tarar. Aktif hücreyle aynı değere sahip her hücrenin satırını belirler ve bu satırları tek bir alan olarak birleştirir.
  • Ardından Sayfa2 seçilir, mevcut içeriği temizlenir ve eşleşen satırlar A2 hücresinden başlayarak yapıştırılır. Ekran güncellemesi işlem süresince kapatılır.
  • İşlem bitince "Sayfa2'ye Bakın" mesajı gösterilir ve Sayfa2 açılır.
Makro yalnızca Sayfa2'nin içeriğini temizler; dosya silme veya dış bağlantı gibi bir işlem içermez.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. Sayfa1'de çoğaltmak istediğiniz değerin bulunduğu hücreyi seçin.
  3. Alt+F8 ile SecilenDegeriKopyala makrosunu çalıştırın.
  4. Mesaj kutusunu onaylayın; seçtiğiniz değeri içeren satırlar Sayfa2'de listelenir.
  5. Başka bir değer için işlemi yeniden yapın; Sayfa2 her çalıştırmada temizlenerek güncellenir.
Sayfa2'deki önceki sonuçlar her çalıştırmada silindiği için, saklamak istediğiniz sonuçları başka bir yere taşıyın. Seçili değer listede yalnızca bir kez geçiyorsa, yalnızca o satır kopyalanır.

okutkan tarafından daha fazla dosya

Detaylar
Yazar
okutkan
İndirme
7
Gösterim
1,167
İlk sürüm
Güncel
SHA-256
20dee9e08b91fc4a2726a1733018591c9ca92f0ad92788b9ad2c330bbe16d2a1

Puanlar

5.00 Oylama 1 İnceleme

En son değerlendirmeler

Güzel bir çalışma olmuş, teşekkürler.
Geri
Üst