Задать высоту строк с объединенными ячейками соседних столбцов

[Niyetkhan]

Здравствуйте

Очень нужна помощь, помогите, пожалуйста

В документе много таблиц.
В "шапках" таблиц есть объединенные ячейки (двух соседних столбцов).
Надо найти все такие ячейки и задать фиксированную высоту строки - 40.

Можно ли сделать такое?

Буду признателен за любые отклики.

С уважением,

Ниетхан

[jillitil]

    For Each MojaJacejka In Sheets(1).UsedRange
        If MojaJacejka.MergeCells Then _
            MojaJacejka.EntireRow.RowHeight = 40
'            MojaJacejka.EntireColumn.ColumnWidth = 10
    Next