проблема связки access и excel

[Nature]

прицепил к кнопке в access макрос создающий excel книгу и форматирует
при компиляции пишет ошибку:
Private Sub Кнопка14_Click()
On Error GoTo Кнопка14_err
Dim ExlDb As New Excel.Application
Dim WrkBk As Workbook, WrkSht As Worksheet
ExlDb.Visible = True
Set WrkBk = ExlDb.Workbooks.Add
Set WrkSht = WrkBk.ActiveSheet
Range("A1:O1").Select
With Selection
.HorizontalAlignment = xlCenter <--------------------------------------
.VerticalAlignment = xlCenter
.WrapText = True
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
end sub

[Ennor]

Я правильно понял, что версии продуктов, компонентов, а так же проблемную строку - в качестве бесплатного бонуса посетителям форума предлагается угадать?

Ну а особо продвинувшиеся в нелегком искусстве телепатии могут попытаться назвать номер ошибки, ее описание и - пожизненное кю три раза! - название ее источника.

[Gloom]

Я так понимаю, что код был сгенерирован макрорекордером?
Видимо, компилятор в замешательстве - чей метод Range и чьё свойство Selection?
Т.е. надо

Код: Выделить всё

ExlDb.Range("A1:O1").Select

и

Код: Выделить всё

With ExlDb.Selection