ActiveCell'de F2 ve Enter Yap Makrosu

[baydeniro]

Merhaba Arkadaşlar. Şu şekilde bir makro olur mu ?

Hangi hücrede ise o hücre de F2 ve Enter yapmayı saplayan bir makro olur mu ?

 

[Levent Menteşoğlu]

Aşağıdaki gibi deneyin.

SendKeys "{F2}"
SendKeys "{enter}"

 

[baydeniro]

Sayın Levent Menteşoğlu çok çok teşekkür ederim. Bu kod nasıl yardımcı oldu bilemezsiniz. Sağlıcakla kalın.

 

[baydeniro]

Arkadaşlar. SendKeys "{enter}" kodunun "bulunulan hücrenin 1 sağındaki hücreye git" komutu var mıdır ?

 

[Korhan Ayhan]

Selamlar,

Serdar bey,

Aşağıdaki şekilde kullanabilirsiniz.

Option Explicit
 
Sub AUTO_OPEN()
    Application.OnKey "~", "SAĞA_GİT"
    Application.OnKey "{ENTER}", "SAĞA_GİT"
End Sub
 
Sub SAĞA_GİT()
    ActiveCell.Next.Select
End Sub

 

[janveljan]

Arkadaşlar. SendKeys "{enter}" kodunun "bulunulan hücrenin 1 sağındaki hücreye git" komutu var mıdır ?

Muhtemelen biliyorsunuzdur ancak hatırlatmak istedim. Araçlar/Seçenekler/Düzen den Seçimi enter tuşundan sonra taşı kısmından yön seçimi yapılabiliyor. Kodlarıda aşağıdaki gibi

    Application.MoveAfterReturnDirection = xlToRight
    Application.MoveAfterReturnDirection = xlDown

 

[baydeniro]

Çok teşekkür ederim sayın janveljan.