ActiveWindow.WindowState - VBA -kodeeksempler

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

Du vil bidra til utvikling av området, dele siden med vennene dine

wave wave wave wave wave