excel vba yardım

Kodla Büyü

sertokus

Süper Üye
Süper Üye
Mesajlar
2,350
sonsatir = Sheets("BİLGİLER").Cells(65536, "c").End(xlUp).Row

For Each hucre In [D4:AH33]
hucre.Value = "-"
Next

Yukarıdaki formül çalışıyor. Ama benim AH33 değil de AH(sonsatir) a ihtiyacım var.
Bunu nasıl yaparım.
 
Bu konuyu çok iyi anlatan bir web sitesi var mı takip etmek istiyorum.
İşlem tablosu programlama dersim var
 
Sub Deneme()
sonsatir = Sheets("BİLGİLER").Cells(65536, "c").End(xlUp).Row
Range("DH4:AH" & sonsatir)= "-"
End Sub

Burda döngüye gerek yok.
 
Geri
Üst