2022年5月
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29 30 31        
無料ブログはココログ

« CScript.exe強制実行 | トップページ | すべてのウィンドウを元のサイズに戻す。その3 »

2007年5月21日 (月)

すべてのウィンドウを元のサイズに戻す。その2

もしWord 2002以降があれば、簡単です。でも、Wordって、遅いぃーっ。

RestoreAllWindows.VBS

Set Word=CreateObject("Word.Application")
For Each Task In Word.Tasks
  If Task.Visible Then If Task.WindowState=2 Then Task.WindowState=0
Next

« CScript.exe強制実行 | トップページ | すべてのウィンドウを元のサイズに戻す。その3 »