Vba: bir aralıktan satır numarası nasıl alınır

VBA kullanarak Excel’deki bir aralıktan satır numarası almak için aşağıdaki yöntemleri kullanabilirsiniz:

Yöntem 1: Belirli bir aralıktan satır numarasını alın

 SubGetRowNumber ()

rowNum = Range(" D7 ").Row
MsgBox rowNum

End Sub

Bu özel makro, D7 hücresine karşılık gelen satır numarasının (7) olduğu bir mesaj kutusu görüntüler.

Yöntem 2: Şu anda seçili olan aralığın satır numarasını alın

 SubGetRowNumber ()

rowNum = Selection.Row
MsgBox rowNum

End Sub

Bu özel makro, Excel’de seçili aralığa karşılık gelen satır numarasını içeren bir mesaj kutusu görüntüler.

Örneğin bu makroyu çalıştırdığınızda B3 hücresi seçilirse 3 değerini içeren bir mesaj kutusu görünecektir.

Aşağıdaki örnekler her yöntemin pratikte nasıl kullanılacağını göstermektedir.

Örnek 1: Belirli bir aralıktan satır numarasını alın

Diyelim ki D7 hücre referansı için satır numarasını almak istiyoruz.

Bunun için aşağıdaki makroyu oluşturabiliriz:

 SubGetRowNumber ()

rowNum = Range(" D7 ").Row
MsgBox rowNum

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Mesaj kutusu, D7 hücre referansının satır numarasına karşılık gelen 7 değerini görüntüler.

Örnek 2: Şu anda seçili olan aralığın satır numarasını alın

Şu anda aktif olan hücrenin satır numarasını almak istediğimizi varsayalım.

Bunun için aşağıdaki makroyu oluşturabiliriz:

 SubGetRowNumber ()

rowNum = Selection.Row
MsgBox rowNum

End Sub

Şu anda B3 hücresinin seçili olduğunu varsayalım.

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Mesaj kutusu, B3’ün o anda etkin olan hücresinin satır numarasına karşılık gelen 3 değerini görüntüler.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Aralıktaki satır sayısı nasıl sayılır?
VBA: Görünür satırlar başka bir sayfaya nasıl kopyalanır
VBA: Çizgiler nasıl vurgulanır