Excel VBA質問箱 IV

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

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


9120 / 76732 ←次へ | 前へ→

【73178】Re:VBSでユーザーフォーム表示
回答  ウッシ  - 12/11/22(木) 23:03 -

引用なし
パスワード
   こんばんは

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

これでどうでしょう?
0 hits

【73172】VBSでユーザーフォーム表示 亜矢 12/11/22(木) 18:56 質問
【73178】Re:VBSでユーザーフォーム表示 ウッシ 12/11/22(木) 23:03 回答
【73179】Re:VBSでユーザーフォーム表示 亜矢 12/11/23(金) 4:04 質問
【73180】Re:VBSでユーザーフォーム表示 ウッシ 12/11/23(金) 7:40 回答
【73181】Re:VBSでユーザーフォーム表示 亜矢 12/11/23(金) 9:02 お礼
【73182】Re:VBSでユーザーフォーム表示 UO3 12/11/23(金) 10:16 発言
【73185】Re:VBSでユーザーフォーム表示 ウッシ 12/11/23(金) 11:17 回答
【73183】Re:VBSでユーザーフォーム表示 UO3 12/11/23(金) 10:43 発言
【73184】Re:VBSでユーザーフォーム表示 UO3 12/11/23(金) 11:15 発言
【73186】Re:VBSでユーザーフォーム表示 亜矢 12/11/23(金) 12:36 お礼

9120 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free