Satura rādītājs
ActiveWindow.WindowState
Ir trīs dažādi WindowSates darblapā var būt; Minimizēts, maksimizēts un normāls. Loga stāvokli varat iestatīt, izmantojot vienu no šīm koda rindām:
123456 | ActiveWindow.WindowState = xlMinimizedActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormal |
Un, protams, kad esat ieprogrammējis vizuālu elementu, varat iemest cilpu un izveidot “animētu efektu”. Sekojošais būtu interesants efekts, iespējams, atverot darblapu.
Šis makro pakāpeniski mainīs darblapas izmēru no mazas uz maksimizētu, tādējādi šķiet, ka darblapa pieaug:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | Sub SheetGrow ()Dim x kā vesels skaitlisAr ActiveWindow.WindowState = xlNormāli. Augšā = 1. Kreisais = 1.Augstums = 50. Platums = 50X = 50 līdz lietojumprogrammai. Izmantojams augstums.Augstums = xNākamais xX = 50 uz lietojumprogrammu. Izmantojams platums.Platums = xNākamais x.WindowState = xlMaksimizētsBeigt arBeigu apakš |