アプリ版:「スタンプのみでお礼する」機能のリリースについて

エクセルのファイルを開いて、タスクバーに最小化してあります。
これをvbscriptからデスクトップに再表示するにはどうすればいいのでしょうか。
Application.WindowState=xlNomal などは使えないようなのですが。

よろしくお願いします。

A 回答 (1件)

>vbscriptから


なので Application は使えないです。
また、 xlNomal はExcelの定数なので使えないです。(Constで設定すれば別ですが)

ゆえに
GetObject(, "excel.application").WindowState = -4143
とか

Const xlNormal = -4143
Dim xl
On Error Resume Next
Set xl = GetObject(, "excel.application")
If Err.Number <> 0 Then
WScript.Quit
End If
On Error GoTo 0
xl.WindowState = xlNormal
Set xl = Nothing

などで。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!