Spisie treści
ActiveWindow.WindowState
Są trzy różne OknaSate że arkusz może mieć; Zminimalizowany, Zmaksymalizowany i Normalny. Możesz ustawić stan okna za pomocą jednego z tych wierszy kodu:
| 123456 | ActiveWindow.WindowState = xlZminimalizowaneActiveWindow.WindowState = xlMaximizedActiveWindow.WindowState = xlNormal |
I oczywiście, kiedy już zaprogramujesz element wizualny, możesz wrzucić pętlę i stworzyć „efekt animowany”. Poniższy byłby interesującym efektem, prawdopodobnie przy odkrywaniu arkusza roboczego.
To makro będzie stopniowo zmieniać rozmiar arkusza roboczego z małego na zmaksymalizowany, przez co arkusz wydaje się rosnąć:
| 12345678910111213141516171819202122232425262728293031323334353637383940414243 | PodArkuszRozw.()Dim x As IntegerZ ActiveWindow.WindowState = xlNormalGóra = 1.W lewo = 1.Wysokość = 50.Szerokość = 50Dla x = 50 To Application.UsableHeight.Wysokość = xNastępny xDla x = 50 To Application.UsableWidth.Szerokość = xNastępny x.WindowState = xlMaximizedKończyć zNapis końcowy |
