S5:S35 aralığındaki son dolu satır tesbiti?

[hsayar]

S5:S35 aralığındaki son dolu satır tesbiti nasıl olmalıdır?
A36:S36 satır aralığı toplam hanesidir

 

[veyselemre]

sonsat = Range("s36").End(3).Row
If sonsat < 5 Then sonsat = 5

 

[hsayar]

teşekkürler sn. veysel emre