Есть код
&НаКлиенте
Процедура ВыгрузитьВExcel(Команда)
   
   МассивНоменклатуры=Новый Массив ;
   МассивКоличество=Новый Массив ;
   
   Для каждого Стр из Объект.Товары Цикл
       
       МассивНоменклатуры.Добавить(Стр.Номенклатура);
       МассивКоличество.Добавить(Стр.Количество);
       
   КонецЦикла;
   
   МассивАртикулов=Новый Массив;
   МассивАртикулов=ПреобразоватьМассивНоменклатуры(МассивНоменклатуры);
   
   Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
   Диалог.Заголовок = "Выберите файл";
   Диалог.ПолноеИмяФайла = "";
   Диалог.МножественныйВыбор = Ложь;
   Если Диалог.Выбрать() Тогда
       ЭкспортФайла = Диалог.ПолноеИмяФайла;
   КонецЕсли;
   Бланк=Новый COMОбъект("Excel.Application");
   Попытка
       Бланк.Workbooks.Open(ЭкспортФайла);
   Исключение
       Возврат
   КонецПопытки;
   
   МассивАртикуловГотовыйКвыгрузке = Новый COMSafeArray(МассивАртикулов,"VT_VARIANT");
   МассивКоличествоГотовыйКвыгрузке= Новый COMSafeArray(МассивКоличество,"VT_VARIANT");
   
   Бланк.Visible=True;

   Бланк.Range(Бланк.Cells(7,1),Бланк.Cells(МассивАртикулов.Количество()+7,1)).Value=МассивАртикуловГотовыйКвыгрузке;
   Бланк.Range(Бланк.Cells(7,8),Бланк.Cells(МассивКоличество.Количество()+7,8)).Value=МассивКоличествоГотовыйКвыгрузке;
   
КонецПроцедуры

Он почему-то заполняет диапазон ячеек только первым элементом массива.
Таким же алгоритмом заполняю двух мерный массив все работает как нужно, с одномерным массивом есть какие то нюансы?