boş satır ekleme

[ozlem.cg]

excelde sıralanmış satır aralarına boş satır eklemek istiyorum nasıl yapabilirim.
Teşekkürederim.

 

[Ömer BARAN]

Merhaba.

Sol kenarda, bir sonraki satırın satır numarasına fareyle sağ tıklayıp EKLEyi seçmeniz yeterli olur.

 

[ozlem.cg]

yaklaşık bin satır verim var. bu verilerin arasına toplu halde boş satırlar eklemek istiriyorum. 1 satır veri- 1 satır boş-1 satır veri-bir satır boş gibi.. tek tek yapmayı biliyorum ama benim için toplu ekleme lazım formülle olabilir sanırım.

 

[Ömer BARAN]

Merhaba.

Alt taraftan ilgili sayfanın adına fareyle sağ tıklayıp KOD GÖRÜNTÜLEyi seçtiğinizde açılan VBA
ekranının sağa taragındaki boş alana aşağıdaki kod'u yapıştırın, sonra da VBA ekranındayken F5 tuşuna basın.
Kod'daki;
-- 8 sayısı boş satırın ekleneceği ilk satırın numarası,
-- B65536 kısmındaki B harfi de mutlaka veri olan sütun adıdır.
.

[FONT="Arial Narrow"]Sub SATIR_EKLE()
For brn = [[B][COLOR="red"]B65536[/COLOR][/B]].End(3).Row To [B][COLOR="blue"]8[/COLOR][/B] Step -1
    Rows(brn & ":" & brn).Insert Shift:=xlDown
Next
End Sub[/FONT]

 

[ozlem.cg]

Süper elinize sağlık.. teşekkürederim.

 

[Ömer BARAN]

Süper elinize sağlık.. teşekkürederim.

Eyvallah, iyi günler dilerim.