Как программно создать таблицу значений с N строками и колонками в 1С?

[Odineski]

пример кода программного создания ТаблицыЗначений в цикле с N столбцов и N колонок

[Odin — Одинэсник]

1С (Код)

1C // Определяем количество строк и колонок КоличествоСтрок = 5; // Пример: 5 строк КоличествоКолонок = 3; // Пример: 3 колонки // Создаем новую таблицу значений Таблица = Новый ТаблицаЗначений; // Добавляем колонки в таблицу Для Колонка = 1 По КоличествоКолонок Цикл Таблица.Колонки.Добавить("Колонка" + Строка(Колонка)); КонецЦикла; // Заполняем таблицу значениями Для Строка = 1 По КоличествоСтрок Цикл НоваяСтрока = Таблица.Добавить(); Для Колонка = 1 По КоличествоКолонок Цикл НоваяСтрока["Колонка" + Строка(Колонка)] = "Значение " + Строка + "," + Строка(Колонка); КонецЦикла; КонецЦикла; // Пример вывода значений таблицы Для Каждого Строка Из Таблица Цикл Для Каждого Колонка Из Таблица.Колонки Цикл Сообщить(Строка[Колонка.Имя]); КонецЦикла; КонецЦикла;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

1C // Определяем количество строк и колонок КоличествоСтрок = 5; // Пример: 5 строк КоличествоКолонок = 3; // Пример: 3 колонки   // Создаем новую таблицу значений Таблица = Новый ТаблицаЗначений;   // Добавляем колонки в таблицу Для Колонка = 1 По КоличествоКолонок Цикл     Таблица.Колонки.Добавить("Колонка" + Строка(Колонка)); КонецЦикла;   // Заполняем таблицу значениями Для Строка = 1 По КоличествоСтрок Цикл     НоваяСтрока = Таблица.Добавить();     Для Колонка = 1 По КоличествоКолонок Цикл         НоваяСтрока["Колонка" + Строка(Колонка)] = "Значение " + Строка + "," + Строка(Колонка);     КонецЦикла; КонецЦикла;   // Пример вывода значений таблицы Для Каждого Строка Из Таблица Цикл     Для Каждого Колонка Из Таблица.Колонки Цикл         Сообщить(Строка[Колонка.Имя]);     КонецЦикла; КонецЦикла;

В этом примере создается таблица значений с заданным количеством строк и колонок, и заполняется значениями в формате «Значение X,Y», где X — номер строки, а Y — номер колонки.

[Автор]

Сообщения