Vba 如何通过microsoft access在excel工作表中添加值并选择特定工作表

我有一个excel文件，里面有许多不同的表格

我想知道如何打开工作簿，并在特定单元格中输入一个值，然后使用visual basic（Microsoft access）选择要放入的工作表

此外，我的一些工作表有“第1部分测试”这样的名称，我如何解释名称中的额外空格

谢谢

试试这个：

    Dim oExcel As Object
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Dim CurrentColumn As Integer

    'Make a new instance of Excel
    Set oExcel = CreateObject("Excel.Application")

    'Have that instance open your workbook
    oExcel.Open("YourWorkBookName")

    'Open the database
    Set db = CurrentDb
    'Create a SQL result from a SQL string to pull data from your database
    Set rs = db.OpenRecordset(YourSQLString)

    'Assign the value of a field in your SQL output to a cell

    oExcel.Workbook("YourWorkBookName").Sheets("YourSheetName").Cell(YourCellRow, YourCellColumn") = rs.("FieldName")

---

工作表名称中的空格不应该有任何区别。

似乎不起作用，oExcel.Open（）如何知道位置？我将oExcel.Open（“Workbookname”）放在这里，它说对象不支持此属性或方法