DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Activate()
Range("A1").Select
Application.EditDirectlyInCell = False
Application.SendKeys "{F2}"
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EditDirectlyInCell = True
End Sub