ActiveWindow.WindowState - VBA-codevoorbeelden

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

U zal helpen de ontwikkeling van de site, het delen van de pagina met je vrienden

wave wave wave wave wave