Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9119 / 76732

←次へ　｜　前へ→


	【73179】Re:VBSでユーザーフォーム表示

亜矢 - 12/11/23(金) 4:04 -


	引用なし

	パスワード

▼ウッシさん：
>こんばんは
>
>Option explicit
>Dim objExcelApp, objExcelBook
>Dim Wshshell
>Set Wshshell = WScript.CreateObject("WScript.Shell")
>Set objExcelApp = CreateObject("Excel.Application")
>'ワークブックを開く
>With objExcelApp
>　 Set objExcelBook = .Workbooks.Open("P:\yu\Document\VBSでユーザーフォーム表示.xlsb", , 0)
>　 .Visible = 1
>　 Wshshell.AppActivate .Caption
>　 objExcelBook.RunAutoMacros 1　'xlAutoOpen
>End With
>Set Wshshell = Nothing
>
>これでどうでしょう？
ありがとうございました。.Visible=1 では問題なくできました。が・・・
最終目的は。.Visible=0ですが、この場合は解決されませんでした。
解決策を教えて頂きたいと思います。

0 hits

▼

【73172】VBSでユーザーフォーム表示 亜矢 12/11/22(木) 18:56