Сразу скажу чтобы не пинали, в базе знаний смотрел ссылки на статьи по vba на ресурс нетворкдок не существующие, созможно статью убрали.

Вопрос небольшой , интересует только как задать формат ячейки (диапозона ячеек), а именно выравнивание по центру и опция переноса по свовам  из 1С, со всем остальм вроде получается.

Опытным путем вычислил , что вроде за это должны отвечать:
       .HorizontalAlignment = xlGeneral
       .WrapText = True
пытался так:
   Эксель = СоздатьОбъект("Excel.Application");
   Эксель.Visible =1;
   Книга = Эксель.WorkBooks.Add();
   Лист = Книга.WorkSheets.Add();
// что присваивается
//
   Лист.Range("A4:L4").HorizontalAlignment = Лист.xlGeneral;
   Лист.Range("A4:L4").WrapText = Лист.True;

Выдает ошибку Поле агрегатного объекта не обнаружено (xlGeneral)

Подскажите как правильно

xlGeneral есть числовая константа
найди FriendVBA, подсовывай ему код, который получишь при записи макроса - он вернет код для 1с

_Selection.HorizontalAlignment = -4108;//Горизонтальное выравнивание текста
_Selection.VerticalAlignment = -4108;//Вертикальное выравнивание текста
_Selection.WrapText = 1;//1 - переносить текст по словам, 0 - нет
_Selection.Orientation = 0;//0 - текст горизонтально, 90 - сверху вниз, -90 - снизу вверх
_Selection.AddIndent = 0;//Величина отступа (от края или середины )
_Selection.IndentLevel = 0;
_Selection.ShrinkToFit = 0;//1 - автоподбор ширины, 0 - нет
_Selection.ReadingOrder = -5002;
_Selection.MergeCells = 0;//1 - объединить выбранные ячейки, 0 - нет

FriendVBA рулит

(1) FriendVBA конечно хорошо, но автора думать явно не заставит.

Спасибо

(5) + в вба ставишь точку останова в макросе, пускаешь на выполнение, наводишь курсор на переменную и получаешь в всплывающем окошке значение

(4) а в таких задачах думать не надо... слишко много занимает только оформление результата в екселе...

(7) Мне достаточно глянуть в VBA