Enter

Katılım
23 Ekim 2007
Mesajlar
1,135
Excel Vers. ve Dili
Excel 2003 TR
Entere basınca E50 den J6 -ya ve J50 den O6 -ya nasıl yönlendiririm.
 
Katılım
23 Ekim 2007
Mesajlar
1,135
Excel Vers. ve Dili
Excel 2003 TR
Yapmak istediğim şu işem E48 gelince entere basınca J6 hücre aktivleşecek ve J48 gelince işlem bitikten sonra O6 aktiv olacak,ama bu kodlar hata veriyor hatam nerede.Yardımcı olana teşekürler.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$e$48" Then
Range("j6").Select
End If
End Sub
 
Son düzenleme:
Katılım
5 Nisan 2007
Mesajlar
89
Excel Vers. ve Dili
2007
Uğraştırdı biraz ama büyük harfle yazmak bende sorunu çözdü :)
If Target.Address = "$E$48" Then
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = "$E$50" And Target <> "" Then [$J$6].Select
If Target.Address = "$J$50" And Target <> "" Then [$O$6].Select
End Sub
.
 
Katılım
23 Ekim 2007
Mesajlar
1,135
Excel Vers. ve Dili
Excel 2003 TR
İlgi ve yardımlarınıza teşekürler ederim, iyi olmuş
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Rica ederim,

İyi çalışmalar...
 
Üst