ActivateMicrosoftApp

構文
Application.ActivateMicrosoftApp( Index )
引数
Index
XlMSApplication
戻値

XlMSApplication

名前 説明
xlMicrosoftAccess 4 Microsoft Office Access
xlMicrosoftFoxPro 5 Microsoft FoxPro
xlMicrosoftMail 3 Microsoft Office Outlook
xlMicrosoftPowerPoint 2 Microsoft Office PowerPoint
xlMicrosoftProject 6 Microsoft Office Project
xlMicrosoftSchedulePlus 7 Microsoft Schedule Plus
xlMicrosoftWord 1 Microsoft Office Word

プログラム実行例

ExcelからWordを起動する

CONST xlMicrosoftWord = 1 DIM Excel = CREATEOLEOBJ("Excel.Application") Excel.Visible = TRUE // Wordを起動 Excel.Application.ActivateMicrosoftApp(xlMicrosoftWord) DIM ID = GETID("Microsoft Word", "OpusApp") SLEEP(5.000) // Wordを閉じる CTRLWIN(ID, CLOSE) Excel.Quit