Son Dolu Satıra Kadar işlem yapma ve Alan Ekleme

[Tarikkk_]

merhabalar. bir makromda aşağıdaki kodu kullanmaktayım bu koda göre C6:C100000 satırına kadar işlem yapabilmekteyim ben bunun yerine ilerde tablom C100000 satırı aştığında sorun yaşamamak için C6 dan başlayarak C son dolu satıra kadar işlem yapmak istiyorum. bunun pratik bir yolu varsa öğrenebilir miyim.
şimdiden çok teşekkür ederim.

Worksheets("ÜRÜNLER").Range("C6:C100000").Replace veri, Target, xlWhole

2. sorum
alttaki koda göre B ve C ve D sütunları Boş ise yerine 3 Hücreyi birleştirerek and kullanmadan tek formülde kullanabilirmiyiz.

If Range("B" & Satır) = "" And Range("C" & Satır) = "" And Range("D" & Satır) = "" Then

şimdiden çok teşekkür ederim

 

[leguminosea]

Deneyiniz.
1.

SonSat = Worksheets("ÜRÜNLER").Range("C" & Rows.Count).End(xlUp).Row
Worksheets("ÜRÜNLER").Range("C6:" & SonSat).Replace veri, Target, xlWhole

2.

a = WorksheetFunction.Sum(Range("B" & Satır & ":D" & Satır))
If a = 0 Then

 

[Tarikkk_]

Deneyiniz.
1.

SonSat = Worksheets("ÜRÜNLER").Range("C" & Rows.Count).End(xlUp).Row
Worksheets("ÜRÜNLER").Range("C6:" & SonSat).Replace veri, Target, xlWhole

2.

a = WorksheetFunction.Sum(Range("B" & Satır & ":D" & Satır))
If a = 0 Then

çok teşekkür ederim