MS Access VBA Как удалить строку в Excel

Question

Я использовал приведенный ниже код для открытия файла Excel в MS Access 2003. Я хотел бы удалить строку 2 или A2: K2.

            Dim xlApp As Excel.Application
            Set xlApp = CreateObject("Excel.Application")

            xlApp.Visible = True

            xlApp.Workbooks.Open "QuotebyItem.xls", True, False

Answer 1

Dim wb as Excel.Workbook
Dim xlApp As Excel.Application             

Set xlApp = CreateObject("Excel.Application")              
xlApp.Visible = True 

Set wb = xlApp.Workbooks.Open("QuotebyItem.xls", True, False)
wb.Sheets(1).Rows(2).Delete

... при условии, что в вашем файле только один лист: если их может быть несколько, и вам нужно обратиться только к одному из них:

wb.Sheets("Sheet2").Rows(2).Delete