Как добавить значения в лист Excel через доступ к Microsoft и выбрать конкретный лист

Question

У меня есть файл excel со многими различными листами.

мне было интересно, как я могу открыть книгу и введите значение в конкретную ячейку и выбор, который лист он идет при помощи Visual Basic (доступ Microsoft)

Кроме того, некоторые из моих листов имеют имена, как " part 1 test ', как мне объяснить дополнительные пробелы в названии?

Спасибо

Answer 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") 

пространства в вашем имени листа не должно иметь никакого значения.