ActiveWindow.WindowState - Παραδείγματα κώδικα VBA

Πίνακας περιεχομένων

ActiveWindow.WindowState

Υπάρχουν τρία διαφορετικά WindowSates που μπορεί να έχει ένα φύλλο εργασίας. Ελαχιστοποιημένο, Μεγιστοποιημένο και Κανονικό. Μπορείτε να ορίσετε την κατάσταση παραθύρου με μία από αυτές τις γραμμές κώδικα:

123456 ActiveWindow.WindowState = xlΕλάχιστοActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormal

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

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

12345678910111213141516171819202122232425262728293031323334353637383940414243 Sub SheetGrow ()Dim x ως ακέραιοςΜε το ActiveWindow.WindowState = xlNormal. Κορυφή = 1. Αριστερά = 1. Ightψος = 50.Πλάτος = 50Για x = 50 στην εφαρμογή. UsableHeight. Ightψος = xΕπόμενο xΓια x = 50 στην εφαρμογή.UsableWidth.Πλάτος = xΕπόμενο x.WindowState = xlMaximizedΤέλος μεΤέλος υπο

Θα βοηθήσει στην ανάπτυξη του τόπου, μοιράζονται τη σελίδα με τους φίλους σας

wave wave wave wave wave