Ö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
Ö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