
09-06-17, 17:04
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 22-11-2011 Περιοχή: Αθήνα
Μηνύματα: 2.321
| |
Η μετάβαση (navigate), στα φύλλα ενός βιβλίου, γίνεται με Ctrl + PageUp ή Ctrl + PageDown.
Αν βάλουμε στο Workbook, αυτό: Κώδικας: Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveSheet.Cells(3, 10).Select
End Sub με την είσοδο στο φύλλο, θα είναι πάντα επιλεγμένο, πχ το κελί J3
Αν δεν θέλουμε η επιλογή να είναι ίδια για όλα τα φύλλα,
ή θέλουμε να εξαιρεθούν κάποια φύλλα, τροποποιούμε τον κώδικα ανάλογα
ή βάζουμε σε κάθε φύλλο, στο Activate, την γραμμή: Κώδικας: Me.Cells(x, y).Select
Όπου x,y οι συντεταγμένες των κελιών...
*Ισχύει για .xlsm ή άλλες extensions, που δέχονται κώδικα
|