Dosya simgesi

Excel Aynı Satırları Silme

Excel Aynı Satırları Silme dosyası, A ve B sütunlarında karşılıklı bulunan aynı değerleri VBA makrosuyla temizleyen bir örnektir. Eşleşen kayıtlar silinir, geriye kalan değerler boşluk bırakılmadan yukarı kaydırılır.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • Sayfa1: A1:B32 aralığında kayıt listeleri bulunur. A sütunundaki değerler ED384, ED541, ED411 gibi kodlardan oluşur; B sütunu A ile karşılaştırılacak ikinci listedir.
  • Module1: ED adlı makroyu barındıran VBA modülüdür.
Dosyada çalışma sayfası formülü kullanılmamıştır; tüm işlem makro ile yapılır.

Makrolar​

  • ED: A sütunundaki son dolu satıra kadar her hücreyi, B sütunundaki tüm satırlarla tek tek karşılaştırır. Bir değer B sütununda da varsa hem A hem B'deki hücre içeriği temizlenir. Karşılaştırma bittikten sonra A:B sütunlarındaki boş hücreler silinir ve alttaki değerler yukarı kayar. Kod dosya silme veya dışarıya bağlantı gibi işlem içermez; yalnızca bu iki sütundaki veriyi değiştirir.
Makro kodunda sayfaya Sayfa3 kod adıyla başvurulur. Kendi dosyanıza uyarlarken bu ad ile aralıkları kendi sayfanıza göre değiştirmeniz gerekir. Makro, değerleri geri alınamayacak şekilde sildiği için çalıştırmadan önce dosyanın yedeğini alın.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. Karşılaştırılacak listeleri A ve B sütunlarına girin.
  3. ALT+F8 tuşlarıyla makro penceresini açın, ED makrosunu seçip çalıştırın.
  4. Ortak değerlerin silindiğini ve kalan kayıtların yukarı kaydığını kontrol edin.
Microsoft 365 kullanılıyorsa dinamik dizi fonksiyonu BENZERSİZ ile de benzer işlemler formülle yapılabilir. Ayrıntılar için Excel Dinamik Dizi Formülleri ve BENZERSİZ sayfalarına bakılabilir.

ExcelDepo tarafından daha fazla dosya

Detaylar
Yazar
ExcelDepo
İndirme
5
Gösterim
2,620
İlk sürüm
Güncel
SHA-256
54743fa95a24daf4bcff5c2299a6c4f36978e0abd37978d1ba584261b6e4b599

Puanlar

5.00 Oylama 1 İnceleme

En son değerlendirmeler

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