İçindekiler
ActiveWindow.WindowState
üç farklı var pencere uyduları bir çalışma sayfasının sahip olabileceği; Küçültülmüş, Büyütülmüş ve Normal. Pencere durumunu şu kod satırlarından biriyle ayarlayabilirsiniz:
123456 | ActiveWindow.WindowState = xlMinimize EdildiActiveWindow.WindowState = xlMaximize EdildiActiveWindow.WindowState = xlNormal |
Ve elbette, görsel bir öğeyi programladıktan sonra bir döngüye atabilir ve bir “animasyon efekti” yaratabilirsiniz. Aşağıdaki, muhtemelen bir çalışma sayfasını gösterirken ilginç bir etki olacaktır.
Bu makro, çalışma sayfasını küçükten Büyütülmüş'e kademeli olarak yeniden boyutlandırarak çalışma sayfasının büyüyormuş gibi görünmesini sağlar:
12345678910111213141516171819202122232425262728293031323334353637383940414243 | Alt SayfaGrow()Dim x Tamsayı OlarakActiveWindow ile.WindowState = xlNormal.Üst = 1.Sol = 1.Yükseklik = 50.Genişlik = 50x = 50 To Application.UsableHeight için.Yükseklik = xSonraki xx = 50 için Application.UsableWidth.Genişlik = xSonraki x.WindowState = xlMaximize Edilmişİle bitmekAlt Bitiş |