vba da kaçıncı satır

[heft]

Merhaba
hangi hücre seçiliyse onun kaçıncı satır olduğunu vba da nasıl tanımlarım?

Ör:A16 seçili ise 16 yı hangi kodla nasıl bulurum=

 

[schahi]

MsgBox ile getirmek isterseniz, çalışma sayfasının SelectionChange yordamına,MsgBox (Target.Row) yazabilirsiniz.
Münferit bir hücreye örneğin("A1") hücresine yazdırmak isterseniz, Range("A1").Value = Target.Row yazabilirsiniz.

 

[heft]

yok olmuyor
ListBox1.ListIndex = ? + 1 "?" yerine kaçıncı satır olduğunu yazdırtmam lazım tam olarak.

 

[fireman64]

TextBox1 = ListBox1.ListIndex

 

[heft]

Amacım şu;
eğer a7 hücresi seçiliyse listbox1 de 7.satır seçilsin
eğer a17 hücresi seçiliyse listbox1 de 17.satır seçilsin

bu yüzden olmuyor fireman64,teşekkürler yine de.

 

[Orion1]

Buyurun.

ListBox1.ListIndex = ActiveCell.Row - 1