[Excel07] Shortcut για μονό αριστερό κλικ στο Excel

[ΓιάννηςΔ]

Υπάρχει τρόπος από το πληκτρολόγιο να αντικαταστήσω το αριστερό κλικ του mouse με πληκτρολόγηση. Προκειται για κελιά στα οποία έχω βάλει hyperlinks και θέλω να κινούμαι κατευθείαν μέσω από το πληκτρολόγο

[Tasos]

Μεταφέρσου με ALT+F11 στον VBE.

Κάνε διπλό κλικ στο "ThisWorkbook" και στο παράθυρο δεξιά πέρασε το παρακάτω:

Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.OnKey "%{UP}"
End Sub

Private Sub Workbook_Open()
    Application.OnKey "%{UP}", "FollowLink"
End Sub

Σε μια κοινή λειτουργική μονάδα (Μενού "Insert>Module") πέρασε το παρακάτω:

Option Explicit

Sub FollowLink()
    If ActiveCell.Hyperlinks.Count Then
        ActiveCell.Hyperlinks(1).Follow False, True
    End If
End Sub

Επανεκκίνησε το αρχείο και δοκίμασε χρησιμοποιώντας το συνδυασμό ALT+UP (το βελάκι προς τα επάνω) .

Οι ρυθμίσεις του κέντρου αξιοπιστίας πρέπει να επιτρέπουν την εκτέλεση κώδικα για να λειτουργήσουν τα παραπάνω.

[ΓιάννηςΔ]

thanks!!
Λειτούργησε!