从偏移量(VBA)中选择Excel工作表中的所有单元格

所以我要从一个Access数据库创建一个Excel报表。所以这是在访问vba中完成的。

这是我的代码:

Public Sub ExportActiveSheet()

   'irrelevant data


   'get the info
   ExcelSheet.Range("A3").CopyFromRecordset rs




   Set rs = Nothing
End Sub

现在,如你所见……我的记录集被复制到从a3开始的范围。我有一个未知的列数(现在,用户可以在1列到36列之间进行选择,但这可以增加。同样,这应该无关紧要)。

我想选择从A3到工作表末尾的所有内容(或者,更好的是只选择有数据的行),然后更改行高。

我已经尝试过:

    ExcelSheet.Range(Cells(3, 1), Cells(10000, 40)).Select
    With ExcelApp.Selection
        .RowHeight = 22.5
    End With

但它给了我一个 Method Range of object _worksheet failed 错误