Başka sayfada seçili olan hücreye gitme

[skyhero34]

Merhabalar,

Aşağıdaki makro ile Sayfa 1 de iken herhangi bir hücreye çift tıkladığımda otomatik olarak PLAN sayfasına gidiyor. Fakat benim istediğim Sayfa 1 de çift tıkladığım hücre hangisi ise PLAN sayfasında o hücreye gitmesi. Bunu nasıl yapabilirim acaba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
sayfa = Target.Cells.Value
Sheets("PLAN").Select
End Sub

Şimdiden çok teşekkür ederim.

 

[antonio]

Dim sat As Long, sut As Long
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
sayfa = Target.Cells.Value

sat = Target.Row
sut = Target.Column

Sheets("PLAN").Select
Call adrese_git
End Sub
Sub adrese_git()
ActiveSheet.Cells(sat, sut).Select
End Sub

 

[Ömer BARAN]

Merhaba.

Alternatif.
.

[B]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)[/B]
    Sheets("PLAN").Activate
    Sheets("PLAN").Range(Target.Address(0, 0)).Activate
[B]End Sub[/B]

 

[merakli_72]

Selam,
Alternatif

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Application.Goto Sheets("Plan").Range(Target.Address)
End Sub

 

[skyhero34]

Tüm alternatifler sorunsuz çalıştı emeği geçen herkese teşekkür ederim..