VBSとVBAでそれぞれツールを作っていたのですが、 両方とも一度に実行したいと思い、VBSからVBAを呼ぶ事にしてみました。 VBSでVBAのマクロ呼び出しのボタンを押下し、保存するところまでを行います。 ExcelのApplicationオブジェクトである「Excel.Application」のオブジェクトを作成します。 Dim ExcelApp Dim ExcelBook Dim FilePath FilePath = "ExcelVba.xls" Set ExcelApp = CreateObject("Excel.Application") Set ExcelBook = ExcelApp.Workbooks.Open(FilePath) ExcelApp.ActiveWorkbook.Worksheets("マクロ呼び出しのボタンのあるシート名").select ExcelAp