Σε αυτό το άρθρο θα μάθουμε πώς να ενεργοποιήσετε τη λειτουργία πλήρους οθόνης και να απενεργοποιήσετε το κουμπί αλλαγής μεγέθους παραθύρου χρησιμοποιώντας το VBA.
Λογική εξήγηση
Δημιουργήσαμε τη μακροεντολή "ActivatingFullScreen" για να αλλάξουμε την ιδιότητα της εφαρμογής Excel για να ενεργοποιήσουμε τη λειτουργία πλήρους οθόνης.
Χρησιμοποιήσαμε το συμβάν αλλαγής μεγέθους παραθύρου του βιβλίου εργασίας για να απενεργοποιήσουμε το κουμπί αλλαγής μεγέθους παραθύρου.
Επεξήγηση κώδικα
Application.DisplayFullScreen = True
Ορίσαμε την ιδιότητα DisplayFullScreen της εφαρμογής σε True για να ενεργοποιήσουμε τη λειτουργία πλήρους οθόνης.
Wn.WindowState = xlMaximized
Ορίσαμε την ιδιότητα WindowState του παραθύρου του Excel σε xlMaximized για να αποτρέψουμε την επιστροφή του παραθύρου στο κανονικό του μέγεθος.
Ακολουθήστε παρακάτω για τον κωδικό
Option Explicit Sub ActivatingFullScreen () 'Ενεργοποίηση εφαρμογής πλήρους οθόνης.DisplayFullScreen = True End Sub' Εισαγάγετε τον παρακάτω κώδικα σε αυτήν την ενότητα βιβλίου εργασίας Private Sub Workbook_WindowResize (ByVal Wn As Window) 'Αλλαγή κατάστασης παραθύρου σε μέγιστο μέγεθος Wn.WindowState = xlMaximized Application.DisplayFull Τέλος υπο
Αν σας άρεσε αυτό το blog, μοιραστείτε το με τους φίλους σας στο Facebook. Επίσης, μπορείτε να μας ακολουθήσετε στο Twitter και το Facebook.
Θα θέλαμε πολύ να σας ακούσουμε, ενημερώστε μας πώς μπορούμε να βελτιώσουμε το έργο μας και να το κάνουμε καλύτερο για εσάς. Γράψτε μας στον ιστότοπο email