Inhoudsopgave
ActiveWindow.WindowState
Er zijn drie verschillende VensterSates die een werkblad kan hebben; Geminimaliseerd, Gemaximaliseerd en Normaal. U kunt de vensterstatus instellen met een van deze coderegels:
123456 | ActiveWindow.WindowState = xlMinimizedActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormaal |
En natuurlijk, als je eenmaal een visueel element kunt programmeren, kun je een lus maken en een "geanimeerd effect" creëren. Het volgende zou een interessant effect kunnen zijn bij het zichtbaar maken van een werkblad.
Met deze macro wordt het formaat van een werkblad geleidelijk gewijzigd van klein naar Gemaximaliseerd, waardoor het lijkt alsof het werkblad groeit:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | SubbladGroei()Dim x als geheel getalMet ActiveWindow.WindowState = xlNormaal.Boven = 1.Links = 1.Hoogte = 50.Breedte = 50Voor x = 50 Naar toepassing. Bruikbare hoogte.Hoogte = xVolgende xVoor x = 50 Naar toepassing. Bruikbare breedte.Breedte = xVolgende x.WindowState = xlGemaximaliseerdEindigt metEinde sub |