Inhaltsverzeichnis
ActiveWindow.WindowState
Es gibt drei verschiedene WindowsSates die ein Arbeitsblatt haben kann; Minimiert, Maximiert und Normal. Sie können den Fensterstatus mit einer dieser Codezeilen festlegen:
123456 | ActiveWindow.WindowState = xlMinimizedActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormal |
Und natürlich können Sie, sobald Sie ein visuelles Element programmieren können, eine Schleife einfügen und einen „animierten Effekt“ erstellen. Der folgende Effekt wäre möglicherweise ein interessanter Effekt beim Einblenden eines Arbeitsblatts.
Dieses Makro ändert die Größe eines Arbeitsblatts nach und nach von klein auf maximiert, sodass das Arbeitsblatt zu wachsen scheint:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | UnterblattGrow()Dim x As IntegerMit ActiveWindow.WindowState = xlNormal.Oben = 1.Links = 1.Höhe = 50.Breite = 50Für x = 50 To Application.UsableHeight.Höhe = xNächstes xFür x = 50 To Application.UsableWidth.Breite = xNächstes x.WindowState = xlMaximizedEnde mitEnd Sub |