Satırdaki ilk boş satırın satır sayısını buldurmak

[Deniz_Excel]

Merhabalar,

Aşağıdaki kod ile son boş satırı bulabiliyoruz.
Sheet1.Cells(Rows.Count, "A").End(xlUp).Row + 1

Ancak benim buldurmak istediğim boşluklu yapıda olan bir satırda ilk boş satırın satır numarası.

VBA da nasıl kodlarız?

 

[Haluk]

Sheet1.Cells(1, "A").End(xlDown).Row + 1

.

 

[YUSUF44]

"Satırdaki ilk boş satır" değil de "sütundaki ilk boş satır" numarasını istiyorsunuz muhtemelen. Aşağıdaki kodu deneyin:

Set a = [A:A].Find("")
If Not a Is Nothing Then sat = a.Row

 

[Deniz_Excel]

Merhaba cevaplar için teşekkürler. Ben istediğim sonucu aşağıdaki fonksiyonla elde ettim. Bilginize.

Function FindFirstEmpty(i As Long)
i = 1
While Sayfa1.Cells(i, 1).Value <> ""
i = i + 1
Wend

FindFirstEmpty = i

End Function

 

[Haluk]

Verilen cevaplar yetersiz miydi?

.

 

[Necdet]

Verilen cevaplar yetersiz miydi?

.

Arkadaşımız uzun yolu tercih etmiş görünüyor