Bu yazıda, her 5 satırdan sonra satır eklemeyi öğreneceğiz.NS Microsoft Excel'de VBA aracılığıyla satır.
Bir örnek alalım ve anlayalım:
A1:F31 aralığında, A sütununun Ad, B sütununun Sokak adresini, C sütununun Şehir, D sütununun bölgeyi, E sütununun ülke adını ve F sütununun telefon numarasını içeren verilerimiz var.
Verilerdeki her beşinci satırdan sonra satırı eklemek istiyoruz, aşağıdaki adımları ve kodu izleyin:
- Alt+F11 tuşuna basmak için VBE sayfasını açın
- Kodu yazmak için modülü takın
- Aşağıda belirtilen kodu yazın:
Sub InsertIT() x = 2 'Start Row Do Range("A" & x, "F" & x).Insert x = x + 5 Döngü x < 50 End Sub
Kod Açıklaması:
İlk olarak satırı eklemek istediğimiz yerden satır numarasını tanımladık. Daha sonra verilerin girileceği aralığı tanımladık. Ardından kaç satırdan sonra satırın ekleneceği sayıyı tanımladık. Ve sonra hangi satıra kadar satırlar eklenecek.
Kodu çalıştırmak için klavyenizdeki F5 tuşuna basın.
- Satırlar 50'ye kadar eklenecekNS verilerdeki satır
Bu sayede makroda tanımlayabileceğimiz belirli sayıdan sonra satır ekleyebiliriz.
Bloglarımızı beğendiyseniz, Facebook'ta arkadaşlarınızla paylaşın. Ayrıca bizi Twitter ve Facebook'ta da takip edebilirsiniz.
Sizden haber almayı çok isteriz, işimizi nasıl iyileştirebileceğimizi, tamamlayabileceğimizi veya yenileyebileceğimizi ve sizin için daha iyi hale getirebileceğimizi bize bildirin. Bize e-posta sitesinde yazın