• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

hücre secerken

Katılım
24 Ocak 2006
Mesajlar
4
s.a

herhangi bir sutunda ve herhangi bir hücreye tıkladıgımda o satırın B kolonundaki degeri almak istiyorum 2 gündür ugrasıyom ama olmadı acemilik herhalde.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

MsgBox Range(ActiveCell, ActiveCell.End(xlDown)).Value

End Sub


dogrusu ne olmalı

şimdiden teşekkür ederim...
 
Selectionchange olayını aşağıdaki gibi düzenleyin.

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

MsgBox cells(ActiveCell.row,"b")

End Sub
 
tesekkur ederim
bu sekilde kullandım işlem tamam

Cells(ActiveCell.Row, 2).Value

iyi çalışmalar
 
Geri
Üst