Doc.Range("M1:O1").Select();
Doc.Selection.MergeCells = 1;
Doc.Rows("1:1").RowHeight = 46.5;

Вылетает на 2-й строке.
Пробовалось также
Doc.Selection.MergeCells = True;
Doc.Selection.MergeCells = "True";
Doc.Selection.MergeCells = "1";
Doc.Selection.MergeCells(True);
Doc.Selection.MergeCells(1);
Doc.Selection.MergeCells("True");
Doc.Selection.MergeCells("1");

ни один вариант не работает. Как побороть заразу ?

namedRange1.Merge(False) © MSDN

(1)
Пишет - Переменная не определена (True)

(2) 1

(3)
Doc.Selection.Merge(1), тоже с ошибкой

(4) а так
Doc.Range("M1:O1").Merge(1)

Range("A1:B1").Select
Selection.MergeCells = True
у меня не ругается

Doc.Range("M1:O1").Merge(0);

(6) а точки с запятой в сабже не смущают ?

(8) я не настолько близок к вба ;)

Ну никак не хочет работать (
(8)
";" , т.к. это код в 1с 7.7


//*******************************************
Процедура Сформировать()
   Ексель=СоздатьОбъект("Excel.Application");
   Ексель.Visible=-1;
   Книги=Ексель.WorkBooks;
   Книга=Книги.Add();
   Листы=Книга.WorkSheets;
   Лист=Листы.Item(1);
   Ячейки=Лист.Cells;
   Диапазон=Лист.Range(Ячейки.Item(1,13),Ячейки.Item(1,15));
   Диапазон.Merge(0);
   Диапазон.Value="Объединение ?";
КонецПроцедуры


(11)
хм, в итоге

Doc.Range("M1:O1").MergeCells(1);
на самой строке прога вылетает с ошибкой, но в файле ячейки объединены правильно о_О ;

Doc.Range("M1:O1").Merge(1);
строка отрабатывает без ошибок, но в файле ячейки не объединены.

попробуй вызвать просто .Merge(); без параметров
+ на заметку: в VBA False = 0, а True =-1
поэтому так же должен прокатить вызов .MergeCells = -1;