操作できます。 VBEの参照設定でMicrosoft Excel ?.? ObjectLibrary(バージョン不明なので)にチェックを入れます。 Private Sub Cmd1_Click() On Error Resume Next Dim objExcelApp As Workbook Dim strExcelFile As String Dim strExcelSheet As String strExcelFile = "C:\test.xls" 'エクセルのファイル名 strExcelSheet = "sheet1" 'ブックのシート名 Set objExcelApp = GetObject(strExcelFile, "Excel.Sheet") '※Excelの指定セルに値を代入する場合 strExcelSheet.Cells(1, 1).Value = "12" '※
![AccessからExcelの出力について](https://cdn-ak-scissors.b.st-hatena.com/image/square/ea4901b03391bb13a3b960b156f47c2763edd364/height=288;version=1;width=512/https%3A%2F%2Foshiete.xgoo.jp%2Fimages%2Fsp%2Fqa_recommend%2F2102_2.jpg)