```1c
    Для КолРеквизты= 0 По N Цикл
    НовыеРеквизиты = Новый Массив;
    РеквизитВопросов = Новый РеквизитФормы("СозданныйРеквизит"+КолРеквизты,Новый ОписаниеТипов("Строка"),,,Истина);
    НовыеРеквизиты.Добавить(РеквизитВопросов);
    ИзменитьРеквизиты(НовыеРеквизиты);
    КонецЦикла;
```

Чтобы было СозданныйРеквизит0,СозданныйРеквизит1....
---
ИзменитьРеквизиты(НовыеРеквизиты);
Надо за цилк вывести
---
Рабочий код

```1c
    &НаСервере
    Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

    ДобавляемыеРеквизиты = Новый Массив;
    Для Счетчик = 0 По 10 Цикл
    МассивТипов = новый Массив;
    МассивТипов.Добавить(Тип("Строка"));
    ИмяРеквизита = "ПолеВводаСтроки"+Счетчик;
    СинонимРеквизита = "Поле ввода строки "+Счетчик;
    Реквизит = Новый РеквизитФормы(ИмяРеквизита, Новый ОписаниеТипов(МассивТипов),, СинонимРеквизита, Истина);
    ДобавляемыеРеквизиты.Добавить(Реквизит);
    КонецЦикла;

    ИзменитьРеквизиты(ДобавляемыеРеквизиты);

    Для Счетчик = 0 По 10 ЦИкл
    ИмяРеквизита = "ПолеВводаСтроки" + Счетчик;
    ЭлементФормы = ЭтаФорма.Элементы.Добавить(ИмяРеквизита, Тип("ПолеФормы"), ЭтаФорма);
    ЭлементФормы.ПутьКДанным = ИмяРеквизита;
    ЭлементФормы.Вид = ВидПоляФормы.ПолеВвода;
    КонецЦикла;

    КонецПроцедуры
```
---
Чтобы было СозданныйРеквизит0,СозданныйРеквизит1....

По-любому на тысячной итерации сломается :)
---
ИзменитьРеквизиты(НовыеРеквизиты);
Надо за цилк вывести
---
Спасибо

```1c
    Для КолРеквизты= 0 По N Цикл
    НовыеРеквизиты = Новый Массив;
    РеквизитВопросов = Новый РеквизитФормы("СозданныйРеквизит"+КолРеквизты,Новый ОписаниеТипов("Строка"),,,Истина);
    НовыеРеквизиты.Добавить(РеквизитВопросов);
    КонецЦикла;

    ИзменитьРеквизиты(НовыеРеквизиты);
```
---
А далее создать элементы формы.
ЭтаФорма.Элементы.Добавить("ПолеВводаСтроки", Тип("ПолеФормы"), ЭтаФорма);
---
```1c
    Для КолЭл = 0 По n Цикл
    Элемент = ЭтаФорма.Элементы.Добавить("СозданныйЭлемент"+КолЭл,Тип("ПолеФормы"),ЭтаФорма);
    Элемент.Вид = ВидПоляФормы.ПолеНадписи;
    Элемент.Заголовок ="абвгд" ;
    Элемент.ПутьКДанным = "СозданныйРеквизит"+Строка(КолЭл);
    КонецЦикла;
```
---
Рабочий код

```1c
    &НаСервере
    Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

    ДобавляемыеРеквизиты = Новый Массив;
    Для Счетчик = 0 По 10 Цикл
    МассивТипов = новый Массив;
    МассивТипов.Добавить(Тип("Строка"));
    ИмяРеквизита = "ПолеВводаСтроки"+Счетчик;
    СинонимРеквизита = "Поле ввода строки "+Счетчик;
    Реквизит = Новый РеквизитФормы(ИмяРеквизита, Новый ОписаниеТипов(МассивТипов),, СинонимРеквизита, Истина);
    ДобавляемыеРеквизиты.Добавить(Реквизит);
    КонецЦикла;

    ИзменитьРеквизиты(ДобавляемыеРеквизиты);

    Для Счетчик = 0 По 10 ЦИкл
    ИмяРеквизита = "ПолеВводаСтроки" + Счетчик;
    ЭлементФормы = ЭтаФорма.Элементы.Добавить(ИмяРеквизита, Тип("ПолеФормы"), ЭтаФорма);
    ЭлементФормы.ПутьКДанным = ИмяРеквизита;
    ЭлементФормы.Вид = ВидПоляФормы.ПолеВвода;
    КонецЦикла;

    КонецПроцедуры
```
---
Всем привет!
А можно программно написать внешнюю обработку, чтоб создать реквизиты в информационную базу?
---
Нет
---
чтоб создать реквизиты в информационную базуА что за реквизиты? А что за база?
---
чистая база. В эксель файле есть более 200 столбцов, хотелось написать форму на 1с, чтоб легче заполнять, плюс разные столбцы заносят разные отделы, для каждого таким образом открыть форму с разрешенными для записи разным сотрудникам вносить заполнение разных реквизитов.
Создавать кучу реквизитов вручную мне кажется моветон, ведь автоматизация на то и автоматизация.
---
Ну так делаете регистр сведений с соответствующими полями, повествующими о имени поля, содержании, комментарии каком, ролям/правах. Ну и грузим туды данные из колоночек эксельчика. Ну и сохраняем это все не в реквизитах, а в том самом регистре. В итоге решаем массу проблем совместного доступа к файлам и разграничением прав.

https://infostart.ru/1c/articles/574802/
---
В регистре программно создавать поля/измерения/ресурсы можно?
Проблема не в данных. Проблема, что названияСтолбцов/шапка/регистр назовите как угодно в зависимости от инструмента нужно создать более 200-от. Да я понимаю, что это же разово. А теперь загоним ситуацию в угол пусть будет элементов наименований реквизитов более 100 000, и тоже вручную будем? Класс! Одно дело если там шедевр создаете, самописную конфу аптеки/военторга, что угодно. А тут наименования шапки полей заданные с одного файла перегнать в другой.
---
Делаете измерение "ИмяКолонки", ресурс "Значение" типа ХранилищеЗначений. И пишете весь мильон своих колонок в виде мильона записей регистра

Посмотрите как в том же MDMе это сделано, где надо хранить заранее неизвестную произвольную структуру справочников вместе со значениями
---
Спасибо за направление!