Sadržaj
ActiveWindow.WindowState
Postoje tri različite WindowSates koji radni list može imati; Umanjeno, povećano i normalno. Stanje prozora možete postaviti jednim od ovih redaka koda:
123456 | ActiveWindow.WindowState = xlMinimizedActiveWindow.WindowState = xlUvećanoActiveWindow.WindowState = xlNormalno |
I naravno, nakon što možete programirati vizualni element, možete ubaciti petlju i stvoriti "animirani efekt". Sljedeće bi moglo biti zanimljivo ako otkrijete radni list.
Ovaj će makro postupno mijenjati veličinu radnog lista od malog do povećanog, čineći da radni list raste:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | Sub SheetGrow ()Dim x kao cijeli brojS aktivnim prozorom.WindowState = xlNormalno.Top = 1.Lijevo = 1.Visina = 50.Širina = 50Za x = 50 Za primjenu.UsableHeight.Visina = xSljedeći xZa x = 50 Za primjenu.UsableWidth.Širina = xSljedeći x.WindowState = xlUvećanoZavrši sKraj podm |