Είναι ένα σημαντικό θέμα για όλους μας, ενώ εργαζόμαστε με VBA στο Excel, για να απενεργοποιήσετε την ενημέρωση της οθόνης. Σε αυτό το άρθρο, θα σας δείξω πώς μπορείτε να απενεργοποιήσετε την ενημέρωση της οθόνης χρησιμοποιώντας VBA στο Excel.

Excel VBA: Απενεργοποίηση ενημέρωσης οθόνης (Γρήγορη προβολή)

 Sub Turn_Off_Screen_Update() Application.ScreenUpdating = False Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count Count Count = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub 

Κατεβάστε το βιβλίο ασκήσεων

Κατεβάστε αυτό το τετράδιο ασκήσεων για να εξασκηθείτε ενώ διαβάζετε αυτό το άρθρο.

Επισκόπηση για την απενεργοποίηση της ενημέρωσης οθόνης χρησιμοποιώντας το Excel VBA

Για να απενεργοποιήσετε την ενημέρωση οθόνης χρησιμοποιώντας VBA Για να πούμε την αλήθεια, μόνο μια γραμμή είναι αρκετή για να το πετύχουμε αυτό.

 Application.ScreenUpdating = False 

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

 Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count Count Count = Count + 1 Next j Next i 

Αυτές οι γραμμές εισάγουν μια σειρά από 1 έως 100.000 στο ενεργό φύλλο, ξεκινώντας από το κελί A1 Αν το κάνετε χωρίς ενημέρωση της οθόνης, θα πάρει πολύ χρόνο. Επειδή κάθε φορά που εισάγει έναν αριθμό στο επόμενο κελί, ενημερώνεται και το προηγούμενο κελί.

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

Στη συνέχεια, αν το επιθυμείτε, μπορείτε να ενεργοποιήσετε ξανά την ενημέρωση οθόνης.

 Application.ScreenUpdating = True 

Έτσι η πλήρης VBA ο κωδικός θα είναι:

⧭ Κωδικός VBA:

 Sub Turn_Off_Screen_Update() Application.ScreenUpdating = False Count = 1 For i = 1 To 100 For j = 1 To 100 ActiveSheet.Cells(i, j) = Count Count Count = Count + 1 Next j Next i Application.ScreenUpdating = True End Sub 

Διαβάστε περισσότερα: [Διορθωμένο!] Τα κελιά του Excel δεν ενημερώνονται εκτός αν κάνετε διπλό κλικ (5 λύσεις)

Παρόμοιες αναγνώσεις

• Πώς να ανανεώσετε αυτόματα το φύλλο του Excel (3 κατάλληλες μέθοδοι)
• Πώς να ενημερώνετε αυτόματα έναν πίνακα Pivot όταν αλλάζουν τα δεδομένα πηγής
• Ο πίνακας Pivot δεν ανανεώνεται (5 ζητήματα & λύσεις)
• Πώς να ανανεώσετε αυτόματα τον πίνακα Pivot χωρίς VBA στο Excel (3 έξυπνες μέθοδοι)

Ανάπτυξη της μακροεντολής για την απενεργοποίηση της ενημέρωσης οθόνης χρησιμοποιώντας το Excel VBA

Είδαμε την ανάλυση του κώδικα βήμα προς βήμα για την απενεργοποίηση της ενημέρωσης οθόνης χρησιμοποιώντας VBA στο Excel. Τώρα θα δούμε πώς μπορούμε να αναπτύξουμε ένα Μάκρο για να το εκτελέσετε αυτό.

⧪ Βήμα 1: Άνοιγμα του παραθύρου VBA

Τύπος ALT + F11 στο πληκτρολόγιό σας για να ανοίξετε το Visual Basic παράθυρο.

⧪ Βήμα 2: Εισαγωγή νέας ενότητας

Πηγαίνετε στο Εισαγωγή> Ενότητα στη γραμμή εργαλείων. Κάντε κλικ στο Ενότητα Μια νέα ενότητα που ονομάζεται Ενότητα1 (ή οτιδήποτε άλλο ανάλογα με το ιστορικό σας) θα ανοίξει.

⧪ Βήμα 3: Τοποθέτηση του κώδικα VBA

Αυτό είναι το πιο σημαντικό βήμα. VBA κώδικα στην ενότητα.

⧪ Βήμα 4: Εκτέλεση του κώδικα

Κάντε κλικ στο Εκτέλεση Sub \ UserForm από την παραπάνω γραμμή εργαλείων.

Ο κώδικας θα εκτελεστεί. Και θα δείτε μια σειρά αριθμών από το 1 έως το 1.00.000 να δημιουργείται γρήγορα στο φύλλο εργασίας σας, η οποία διαφορετικά θα χρειαζόταν πολύ χρόνο για να εκτελεστεί.

Διαβάστε περισσότερα: [Λύθηκε]: Οι τύποι του Excel δεν ενημερώνονται μέχρι την αποθήκευση (6 πιθανές λύσεις)

Πράγματα που πρέπει να θυμάστε

Δεν χρειάζεται να κάνετε την ίδια εργασία με μένα μετά την απενεργοποίηση της ενημέρωσης οθόνης. Μπορείτε να κάνετε ό,τι είναι η συνήθης εργασία σας. Αλλά το θέμα είναι ότι δεν θα καταλάβετε το αποτέλεσμα της απενεργοποίησης της ενημέρωσης οθόνης αν δεν κάνετε μια μεγάλη σειρά εργασιών. Γι' αυτό δημιούργησα μια σειρά από το 1 έως το 1.00.000.

Συμπέρασμα

Ως εκ τούτου, αυτή είναι η διαδικασία για την ανάπτυξη ενός Μάκρο για να απενεργοποιήσετε την ενημέρωση οθόνης χρησιμοποιώντας το Excel VBA Έχετε οποιεσδήποτε ερωτήσεις; Μη διστάσετε να μας ρωτήσετε. Και μην ξεχάσετε να επισκεφθείτε τον ιστότοπό μας ExcelWIKI για περισσότερες αναρτήσεις και ενημερώσεις.