13 Ocak 2017 Cuma

Excel VBA - Son satırı bulmak

Excel VBA'da bir veri sayfasında son satırı bulmak, son satıra kadar işlem yapmak vb işlemler için çok gerekli olan bir şey. Son dolu satırı bulmak için:

Örneğin B2 den başlayıp ( ya da başka bir hücreden) son satıra kadar olan satır sayısını bulmak için:

Sheets("FC").Range("b2").End(xlDown).Row

ya da 

Sheets(1).Range("b2").End(xlDown).Row

Örnek:

For satir = 2 To wb1.Sheets(1).Range("b2").End(xlDown).Row

ThisWorkbook.Sheets("Sayfa1").ComboBox1.AddItem wb1.Sheets(1).Cells(satir, 2).Value

Next


Hiç yorum yok:

Yorum Gönder