実行時バインディングSub Test() Dim MyExcel As Object Set MyExcel = CreateObject("Excel.Application") MyExcel.Visible = True MyExcel.workbooks.Add MyExcel.ActiveWorkbook.Sheets(2).select MyExcel.Quit Set MyExcel =
Chabin の Access VBA ノート