alttaki boşluklara üsttekikoplayabileceğim döngü nasıl

[lordlegolas]

dosyada d sütununnda bulunan atölye isimlerini aşağıya doğru bir diğer isim gelinceye kadar kopyalamak istiyorum dosya çok büyük ve bir makro ile yapabilirmiyiz yani son hali sheet 2 deki gibi olsun istiyorum nasıl yapabilirim kod konusunda yardımcı olursanız sevinirim. yeniyim belki de yeni bir topik açmamalıydım ama en kısa zamanda öğrenip bu işi hatamı affettireceğim

 

[Levent Menteşoğlu]

Sizin dosyanıza göre hazırladığım aşağıdaki kodu deneyin.
[vb:1:dda418b4be]Sub boslukdoldur()
For a = 8 To Cells(65536, 5).End(xlUp).Row
If Cells(a, 4) = "" Then Cells(a, 4) = Cells(a - 1, 4)
Next
End Sub
[/vb:1:dda418b4be]

yeniyim belki de yeni bir topik açmamalıydım ama en kısa zamanda öğrenip bu işi hatamı affettireceğim

Eğer aynı tipte başka başlık yoksa kurallarımız gereği zaten uygun tanımlama ile yeni bir başlık açmanız gerekirdi. Siz doğru olanı yaptınız teşekkür ediyorum.

 

[lordlegolas]

çok saol teşekkür ederim süper site..