Имя: Пароль:
1C
1С v8
Посоветуйте загрузку из табличных данных для пользователя.
Ø (Волшебник 27.11.2025 19:45)
0 Злопчинский
 
27.11.25
11:28
Посоветуйте на развалах ИС какую-нить простую проверенную загрузку из табличных данных (плоский эксель) для пользователя БП3, для загрузки данных в документ, в разные табличные части. Надо грузить в ОтчетПроизводства перечень ГП и материалов.
1 arsik
 
гуру
27.11.25
11:34
А стандартная из БСП не подходит?
2 Kigo_Kigo
 
27.11.25
12:02
(0) Там написать загрузку из екселя 30 минут, можно навесить расширением
3 Злопчинский
 
27.11.25
12:06
(1) стандартная - в документы поддерживает разве?
4 Злопчинский
 
27.11.25
12:07
(2) мне хватает программирования на клюшках. идти на 8ку чтобы там ту же самую программированием заниматься - нафиг.
5 Kigo_Kigo
 
27.11.25
12:09
(4) Пора бы уже бросить нахер эти клюшки
шаблонов на том же инфостарте, как говна за баней, кстати решение твоей задачи не много отличается от ключешных
6 Михаил Козлов
 
27.11.25
12:14
(3) В ТЧ документа (и в регистр сведений).
Я пользуюсь ЗагрузкаДанныхИзТабличногоДокумента_УФ_v2, взял где-то в начале 2018г. Не знаю, из БСП или нет. Могу прислать (мыло в профиле).
7 Злопчинский
 
27.11.25
12:19
(5) "не много" и "немного" - придают твоей фразе разный смысл. вот думаю, что именно ты имел в виду?
8 Kigo_Kigo
 
27.11.25
14:17
(7) А как хочешь так и понимай, ленивая ты жо*** :))
9 Fish
 
гуру
27.11.25
14:24
(6) О, у меня тоже такая есть.
10 Mankubus
 
27.11.25
14:56
Продай в свою организацию обработку маньяка, ещё откат агента может получится выбить
11 Волшебник
 
27.11.25
14:58
(0) Закажи нейронке, она быстро напишет
12 bolder
 
27.11.25
15:11
(0) Это отличный способ начать прогать на восьмёрке. Именно через обработки проще всего пересесть в восьмёрку. Никогда не поздно, давай двигайся.
13 Kongo2019
 
27.11.25
15:14
(11) Честно? или ты шутишь так? Нейроки пока на 1С полную хрень гонят.
14 Fragster
 
гуру
27.11.25
15:26
Счас Маня прибежит
15 Волшебник
 
27.11.25
15:44
(13) Здесь должна сработать
16 Dedal
 
27.11.25
16:04
(13) Да\Нет
Вот что выдал 1с-ный ЫЫ
&НаКлиенте
Процедура ЗагрузитьФайлExcel(Команда)
    Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
    Диалог.Заголовок = "Выберите файл Excel";
    Диалог.Фильтр = "Файлы Excel (*.xls;*.xlsx)|*.xls;*.xlsx";
    Если Диалог.Выбрать() Тогда
        ПутьКФайлу = Диалог.ПолноеИмяФайла;
        ЗагрузитьДанныеИзExcel(ПутьКФайлу);
    КонецЕсли;
КонецПроцедуры

&НаСервере
Процедура ЗагрузитьДанныеИзExcel(ПутьКФайлу)
    Попытка
        Excel = Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить("Не удалось открыть Excel");
        Возврат;
    КонецПопытки;

    Попытка
        Workbook = Excel.Workbooks.Open(ПутьКФайлу);
    Исключение
        Сообщить("Не удалось открыть файл");
        Excel.Quit();
        Возврат;
    КонецПопытки;

    Sheet = Workbook.Sheets(1);
    RowsCount = Sheet.UsedRange.Rows.Count;
    ColumnsCount = Sheet.UsedRange.Columns.Count;

    ТаблицаЗначений = Новый ТаблицаЗначений;

    // Считываем имена колонок из первой строки
    Для Column = 1 По ColumnsCount Цикл
        ИмяКолонки = Sheet.Cells(1, Column).Value;
        Если Тип(ИмяКолонки) = Тип("Строка") Тогда
            ИмяКолонки = СокрЛП(ИмяКолонки);
            ТаблицаЗначений.Колонки.Добавить(ИмяКолонки);
        Иначе
            ТаблицаЗначений.Колонки.Добавить("Колонка_" + Column);
        КонецЕсли;
    КонецЦикла;

    // Считываем данные, начиная со второй строки
    Для Row = 2 По RowsCount Цикл
        НоваяСтрока = ТаблицаЗначений.Добавить();
        Для Column = 1 По ColumnsCount Цикл
            Значение = Sheet.Cells(Row, Column).Value;
            НоваяСтрока[Column - 1] = Значение;
        КонецЦикла;
    КонецЦикла;

    // Очистка COM объектов
    Workbook.Close();
    Excel.Quit();

    // Отображаем результат
    Сообщить("Данные загружены");
    // Здесь можно добавить код для дальнейшей обработки таблицы значений
КонецПроцедуры

Для дальнейшей доработки пойдет =)
17 K1RSAN
 
27.11.25
16:11
(6) Аналогично. Спасает уже сколько лет.
18 ДенисСмирнов
 
27.11.25
16:13
(16) а что это за ИИ, как поюзать?
19 sikuda
 
27.11.25
16:32
(3)(6) В Универсальных инструментах ( https://github.com/cpr1c/tools_ui_1c ) ставлю в ERP как расширение.

Источник кода от автора:
https://infostart.ru/1c/tools/269425/
20 Dedal
 
27.11.25
17:30
(18) https://code.1c.ai/
Пока 1С открыла всем у кого есть оплаченная Техподдержка, чуть раньше была доступна только франчам. Использую через "Инструменты разработчика" от Tormozit

Пока не вайб кодинг конечно, но иногда помогает посмотреть по новому на организацию своего кода\запросов и подходу к задаче.
21 eddy_n
 
27.11.25
17:36
(4) Титаник ещё плывёт?
22 ДенисСмирнов
 
27.11.25
17:37
(20) мерси!
23 PLUT
 
гуру
27.11.25
17:41
(19) откуда у вас Полные права?

я "портативные" через Файл - Открыть... использую
24 Kongo2019
 
27.11.25
18:02
(16) Это он не выдал, это он где-то стырил. Я этот код уже не первый раз вижу, он давно кочует по Интернету. Причем как заготовка.
25 eddy_n
 
27.11.25
19:17
(4) Неужели последний из могикан? А может из ...завров?
26 rozer76
 
27.11.25
19:41
(20) не вкурил, ты Напарника через ИР пользуешь? Это с какой версии ИР? Напарник вроде как только в EDT плагином...
27 Волшебник
 
27.11.25
19:45
Создайте новую ветку
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.