Range, sağdaki hücre!

[ali semerci]

Sub tarihat()


ActiveCell.FormulaR1C1 = Date
Application.OnKey "{F4}", "tarihat"


End Sub

--------------
bu macroda F4 tuşuna basınca günün tarihini atıyor. evet, bunu yapıyor lakin ben tarih atıldıktan sonra seçili hücrenin bir sağdaki hücre olmasını istiyorum. beceremiyorum .

Range("E3").Select değil, bir sağdaki hücre nasıl acaba?

 

[Levent Menteşoğlu]

Aşağıdaki şekilde deneyin.

[vb:1:b0eae56ab0]Sub tarihat()
ActiveCell.FormulaR1C1 = Date
Application.OnKey "{F4}", "tarihat"
ActiveCell.Offset(0, 1).Select
End Sub
[/vb:1:b0eae56ab0]

 

[ali semerci]

Çok teşekkür ederim. Sayın leventm elinize sağlık.