Innholdsfortegnelse
ActiveWindow.WindowState
Det er tre forskjellige WindowSates som et regneark kan ha; Minimalisert, maksimalisert og normal. Du kan angi vindustatus med en av disse kodelinjene:
123456 | ActiveWindow.WindowState = xlMinimizedActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormal |
Og selvfølgelig, når du kan programmere et visuelt element, kan du kaste inn en sløyfe og lage en "animert effekt". Følgende ville være en interessant effekt muligens når du avslører et regneark.
Denne makroen vil gradvis endre størrelsen på et regneark fra lite til maksimert, slik at regnearket ser ut til å vokse:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | Sub SheetGrow ()Dim x Som heltallMed ActiveWindow.WindowState = xlNormal.Topp = 1. Venstre = 1. Høyde = 50.Bredde = 50For x = 50 Til Application.UsableHeight. Høyde = xNeste xFor x = 50 Til Application.UsableWidth.Bredde = xNeste x.WindowState = xlMaximizedSlutt medSlutt Sub |