выбор всех ячеек в листе Excel из смещения (VBA)

Question

Итак, я создаю отчет 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 ошибку

Answer 1

Вы всегда можете попробовать:

ActiveSheet.Range("A3:A" & ActiveSheet.UsedRange.Rows.Count).Select

With Selection
     .RowHeight = 20
End With

Answer 2

 With ExcelSheet
        .Cells.RowHeight = 22.5
        .Cells.Font.name = "Ariel"
        .Cells.Font.Size = 8.5
end with

и затем я просто изменил материал (заголовки, заголовки) на то, что хотелНамного легче. Я отмечу свой собственный ответ как правильный через 2 дня