ДвумерныйМассив = Новый Массив(2, 8); 



ДвумерныйМассив = Новый Массив; 

МассивВторогоПорядка = Новый Массив(8); 

ДвумерныйМассив.Добавить(МассивВторогоПорядка); 

ДвумерныйМассив.Добавить(МассивВторогоПорядка); 



Значение = ДвумерныйМассив[2][5];

Значение = ДвумерныйМассив.Получить(2).Получить(5);   

 Массив = Новый Массив(3, 2);



    Массив[0][0] = "Знач11";

    Массив[0][1] = "Знач12";



    Массив[1][0] = "Знач21";

    Массив[1][1] = "Знач22";



    Массив[2][0] = "Знач31";

    Массив[2][1] = "Знач32";



    // обход всех элементов через конструкцию Для Каждого

    Для Каждого Строка Из Массив Цикл

        Для Каждого Элемент Из Строка Цикл

            Сообщить(Элемент);

        КонецЦикла;

    КонецЦикла;



    // обход всех элементов через индекс

    Для ИндексСтрока = 0 По Массив.Количество() - 1 Цикл

        Для ИндексСтолбец = 0 По Массив[ИндексСтрока].Количество() - 1 Цикл

            Сообщить(Массив[ИндексСтрока][ИндексСтолбец]);

        КонецЦикла;      

    КонецЦикла;

КонецПроцедуры   

  // OldthiefXXX

Перем СерверExcel;



Процедура КнопкаВыполнитьНажатие(Кнопка)

 ФайлХЛС=СерверExcel.Application.Workbooks.Open(ДокументХЛС);

 КонечнаяСтрокаДанных=ФайлХЛС.ActiveSheet.UsedRange.Rows.Count; 

 КоличествоКолонокДанных=ФайлХЛС.ActiveSheet.UsedRange.Columns.Count; 

 Состояние("Загрузка в память данных ведомости...");

 ExcelЛист=ФайлХЛС.ActiveSheet;

 Область = СерверExcel.Range(ExcelЛист.Cells(1,1), ExcelЛист.Cells(КонечнаяСтрокаДанных,КоличествоКолонокДанных));

 МассивДанныхEXEL = Область.Value.Выгрузить();

КонецПроцедуры



Процедура ИнициализацииЕкселя()

Состояние("Происходит инициализация EXCEL...");

Попытка 

 СерверExcel1 = Новый COMОбъект("Excel.Application");

 СерверExcel1.DisplayAlerts = 0;

Исключение       

 ЗапущенExcel = 0;

 Сообщить(ОписаниеОшибки(),"!");

КонецПопытки;

КонецПроцедуры