[kapetang]

Καλησπέρα

Διονύση, για να υλοποιήσουμε το ζητούμενο, θα μπορούσαμε να ορίσουμε την ιδιότητα ScrollArea του φύλλου στην επιθυμητή περιοχή (ScrollArea ="$A$1:$Y$60").

Αυτό μπορεί να γίνει μέσω του φύλλου ιδιοτήτων κάθε φύλλου εργασίας, αλλά, επειδή η ιδιότητα δεν αποθηκεύεται όταν κλείνουμε το βιβλίο, κάθε φορά που το ανοίγουμε θα πρέπει να την ορίζουμε ξανά.

Για την αυτοματοποίηση της διαδικασίας απαιτείται κώδικας που θα ορίζει την ιδιότητα ScrollArea κάθε φορά που θα ανοίγει το βιβλίο εργασίας.

Για το φύλλο1 ο κώδικας είναι:

Private Sub Workbook_Open()
Worksheets("Φύλλο1").ScrollArea = "$A$1:$Y$60"
End Sub

Δες και το επισυναπτόμενο αρχείο

Φιλικά/Γιώργος