1с выгрузка в excel тип ячейки - Word и Excel - помощь в работе с программами

ghOstik

22.05.12 — 15:58

Всем добрый день, сохраняю данные из 1с в excel

код

…

код…

Лист1.Cells(НомерСтроки,НомерКолонки).Value = Значение;

…

код…

Значение записывается в нужную ячейку, все правильно, гду нужно делаю форматы, но у меня просят что бы в excel формат ячейки стоял не «общий», а «Числовой» или «Дата».

Можете подсказать если кто-то делал?

В нете не нашел.

ЗАранее спасибо!

ДенисЧ

1 — 22.05.12 — 15:59

Включи запись макроса.

Установи руками нужный формат.

Останови запись.

Посмотри на результат.

Наслаждайся

ghOstik

2 — 22.05.12 — 16:01

(1) мне надо что бы потом блондинка нажимала на кнопку и отправляла полученный файл, блондину по почте.

ДенисЧ

3 — 22.05.12 — 16:02

(2) так результат повтори в 1с..

4 — 22.05.12 — 16:03

Ексель.Range(Область).NumberFormat = «@»; //ставим текст

Ексель.Range(Область).NumberFormat = «0»; //число

ЧисловойФормат=»0″+?(ТекРеквизит.Точность>0,»,»,»»);

для щ=1 по ТекРеквизит.Точность Цикл

ЧисловойФормат=ЧисловойФормат+»0″;

КонецЦикла;

Ексель.Range(Область).NumberFormat = ЧисловойФормат; //принудительно ставим числовой формат

ghOstik

5 — 22.05.12 — 16:05

(3) только сейчас понял о чем ты написал)))

(4) спасибо!

6 — 22.05.12 — 16:07

(5)+

В твоем случае вместо «Ексель.Range(Область)» пиши «Лист1.Cells(НомерСтроки,НомерКолонки)»

ghOstik

7 — 22.05.12 — 16:12

(6) ну да это понятно)

ghOstik

8 — 22.05.12 — 17:38

Cовсем забыл написать для даты

ДатаФормат = «ДД.ММ.ГГГГ»;

Лист2.Cells(НомерСтроки,НомерКолонки).NumberFormat = ДатаФормат; //принудительно ставим формат даты

Мало ли кому-то понадобится)

TurboConf — расширение возможностей Конфигуратора 1С

Источник

 //Простейший пример вывода из 1С:Предприятия 7.7 в MS Excel. Обеспечение наличия у рабочей книги единственного листа,

//установка размера, жирности и цвета шрифта, ширины колонок, рамок и заливки ячеек. Выравнивание текста

//ячеек, группировка строк, установка числового формата ячеек, закрепление области.



  


                       
  




Процедура Вывод()

    Попытка

        Application=СоздатьОбъект("Excel.Application");

    Исключение

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

        Сообщить("Возможно, MS Excel не установлен на этом компьютере.");

        Возврат;

    КонецПопытки;
    //Создание рабочей книги
    WorkBook=Application.WorkBooks.Add();

    //Получение окна
    Window=WorkBook.Windows(1);

    //Установка невидимости окна для убыстрения вывода
    Window.Visible=0;

    //Обеспечение наличия у рабочей книги единственного листа
    Если WorkBook.Worksheets.Count=0 Тогда

        WorkBook.Worksheets.Add();

    Иначе

        Application.DisplayAlerts=0;//не выдавать предупреждений
        Пока WorkBook.Worksheets.Count>1 Цикл

            WorkBook.Worksheets(1).Delete();

        КонецЦикла;

        Application.DisplayAlerts=-1;//восстановление флага выдачи предупреждений
    КонецЕсли;

    //Получение рабочего листа
    Worksheet=WorkBook.Worksheets(1);

    //Задание имени рабочего листа
    Worksheet.Name="Пример вывода";



  


                       
  




    //Заголовок документа
    Worksheet.Range("A1").Value="Пример вывода из 1С:Предприятия в MS Excel";

    Worksheet.Range("A2").Value="сегодня "+ТекущаяДата();

    Worksheet.Range("A1:A2").Font.Size=14;//размер шрифта
    Worksheet.Range("A1:A2").Font.Bold=-1;//жирный шрифт
    //Задание ширины колонок
    Worksheet.Columns(1).ColumnWidth=60;

    Worksheet.Columns(2).ColumnWidth=15;

    Worksheet.Columns(3).ColumnWidth=15;
    //Шапка документа
    Worksheet.Range("A4").Value="Первая колонка";

    Для ы=7 по 10 Цикл//рамки
        Worksheet.Range("A4").Borders(ы).LineStyle=1;

        Worksheet.Range("A4").Borders(ы).Weight=-4138;//xlMedium
    КонецЦикла;

    Worksheet.Range("A4").Interior.ColorIndex=15;//заливка серым
    Worksheet.Range("A4").HorizontalAlignment=-4108;//выравнивание текста по центру



  


                       
  




    Worksheet.Range("B4").Value="Вторая";

    Для ы=7 по 10 Цикл

        Worksheet.Range("B4").Borders(ы).LineStyle=1;

        Worksheet.Range("B4").Borders(ы).Weight=-4138;

    КонецЦикла;

    Worksheet.Range("B4").Interior.ColorIndex=15;

    Worksheet.Range("B4").HorizontalAlignment=-4108;
    Worksheet.Range("C4").Value="Третья";

    Для ы=7 по 10 Цикл

        Worksheet.Range("C4").Borders(ы).LineStyle=1;

        Worksheet.Range("C4").Borders(ы).Weight=-4138;

    КонецЦикла;

    Worksheet.Range("C4").Interior.ColorIndex=15;

    Worksheet.Range("C4").HorizontalAlignment=-4108;



  


                       
  




    //Для группировки строк:

     Worksheet.Outline.SummaryRow=0;//"итоговые" строки отображать сверху (если снизу, то 1)
    //Вывод строк

     Worksheet.Range("A5").Value="Объект аналитики";

    Worksheet.Range("A5").Font.ColorIndex=5;//цвет шрифта - синий
    Worksheet.Range("B5").Value=123.45;

    Worksheet.Range("B5").Font.ColorIndex=5;

    Worksheet.Range("C5").Value=678.9;

    Worksheet.Range("C5").Font.ColorIndex=5;
    Worksheet.Range("A6").Value="Объект аналитики";

    Worksheet.Range("A6").Font.ColorIndex=3;//цвет шрифта - красный
    Worksheet.Range("B6").Value=123.45;

    Worksheet.Range("B6").Font.ColorIndex=3;

    Worksheet.Range("C6").Value=678.9;

    Worksheet.Range("C6").Font.ColorIndex=3;
    Worksheet.Range("A7").Value="Объект аналитики";

    Worksheet.Range("B7").Value=123.45;

    Worksheet.Range("C7").Value=678.9;
    Worksheet.Range("A8").Value="Объект аналитики";

    Worksheet.Range("B8").Value=123.45;

    Worksheet.Range("C8").Value=678.9;
    Worksheet.Range("A9").Value="Объект аналитики";

    Worksheet.Range("A9").Font.ColorIndex=3;//цвет шрифта - красный



  


                       
  




    Worksheet.Range("B9").Value=123.45;

    Worksheet.Range("B9").Font.ColorIndex=3;

    Worksheet.Range("C9").Value=678.9;

    Worksheet.Range("C9").Font.ColorIndex=3;
    Worksheet.Range("A10").Value="Объект аналитики";

    Worksheet.Range("B10").Value=123.45;

    Worksheet.Range("C10").Value=678.9;
    Worksheet.Range("A11").Value="Объект аналитики";

    Worksheet.Range("B11").Value=123.45;

    Worksheet.Range("C11").Value=678.9;
    Worksheet.Range("A12").Value="Объект аналитики";

    Worksheet.Range("A12").Font.ColorIndex=5;//цвет шрифта - синий
    Worksheet.Range("B12").Value=123.45;

    Worksheet.Range("B12").Font.ColorIndex=5;

    Worksheet.Range("C12").Value=678.9;

    Worksheet.Range("C12").Font.ColorIndex=5;
    Worksheet.Range("A13").Value="Объект аналитики";

    Worksheet.Range("A13").Font.ColorIndex=3;//цвет шрифта - красный
    Worksheet.Range("B13").Value=123.45;

    Worksheet.Range("B13").Font.ColorIndex=3;

    Worksheet.Range("C13").Value=678.9;

    Worksheet.Range("C13").Font.ColorIndex=3;
    Worksheet.Range("A14").Value="Объект аналитики";

    Worksheet.Range("B14").Value=123.45;

    Worksheet.Range("C14").Value=678.9;
    Worksheet.Range("A15").Value="Объект аналитики";

    Worksheet.Range("B15").Value=123.45;

    Worksheet.Range("C15").Value=678.9;
    Worksheet.Range("A16").Value="Объект аналитики";

    Worksheet.Range("A16").Font.ColorIndex=3;//цвет шрифта - красный
    Worksheet.Range("B16").Value=123.45;

    Worksheet.Range("B16").Font.ColorIndex=3;

    Worksheet.Range("C16").Value=678.9;

    Worksheet.Range("C16").Font.ColorIndex=3;



  


                       
  




    Worksheet.Range("A17").Value="Объект аналитики";

    Worksheet.Range("B17").Value=123.45;

    Worksheet.Range("C17").Value=678.9;
    Worksheet.Range("A18").Value="Объект аналитики";

    Worksheet.Range("B18").Value=123.45;

    Worksheet.Range("C18").Value=678.9;
    //Установка рамок
    Для НомСтр=5 по 18 Цикл

        Для ы=7 по 10 Цикл

            Worksheet.Range("A"+НомСтр).Borders(ы).LineStyle=1;

            Worksheet.Range("B"+НомСтр).Borders(ы).LineStyle=1;

            Worksheet.Range("C"+НомСтр).Borders(ы).LineStyle=1;

        КонецЦикла;

    КонецЦикла;
    //Группировка строк
    Worksheet.Range("7:8").Rows.Group();

    Worksheet.Range("10:11").Rows.Group();

    Worksheet.Range("14:15").Rows.Group();

    Worksheet.Range("17:18").Rows.Group();

    Worksheet.Range("6:11").Rows.Group();

    Worksheet.Range("13:18").Rows.Group();
    //Свёртка группировок до первого уровня
    Worksheet.Outline.ShowLevels(1);
    //Установка числового формата
    Попытка

        Worksheet.Range("B5:C18").NumberFormat="# ##0.00";



  


                       
  




    Исключение

        Попытка

            Worksheet.Range("B5:C18").NumberFormat="# ##0,00";
        Исключение

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

    КонецПопытки;
    //Установка видимости приложения и его окна 
    Application.Visible=-1;

    Window.Visible=-1;
    //Закрепление области
    Worksheet.Range("A5").S_elect();

    Window.FreezePanes = -1;

КонецПроцедуры //Вывод

Источник

Почти каждому офисному работнику нужно знать, как выгружать из 1С в Excel. Работа многих из них основывается на взаимосвязи этих приложений, желательно понимать, как переносить информацию из одной в другую и обратно. На платформе предусмотрены механизмы, которые упрощают и облегчают процесс. Достаточно 1 раз запомнить, как это делается, чтобы потом повторять его. Удобство заключается в том, что полученные таблицы и базы можно редактировать, показывать поставщикам и распечатывать в любом количестве. Ниже — подробные инструкции, как правильно перемещать требуемые данные в документы.

Как из 1С выгрузить таблицу или файлы в Эксель (Excel)

Если процесс передачи из табличного пространства в программу — процесс сложный и долгий, требующий стороннего ПО и настройки, то обратная задача выполняется не только быстро, но и разными способами. Все зависит от того, загрузка чего требуется и в каком виде это необходимо представить. И сделать все можно разными способами.

Метод 1: Берем каждую ячейку отдельно

Если требуется только небольшой кусочек от номенклатуры, который содержится в клетке 1C, то ее легко перенести в Эксель. Для этого можно использовать любой привычный режим копирования в документах.

Как это выполнить по шагам:

выделить требуемую строчку;

кликнуть на нее ПКМ;
выбрать пункт «копирование» или набрать «Ctrl+C»;
открыть лист Excel или документ другого формата, куда необходимо вставить символы;

кнопки «Ctrl+V» или через правую клавишу найти строку «сохранить как текст» — иногда выглядит как пиктограмма «А».

Также можно вставить информацию на лист другим способом. Направить курсор в клетку начала, а затем открыть вкладку «Главная», нажать на «Вставить» (его можно найти в части «Буфер обмена»). После всех этих действий содержимое окажется в табличном пространстве.

Единственный минус в том, что этот способ подойдет, только если требуется отправить что-то в ячейку. Если планируется транслировать массивы, стоит попробовать действовать иначе.

Метод 2: вставляем список в заранее подготовленный Excel

Когда требуется переместить целый перечень или массив из нескольких параметров, лучше действовать иначе. Ведь если вставлять по 1 слову, то на процесс уйдет слишком много времени.

Как выполняется:

Открыть справочник или специальный журнал. Найти пункт «все действия», он находится в вверху от комплекса, который нуждается в обработке.

Запустить меню, найти строку «вывести».
Появится небольшое окно, в котором производится настройка. Там есть подпункт «выводить в» и два варианта — табличный или текстовый документ. Изначально стоит первый вид, он хорошо подходит для отправки в Эксель.
В блоке с названием «Выводить колонки» необходимо определиться, что придется послать в строчное пространство. Если в планах — перенести все содержимое, то здесь тоже ничего менять не надо. Если предстоит конвертировать отдельные столбцы, то с лишних снимаем галочку.
После выполнения всех настроек кликнуть на «Ок».

На экране отобразится перечень в таблицы. Чтобы отправить его в готовый файл, желательно выделить в нем левой кнопкой мыши нужную область и нажать правую клавишу. В высветившемся меню найти «Копировать». Для упрощения процесса советуем пользоваться стандартным «Ctrl+c».

Раскрыть лист, в котором выделяется верхняя левая строчка. Начиная оттуда начнется перечень. Затем — пункт «Вставить» на панели во вкладке «Главная».

Готово. Перенос обязательных данных из неудобного 1С в подходящий для модификаций и анализа Excel завершен.

Метод 3: оформляем отдельный новый документ

Еще один способ — сразу выслать в созданный для этих целей док. Для этого следует выполнить все шаги, что изучали выше, до момента форматирования списка.

Затем кликаем на кнопку для вызова меню. Она выглядит как треугольник, оказавшийся в кружочке.

Ищем по шагам:

файл — при наведении на него система покажет комментарий с подсказкой;

сохранить как — после этого придется решать между разными форматами.

Можно пойти другим путем. Кликнуть на «Сохранить» — выглядит как дискета в панели 1С. Она всегда находится в верхнем углу (доступно для ПО после обновления). Запустить окно сохранения легко с помощью «Ctrl+s».

Появляется нужное окошко. Следует перейти в то место, где необходимо сохранить книгу.

Важно выбрать правильный тип документа. Изначально всегда предлагается хранить и загружать базу в формате (*.xls), но это неудобно. В выпадающем перечне стоит другой вариант — «Лист Excel (*.xls)». Есть и совсем старые разновидности, но у них минимальный набор функционала, поэтому мы не рекомендуем их задействовать. Когда все настройки подобраны, можно сохранять изменения и получить номенклатуру в виде перечня в новой книге.

Метод 4: копируем диапазон

Часто встречаются случаи, когда переместить планируется не весь лист или таблицу, а определенный кусок или строки. Это тоже реально произвести с помощью специальных внутренних механизмов.

Как из стандартизированного 1С перенести таблицу в Эксель:

Выделите нужную область. Следует зажать Shift и кликнуть на те строки, которые необходимо перенести. Нажать на «все действия» и отыскать подпункт «вывести список».

Запустите окошко. Все настройки возьмем из предыдущих способов. Главное — не забыть поставить галочку напротив параметра «только выделенные». Позже — ищем «ок».

Программа соберет только выделенные столбцы. Затем действуем по пунктам из 2 или 3 способа.

Метод 5: можно ли из 1С выгрузить документ в привычном уже формате Excel и сохранить

Иногда требуется не просто скопировать список или область, а целые файлы — накладные, фактуры, платежные поручения. Большинству пользователей проще заниматься редактированием прямо в Эксель, к тому же в таблицах не страшно вносить изменения, легче печатать. Можно даже очистить автозаполнение и пользоваться бланком для оформления вручную.

Процесс пошагово:

В 1 C найти кнопку печати. Выглядит как картинка с принтером, сложно спутать. Когда в документ было введено все запланированное и его сохранили, кликаем на пиктограмму.

Откроется форма предварительного просмотра. Но нужно его не распечатывать, а конвертировать. Поэтому нажимаем на «сохранить», если версия 8.3. Для более старых модификаций есть сочетание клавиш «ctrl+s».

Еще один вариант — кликнуть на перевернутый треугольник, затем на «файл» и «сохранить». Когда откроется окно сохранения, необходимо выбрать тип и имя. Когда все параметры будут отобраны — нажать на «сохранить».

Форматы переноса данных любого вида и размера из 1С в удобный Эксель

В этой программе 5 частых видов:

mxl — специально созданный для возможности сохранять сразу в формате таблицы, даже сбрасывать в базы на других компьютерах;
xls — стандартный тип;
txt — текстовый, вся информация в блокноте;
pdf — подойдет, если планируется работать с разновидностями Adobe Reader;
html — веб-формат, используется для размещения на странице в интернете.

Каждый из перечисленных подтипов со своими особенностями. Например, если брать табличные пространства, то в них сохраняется строй. Среди доступного — открывать, сворачивать и читать различные группы. В остальных случаях это стандартный список.

На огромных объемах табличных строчек они размещаются на разных листах для удобной обработки.

Помните, что максимальное количество строк зависит от версии Екселя:

до 97 — предел 16 000;
97-2003 — до 65 000;
от 2007 — не больше 1 048 000.

Готовые решения для всех направлений

Сократите издержки в работе склада до 70% : ускорьте складские операции, устраните ошибки человеческого фактора и забудьте про потерю и пересортицу товаров.

Узнать больше

У вас всегда будут актуальные ценники на товарах и витринах, товар перестанет теряться при перемещении между магазинами, а в вашей системе учета — только точные остатки по товарам.

Узнать больше

С маркировкой вы на 100% исключите приемку контрафактного товара на свой склад, а также сможете отслеживать полную цепочку поставок товара от производителя.

Узнать больше

Скорость, точность приёмки и отгрузки товаров на складе — краеугольный камень в E-commerce бизнесе. Начни использовать современные, более эффективные мобильные инструменты.

Узнать больше

Повысьте точность учета имущества организации, уровень контроля сохранности и перемещения каждой единицы. Мобильный учет снизит вероятность краж и естественных потерь.

Узнать больше

Повысьте эффективность деятельности производственного предприятия за счет внедрения мобильной автоматизации для учёта товарно-материальных ценностей.

Узнать больше

RFID

Первое в России готовое решение для учёта товара по RFID-меткам на каждом из этапов цепочки поставок.

Узнать больше

Исключи ошибки сопоставления и считывания акцизных марок алкогольной продукции при помощи мобильных инструментов учёта.

Узнать больше

Получение сертифицированного статуса партнёра «Клеверенс» позволит вашей компании выйти на новый уровень решения задач на предприятиях ваших клиентов..

Узнать больше

Используй современные мобильные инструменты для проведения инвентаризации товара. Повысь скорость и точность бизнес-процесса.

Узнать больше

Показать все решения по автоматизации

Как сделать выгрузку клиентов или отчетов из 1С в Excel программным путем

Для продвинутых пользователей есть более сложные варианты произвести быстрое сохранение отдельных областей на компьютер. Сделать это можно 2 основными способами, о которых мы поговорим ниже.

Метод 1: вызываем сохранение таблицы

У каждого табличного документа имеется функция «записать», среди параметров которого есть тип файла. Следует выбрать заполнение табличного пространства, кликнуть на «записать».

Метод 2: задействуем механизм Excel.Aplication

Эту возможность проще всего реализовать в среде операционных систем Windows. Код важно отладить со стороны клиента, иначе придется долго дополнительно отстраивать серверную часть программного обеспечения.

Всю документацию по этому объекту можно найти на официальном сайте Microsoft. Для записи в нужной последовательности и формате пишут простейший код. Из всех инструментов ПО непосредственно к копированию информации относится строчка:

КнигаЭксель = Новый СОМОбъект

Как вывести данные из 1С и перенести их в Excel: способы выгрузки из 1C

Это только кажется, что настройка переселения любых частей и листов — дело хлопотное и требующее привлечения мастеров. Справиться с этой задачей может любой, если действовать по шагам.

Важно, чтобы программное обеспечение было лицензионным. Короткие пиратские версии не всегда поддерживают перенос в полном объеме. Кроме того, важно установить интеграцию с товароучетными программами, чтобы следить за остатками и не допускать пересортицы.

Чтобы подобрать решение для бизнеса, стоит обратиться в «Клеверенс». Наши специалисты помогут выбрать подходящее оборудование и софт, который будет справляться со всем комплексом поставленных задач. Отлаженная техника не создает задержек. Каждый цикл выполняется достаточно быстро, чтобы заказы собирались оперативно, а клиенты были довольны.

Как выгрузить из 1С любые понадобившиеся данные ячейки по товару или по созданному ранее справочнику в 1C в Excel (Эксель)

Мы изучили, как правильно переносить разные строчки и таблицы. А теперь давайте рассмотрим, как можно отправлять в табличное пространство целый регистр. Например, часто требуется создать отдельную книгу по контрагентам, покупателям или поставщикам, собрать заказы.

Чтобы удалось оформить номенклатуру, следует сначала ее развернуть и отыскать правильный файл. Если конфигурация ПО управляемая, то вверху экрана ищем плашку «еще». Выпадет меню, где надо искать связанные со списками строки, чтобы войти в требующийся перечень.

В более старых версиях программы достаточно просто щелкнуть ПКМ и найти там тот же пункт про вывод.

Откроется форма, где предстоит отметить все необходимые поля. Система покажет все подобранное в рамках одной таблицы. Оттуда их легко копировать в документ.

Как сделать выгрузку из 1С 8 в Эксель (Excel) большого количества данных

Перенос крупных баз практически ничем не отличается от копирования небольших списков. Чтобы не допустить ошибок вида «недостаточно памяти на клиенте» и сократить потраченное на процесс время, нужно пользоваться таким способом:

создать книгу, в которую будут складываться все для будущего анализа;

начать выгрузку через команды — кликнуть на «записать ТабДок»;

указать путь к созданному пространству;

выбрать формат, в котором будет храниться и редактироваться информация.

При необходимости можно отладить автоматический построчный перенос для экономии. Но для этого придется один раз пригласить специалиста — он напишет код.

Как из «1С: Предприятие» выгрузить печатные формы документов или файлов в Excel

Это еще один метод, который подходит в большинстве случаев. Сначала открываем нужную вариацию накладной или акта в формате окна перед печатью.

Затем — ткнуть «ctrl+s». Появится диалоговое окошко, где предстоит придумать имя для будущего табличного пространства и его подвид.

Любой отчет можно отправить на рабочий стол или в определенную папку также просто, всего в пару кликов.

Пользоваться можно всеми основными форматами — word, html, и другими, о которых мы говорили выше. Как сохранить накладную из жесткого 1С в подходящий для редактирования Excel — вызвать меню, подготовить название и пройти по короткому пути извлечения строк из программы.

Как отправить базу целиком (в файл .dt)

Чтобы удалось скачать содержимое, потребуется перейти в режим конфигуратора.

После этого — открыть подпункт «администрирование». Следующий шаг — выбор опции «выгрузка информационной базы».

Останется только ввести имя для базы, а также найти подходящее место для хранения на диске. Чтобы в будущем загрузить все в другую директорию, нужно только кликнуть на «загрузить» и выбрать предварительно сформированный док.

Выгрузка из 1С в Excel отчетности и ее форм для комфортной печати

Сделать это достаточно просто, ведь практически все в программе имеет печатные формы. А сохранение начинается из этого поля.

Чтобы собрать информацию из платежного поручения, действуем по шагам:

кликнуть на него;
найти в верхнем поле пиктограмму принтера;

появится страница предпросмотра, на которой необходимо найти дискету или другой значок, указывающий на хранение;

нажать на «сохранить»;
на экран выведется окно, в котором следует указать путь для сохранения будущего файла;

ниже — выбор формата, в рамках которого будет содержаться информация;
по надобности — поставить галочки на дополнительную упаковку в архив и транслитерацию имен;
подтвердить свои действия нажатием на кнопку.

После этого с получившимся документом можно выполнять любые манипуляции — редактировать, удалять или добавлять строчки и столбцы, распечатывать.

Как скопировать и вывести таблицу или данные любого объема в доступный для редактирования Эксель (Excel) – для версии 1С 8.3

Одна из распространенных задач каждого бухгалтера или кадровика — сформировать перечень платежек за прошлый год или подготовить количество трудоустроенных за 2020-й. Могут попросить оформить бумажную версию книги продаж и возвратов, а также просто найти список товаров из определенной накладной за июль. Во всех этих случаях требуется создание табличного пространства в новой книге. Решить это достаточно просто.

Например, для анализа отбираются все поступления от конкретного производителя, которые были выполнены более чем на 1500 рублей.

Сначала нажимаем на значок отбора критериев. Появится окно, в котором устанавливаем необходимые параметры — контрагента и стоимость чека.

На экране вы увидете бумаги к выдаче. Здесь следует запросить контекстное меню правой кнопкой мыши или с помощью функции «действия». В появившемся поле ищем пункт «вывести».

Система покажет, что есть 2 варианта отображения — текстовый формат и табличный. Вам пригодится последний. Через программу информация появится в отдельном окошке, из которого его реально отправлять в нужном виде через сохранение.

Эти действия вполне можно выполнять почти для каждой таблицы. Достаточно раскрыть подходящий файл, поставить галочки и прописать запрос в полях. Через несколько кликов все требуемые строчки будут готовы к транспортировке в новую книгу или на лист.

Мы рассмотрели, как выгрузить любые данные отчета или акта с 1с в более подходящий для анализа Эксель (Excel) из любых папок, что требуется сделать, чтобы получилось сохранить их в виде таблицы или книги. Изучили, как правильно переносить печатные формы, какие комбинации клавиш для этого необходимы и без чего не обойтись. Есть разные способы транслировать цифры и строчки в табличное пространство. Достаточно попробовать сделать один раз и запомнить, чтобы потом свободно повторять те же действия.

Количество показов: 41169

Источник

1С

В статье рассмотрены основные методы работы с массивами в 1С

1С

В данной статье рассмотрен пример передачи данных из табличной части документа в параметр.

1С

Для решения этой проблемы достаточно установить пользователя под которым будут выполняться регламентные задания.

1С

Функция пропорционально распределяет сумму на необходимое количество

1С

В тех случаях, когда возникает необходимость отключить авторегистрацию объектов, при записи объекта следует устанавливать дополнительное свойство.

1С

В статье рассмотрено несколько основных алгоритмов удаления строк из табличной части по условию. Каждый из вариантов по своему хорош, вам…

1С

Примеры программного заполнения параметров и отборов для отчетов СКД

1С

Примеры создания простых типов в 1С. Числа, строки ,логические, символы.

1С

Данная функция преобразовывает Фамилию Имя Отчество в Фамилия И.О.

1С

Примеры работы с деревом значений в 1С. Добавление, удаление, перемещение строк, создание копии, сортировка данных и др.

1С

Примеры создания дерева значений, массивов, словарей, списка значений, структуры, таблицы значений

1С

Примеры использования условий отбора в запросе 1С. Отборы по дате, по объектам, по параметрам и др.

Источник

Содержание

Выгрузка информации из 1C в Excel
- Способ 1: копирование содержимого ячейки
- Способ 2: вставка списка в существующую книгу Excel
- Способ 3: создание новой книги Excel со списком
- Способ 4: копирование диапазона из списка 1С в Excel
- Способ 5: Сохранение документов в формате Excel
Вопросы и ответы

Не секрет, что среди офисных работников, в частности тех, которые заняты в расчетной и финансовой сфере, особенно популярны программы Excel и 1С. Поэтому довольно часто приходится производить обмен данными между этими приложениями. Но, к сожалению, далеко не все пользователи знают, как быстро это сделать. Давайте выясним, как выгрузить данные из 1С в документ Excel.

Выгрузка информации из 1C в Excel

Если загрузка данных из Excel в 1С – это довольно сложная процедура, автоматизировать которую можно только с помощью сторонних решений, то обратный процесс, а именно выгрузка из 1С в Эксель – это сравнительно простой набор действий. Его можно легко выполнить с помощью встроенных инструментов вышеуказанных программ, причем сделать это можно несколькими способами, в зависимости от того, что именно пользователю нужно перенести. Рассмотрим, как это выполнить на конкретных примерах в 1С версии 8.3.

Способ 1: копирование содержимого ячейки

Одна единица данных содержится в ячейке 1С. Её можно перенести в Эксель обычным методом копирования.

Выделяем ячейку в 1С, содержимое которой нужно скопировать. Кликаем по ней правой кнопкой мыши. В контекстном меню выбираем пункт «Копировать». Можно воспользоваться также универсальным способом, который действует в большинстве программ, работающих на ОС Windows: просто выделяем содержимое ячейки и набираем комбинацию клавиш на клавиатуре Ctrl+C.

Открываем чистый лист Excel или документ, куда нужно вставить содержимое. Кликаем правой кнопкой мыши и в появившемся контекстном меню в параметрах вставки выбираем пункт «Сохранить только текст», который изображен в форме пиктограммы в виде большой буквы «А».

Вместо этого действия можно после выделения ячейки, находясь во вкладке «Главная», щелкнуть по значку «Вставить», который расположен на ленте в блоке «Буфер обмена».

Также можно воспользоваться универсальным способом и набрать на клавиатуре сочетание клавиш Ctrl+V после того, как ячейка выделена.

Содержимое ячейки 1С будет вставлено в Excel.

Способ 2: вставка списка в существующую книгу Excel

Но вышеуказанный способ подойдет лишь в том случае, если нужно перенести данные из одной ячейки. Когда же нужно совершить перенос целого списка, то следует воспользоваться другим способом, ведь копирование по одному элементу отберет очень много времени.

Открываем любой список, журнал или справочник в 1С. Кликаем на кнопку «Все действия», которая должна располагаться вверху от обрабатываемого массива данных. Запускается меню. Выбираем в нем пункт «Вывести список».

Открывается небольшое окошко вывода списка. Тут можно произвести некоторые настройки.
Поле «Выводить в» имеет два значения:
- Табличный документ;
- Текстовый документ.
По умолчанию установлен первый вариант. Для переноса данных в Эксель он как раз и подходит, так что тут мы ничего не меняем.

В блоке «Выводить колонки» можно указать, какие колонки из списка вы хотите перевести в Excel. Если вы собираетесь производить перенос всех данных, то эту настройку тоже не трогаем. Если же вы хотите произвести конвертацию без какого-то столбца или нескольких столбцов, то снимаем галочку с соответствующих элементов.

После того, как настройки завершены, жмем на кнопку «OK».

Затем на экран выводится список в табличном виде. Если вы хотите перенести его в готовый файл Excel, то просто выделите в нем все данные курсором с зажатой левой кнопкой мыши, потом кликните по выделению правой кнопкой мышки и в открывшемся меню выберите пункт «Копировать». Можно так же, как и в предыдущем способе использовать сочетание горячих клавиш Ctrl+С.

Открываем лист Microsoft Excel и выделяем верхнюю левую ячейку диапазона, в который будут вставляться данные. Затем жмем на кнопку «Вставить» на ленте во вкладке «Главная» или набираем сочетание клавиш Ctrl+V.

Список вставлен в документ.

Способ 3: создание новой книги Excel со списком

Также список из программы 1С можно сразу вывести в новый файл Эксель.

Выполняем все те шаги, которые были указаны в предыдущем способе до формирования списка в 1С в табличном варианте включительно. После этого жмем на кнопку вызова меню, которая расположена в верхней части окна в виде треугольника, вписанного в оранжевый круг. В запустившемся меню последовательно переходим по пунктам «Файл» и «Сохранить как…».

Ещё проще сделать переход, нажав на кнопку «Сохранить», которая имеет вид дискеты и расположена в блоке инструментов 1С в самом верху окна. Но такая возможность доступна только пользователям, которые применяют программу версии 8.3. В ранних версиях можно использовать только предыдущий вариант.

Также в любых версиях программы для запуска окна сохранения можно нажать комбинацию клавиш Ctrl+S.
Запускается окно сохранение файла. Переходим в ту директорию, в которой планируем сохранить книгу, если место расположения по умолчанию не устраивает. В поле «Тип файла» по умолчанию указано значение «Табличный документ (*.mxl)». Нам это не подходит, поэтому из выпадающего списка выбираем пункт «Лист Excel (*.xls)» или «Лист Excel 2007 — … (*.xlsx)». Также при желании можно выбрать совсем старые форматы – «Лист Excel 95» или «Лист Excel 97». После того, как настройки сохранения произведены, жмем на кнопку «Сохранить».

Весь список будет сохранен отдельной книгой.

Способ 4: копирование диапазона из списка 1С в Excel

Бывают случаи, когда нужно перенести не весь список, а только отдельные строки или диапазон данных. Этот вариант тоже вполне воплотим с помощью встроенных инструментов.

Выделяем строки или диапазон данных в списке. Для этого зажимаем кнопку Shift и кликаем левой кнопкой мыши по тем строкам, которые нужно перенести. Жмем на кнопку «Все действия». В появившемся меню выбираем пункт «Вывести список…».

Запускается окошко вывода списка. Настройки в нем производим так же, как и в предыдущих двух способах. Единственный нюанс состоит в том, что нужно установить галочку около параметра «Только выделенные». После этого жмем на кнопку «OK».

Как видим, список, состоящий исключительно из выделенных строк, выведен. Дальше нам нужно будет выполнить точно такие же действия как в Способе 2 или в Способе 3, в зависимости от того, собираемся мы добавлять список к уже имеющейся книге Excel или создавать новый документ.

Способ 5: Сохранение документов в формате Excel

В Excel иногда нужно сохранять не только списки, но и созданные в 1С документы (счета, накладные платежные поручения и т.д.). Это связано с тем, что для многих пользователей редактировать документ проще в Экселе. К тому же в Excel можно удалить заполненные данные и, распечатав документ, использовать его при необходимости как бланк для ручного заполнения.

В 1С в форме создания любого документа имеется кнопка печати. На ней расположена пиктограмма в виде изображения принтера. После того, как в документ введены необходимые данные и он сохранен, жмем на этот значок.

Открывается форма для печати. Но нам, как мы помним, нужно не распечатать документ, а конвертировать его в Эксель. Легче всего в версии 1С 8.3 это сделать, нажав на кнопку «Сохранить» в виде дискеты.

Для более ранних версий используем сочетание горячих клавиш Ctrl+S или, нажав на кнопку вывода меню в виде перевернутого треугольника в верхней части окна, последовательно переходим по пунктам «Файл» и «Сохранить».

Открывается окно сохранение документа. Как и в предыдущих способах, в нем нужно указать место расположения сохраняемого файла. В поле «Тип файла» следует указать один из форматов Эксель. Не забываем дать название документу в поле «Имя файла». После выполнения всех настроек жмем на кнопку «Сохранить».

Документ будет сохранен в формате Эксель. Этот файл теперь можно открывать в данной программе, и проводить дальнейшую его обработку уже в ней.

Как видим, выгрузка информации из 1С в формат Excel не составляет никаких сложностей. Нужно знать только алгоритм действий, так как, к сожалению, не для всех пользователей он интуитивно понятен. С помощью встроенных инструментов 1С и Эксель можно копировать содержимое ячеек, списков и диапазонов из первого приложения во второе, а также сохранять списки и документы в отдельные книги. Вариантов сохранения достаточно много и для того, чтобы пользователь мог найти подходящий именно для его ситуации, совсем не нужно прибегать к использованию стороннего программного обеспечения или применять сложные комбинации действий.

Источник

Вопрос про формат ячейки.

Автор mila1231, 01 июл 2015, 09:16

0 Пользователей и 1 гость просматривают эту тему.

У меня такой вопрос, вот есть внешний отчёт в 1с, дальше его можно сохранить в формат .xls, так вот вопрос в том, можно ли как то повлиять на тип ячейки…. т.е при сохранении отчета как задать формат конкретной ячейки, не могу понять по какой логике при сохранении в формат .xls тип ячейки формируется….

Весь формат ячеек, заданный в отчете сохраняется. По умолчанию — текст.

Цитата: vitasw от 01 июл 2015, 09:34
Весь формат ячеек, заданный в отчете сохраняется. По умолчанию — текст.

Я может не правильно поняла, но формат ячеек при сохранении в .xls в большинстве своём общий, но также некоторые ячейки числовые, все данные в отчёт берутся из одного документа…. я не могу понять по какому принципу в екселе это всё сохраняется, можно ли как-то «насильно» присвоить формат ячейки при сохранении отчёта в .xls?

Не могу представить, что вам может быть не понятно.
Есть отчет, в этом отчете каждая ячейка может иметь свой формат. Формат задается программистом при написании отчета. При использовании «Файл-сохранить как…» все форматы, заданные программистом сохраняются в таком же виде и в экселе.

Цитата: vitasw от 01 июл 2015, 10:21
Не могу представить, что вам может быть не понятно.
Есть отчет, в этом отчете каждая ячейка может иметь свой формат. Формат задается программистом при написании отчета. При использовании «Файл-сохранить как…» все форматы, заданные программистом сохраняются в таком же виде и в экселе.

так вот и вопрос как задать этот формат, чтоб он выгружал ячейку с датой с форматом ячейки Дата, а не Общий… в макете я поняла это нельзя сделать.. или это как то программно.. в общем я сообразить не могу.
ЗЫ И гугл в помощь не помогает.. то ли мысль не могу правильно сформулировать((((((((

Честно, у меня сейчас мозг взорвется от вашего недопонимания. ОТЧЕТ НАПИСАН ПРОГРАММИСТОМ. ПРОГРАММИСТ ЖЕСТКО ЗАДАЛ ФОРМАТ В МАКЕТ. ЕСЛИ ФОРМАТ НЕПРАВИЛЬНЫЙ — НУЖНО ИЗМЕНИТЬ ФОРМАТ НА ПРАВИЛЬНЫЙ, В МАКЕТЕ. Если вы не программист -то объяснять как изменить формат в макете не видя самого макета — бесполезно.

Цитата: vitasw от 01 июл 2015, 10:39
Честно, у меня сейчас мозг взорвется от вашего недопонимания. ОТЧЕТ НАПИСАН ПРОГРАММИСТОМ. ПРОГРАММИСТ ЖЕСТКО ЗАДАЛ ФОРМАТ В МАКЕТ. ЕСЛИ ФОРМАТ НЕПРАВИЛЬНЫЙ — НУЖНО ИЗМЕНИТЬ ФОРМАТ НА ПРАВИЛЬНЫЙ, В МАКЕТЕ. Если вы не программист -то объяснять как изменить формат в макете не видя самого макета — бесполезно.

извиняюсь за вынос мозга… но я этот отчёт и писала.. не супер пупер я .. сразу говорю… в макете я либо слепко .. либо, что не исключаю.. чего-то не понимаю, но я не вижу, где задать жёстко формат…
как по логике.. может я и не права.. задать , можно если зайти в макет, далее свойство ячейки … дальше возможно в Значении, ставить галку содержит значение и указывать тип значения.. но — это наверно не правильно.., т.к не работает ,какое значение я имею в виду изменить скинула картинкой..
Поэтому и спрашиваю, как можно в макете, или в модуле при выводе параметров жёстко указать, что дата, это дата, а не тип ячейки Общий.. при сохранении в формате .xls

Вам слово «формат» ничего не говорит? 3-я строка после «содержит значение».

Цитата: vitasw от 01 июл 2015, 11:13
Вам слово «формат» ничего не говорит? 3-я строка после «содержит значение».

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

Ээээээээээ, уж простите меня за мой французский…но вы когда что-то делаете вы вообще пробовали подумать прежде чем что-то делать?!?!
Проблема=неопределенный формат в xls.
Ваше решение = установить кучу всяких форматов => получим точно такой же неопределенный формат в xls.
Вы должны установить только 1(один) формат в ячейке и только нужный формат. Только вы знаете, какой тип данных содержится в этой ячейке.

Цитата: mila1231 от 01 июл 2015, 11:29а точно это только в макете делается?? При выводе параметров в модуле ничего, нигде не указывается?

Вы это у меня спрашиваете?!?!?!

Цитата: mila1231 от 01 июл 2015, 10:50но я этот отчёт и писала.

вы же сами, своими ручками этот отчет пишете!!!

Теги:

Форум 1С
►
Форум 1С — ПРЕДПРИЯТИЕ 8.0 8.1 8.2 8.3 8.4
►
Конфигурирование, программирование в 1С Предприятие 8
►
Вопрос про формат ячейки.

Поиск

Источник

1С 8.3 и Excel совместимы с самых первых версий платформы: любую печатную форму можно сохранить в электронную таблицу (*.xls,*.xlsx) через Меню (Еще..) -> Сохранить. Некоторые документы в типовых конфигурациях имеют встроенную функцию выгрузки в электронную таблицу. Загрузить информацию в 1С из Excel штатными средствами до последнего времени было невозможно. Только в крайних релизах 1С 8.3 была реализована возможность загрузки информации в документы закупок и продаж из excel-файла (*.xls,*.xlsx) через буфер обмена (кнопка над табличной частью «Загрузить из внешнего файла»). Однако, типовые механизмы подходят только для узкого круга задач. Для решения более широкого спектра задач по экспорту/импорту данных в/из Excel средствами 1С 8.3 создаются команды, в которых используется палитра встроенного языка.

Для работы 1С 8.3 с Excel используется COM объект типа «Excel.Application» (через OLE, нужен установленный MS Excel) или «ADODB.Connection» (ActiveX Data Object, нужен установленный драйвера ODBC) или «COMSafeArray» (через OLE, нужен установленный драйвер ADODB).
При загрузке из Excel в управляемом приложении можно выполнять как &НаКлиенте так и на &НаСервере. Используется временный каталог стандартного пользователя USR1CV82.
На дисках ИТС и на портале 1С, в меню «Технологическая поддержка» -> «Универсальные отчеты и обработки» -> есть типовая обработка «Загрузка данных из табличного документа».
У табличного документа есть метод «Прочитать». Отличная альтернатива COM объекту — актуально для файлов больших объемов.

Выбор Excel файла в 1С 8.3:

&НаКлиенте
Процедура ФайлНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка) //необходимо в событии «НачалоВыбора» поля ввода вызвать ДиалогВыбораФайлаДиалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.Заголовок = «Выберите файл Excel»;
Диалог.ПредварительныйПросмотр = Ложь;
Диалог.Фильтр = «(*.xls,*.xlsx)|*.xls;*.xlsx;|Microsoft Excel 97/2000/XP/2003 (*.xls)|*.xls|Microsoft Excel 2007/2010 (*.xlsx)|*.xlsx»;

Если

ЗначениеЗаполнено(Объект.Файл) Тогда
Диалог.ПолноеИмяФайла= Объект.Файл;
КонецЕсли;

Если

Диалог.Выбрать() Тогда
Объект.Файл = Диалог.ПолноеИмяФайла;
КонецЕсли;

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

Загрузка из Excel файла (через COMОбъект) в 1С 8.3:

&НаСервере
Процедура ЗагрузитьИзXLS()// в документ Поступление материалов

// Попытка открытия файла Excel

Попытка
Excel_App = Новый COMОбъект(«Excel.Application»);
Excel_App.WorkBooks.Open(Объект.Файл);
Исключение
Сообщить(«Произошла ошибка при открытии файла «+СокрЛП(ОписаниеОшибки())+«! Операция прервана!»);
Возврат;
КонецПопытки;// Попытка выбрать первый лист (можно указать другой)
Попытка
Excel_App.Sheets(1).Select();
Исключение
// Если первый лист не найден — закрываем файл
Excel_App.ActiveWorkbook.Close();
Excel_App = 0;
Сообщить(«Первый лист не найден!»);
ОтменитьТранзакцию();
Возврат;
КонецПопытки;// Вычисление количества строк и колонок в зависимости от версии Excel
version_Ex = Лев(Excel_App.Version, Найти(Excel_App.Version,«.»)-1);
Если version_Ex = «8» тогда
Колич_Строк = Excel_App.Cells.CurrentRegion.Rows.Count;
Колич_Колонок = Макс(Excel_App.Cells.CurrentRegion.Columns.Count, 13);
Иначе
Колич_Строк = Excel_App.Cells(1,1).SpecialCells(11).Row;
Колич_Колонок = Excel_App.Cells(1,1).SpecialCells(11).Column;
Конецесли;// Имена колонок в файле должны совпадать с именами реквизитов табличной части, в которую загружаются данные
// Переменная ТЗ_Колонки содержит список номеров колонок, которые будут перегружаться
ТЗ_Колонки = Новый ТаблицаЗначений;
ТЗ_Колонки.Колонки.Добавить(«НомерКолонки»);
ТЗ_Колонки.Колонки.Добавить(«НазваниеКолонки»);

Для

Каждая_Колонка = 1 по Колич_Колонок ЦиклИмяКолонки = Excel_App.Cells(1, Каждая_Колонка).Text;
ИмяБезПробелов = СтрЗаменить(ИмяКолонки,» «,«»); // Удаление лишних пробелов из имен колонок

// Проверка наличия реквизитов табличной части «Материалы» в документе «ПоступлениеМатериалов»

Если НЕ ПроверкаРеквизитаТЧ(ИмяБезПробелов, Метаданные.Документы.ПоступлениеМатериалов, «Материалы») Тогда
Сообщить(«Не найден реквизит с именем » + ИмяБезПробелов + «! Колонка не будет загружена!»);
Иначе
Новая_Строка = ТЗ_Колонки.Добавить();
Новая_Строка.НомерКолонки = Каждая_Колонка;
Новая_Строка.НазваниеКолонки = ИмяБезПробелов;
КонецЕсли;

КонецЦикла;

// Если есть колонки для загрузки и есть колонка «Материалы» (обязательная к заполнению)
Если ТЗ_Колонки.Количество() <> 0 и
ТЗ_Колонки.НайтиСтроки(Новый Структура(«НазваниеКолонки», «Материалы»)).Количество() <> 0 Тогда// Создание документа и заполнение реквизитов шапки
Тек_Документ = Документы.ПоступлениеМатериалов.СоздатьДокумент();
Тек_Документ.Комментарий = «Загружено из файла » + Объект.Файл;
Тек_Документ.Дата = ТекущаяДата();
Тек_Документ.Ответственный = ПараметрыСеанса.ТекущийПользователь;

Для

Тек_Строка = 1 по Колич_Строк Цикл // Заполнение табличной части «Материалы»Строка_Док = Тек_Документ.Материалы.Добавить();
Строка_Док.Валюта = Тек_Документ.ТипЦен.ВалютаЦены;

Для каждого

Тек_ТЗ из ТЗ_Колонки ЦиклТек_Значение = Excel_App.Cells(Тек_Строка, Тек_ТЗ.НомерКолонки).Text;// Получение имени колонки
ИмяКолонкиДокумента = Excel_App.Cells(1, Тек_ТЗ.НомерКолонки).Text;// Заполнение строки данными
Если ИмяКолонкиДокумента = «Материалы» Тогда
Строка_Док.Номенклатура = Справочники.Материалы.НайтиПоНаименованию(Тек_Значение, Истина);
ИначеЕсли ИмяКолонкиДокумента = «Цена» Тогда
Строка_Док.Цена = Тек_Значение;
ИначеЕсли ИмяКолонкиДокумента = «Ставка_НДС» Тогда
Строка_Док.Ставка_НДС = Тек_Значение;
КонецЕсли;

КонецЦикла;

Тек_Документ.Записать(РежимЗаписиДокумента.Проведение); // Запись и проведение документа
Сообщить(«Записан документ » + СокрЛП(Тек_Документ));
Иначе
Сообщить(«В файле «+СокрЛП(Объект.Файл)+» не достаточно данных для заполнения документа!»);
КонецЕсли;Excel_App.DisplayAlerts = 0;
Excel_App.Quit();
Excel_App.DisplayAlerts = 1;

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

&НаСервере
Функция ПроверкаРеквизитаТЧ(ИмяРекв, МетаданныеДок, ИмяТЧ)// Проверка наличия ТЧ
ТаблЧасть = МетаданныеДок.ТабличныеЧасти.Найти(ИмяТЧ);
Если ТаблЧасть = Неопределено Тогда // Нет такой таб. части в документе
Возврат Ложь; //реквизит не найден
Иначе
Возврат НЕ (ТаблЧасть.Реквизиты.Найти(ИмяРекв) = Неопределено);//реквизит найден
КонецЕсли;

КонецФункции

Выгрузка в Excel файл (через COMОбъект) в 1С 8.3:

&НаСервере
Процедура ВыгрузитьВXLS(Выб_Таблица)

Если

Выб_Таблица.Количество() = 0 Тогда
Сообщить(«Пустая таблица! Операция прервана!»);
Возврат;
КонецЕсли;

Попытка

Excel_App = Новый COMОбъект(«Excel.Application»); // Подключение к Excel
Исключение
Сообщить(«Произошла ошибка при открытии файла «+СокрЛП(ОписаниеОшибки())+«! Операция прервана!»);
Возврат;
КонецПопытки;

Попытка

Book_Excel = Excel_App.WorkBooks.Add();Sheet_Excel = Book_Excel.WorkSheets(1);
Sheet_Excel.Name = «Test Sheet»; // Присваиваем имя первому листуExcel_App.ActiveWindow.View    = 2; // Режим страничного просмотра
Excel_App.ActiveWindow.Zoom    = 100; // Масштаб
Sheet_Excel.PageSetup.Orientation    = 2; // Альбомная ориентация
Sheet_Excel.Columns(1).ColumnWidth = 20;   // Ширина первой колонки
Sheet_Excel.Columns(2).ColumnWidth = 40;   // Ширина второй колонки
Sheet_Excel.Columns(10).ColumnWidth    = 15;
Sheet_Excel.Columns(11).ColumnWidth    = 15;Sheet_Excel.Cells(1, 1).Value    = «№ ПП»; //Создаем шапку 1
Sheet_Excel.Cells(1, 2).Value    = «Текст»;
Sheet_Excel.Cells(1, 3).Value    = «Числа»;
Sheet_Excel.Cells(1, 10).Value = «Дата»;
Sheet_Excel.Cells(1, 11).Value = «Формула»;Sheet_Excel.Cells(2, 3).Value    = «Число 1»;//Создаем шапку 2
Sheet_Excel.Cells(2, 4).Value    = «Число 2»;
Sheet_Excel.Cells(2, 5).Value    = «Число 3»;
Sheet_Excel.Cells(2, 6).Value    = «Число 4»;
Sheet_Excel.Cells(2, 7).Value    = «Число 5»;
Sheet_Excel.Cells(2, 8).Value    = «Число 6»;
Sheet_Excel.Cells(2, 9).Value    = «Число 7»;Sheet_Excel.Range(«A1:A2»).MergeCells = Истина; Sheet_Excel.Range(«A1:A2»).WrapText = Истина;
Sheet_Excel.Range(«B1:B2»).MergeCells = Истина; Sheet_Excel.Range(«B1:B2»).WrapText = Истина;
Sheet_Excel.Range(«J1:J2»).MergeCells = Истина; Sheet_Excel.Range(«J1:J2»).WrapText = Истина;
Sheet_Excel.Range(«K1:K2»).MergeCells = Истина; Sheet_Excel.Range(«K1:K2»).WrapText = Истина;
Sheet_Excel.Range(«C1:I1»).MergeCells = Истина; Sheet_Excel.Range(«C1:I1»).WrapText = Истина;Sheet_Excel.Range(«A1:K2»).Borders.Linestyle = 1; //Линия границы
Sheet_Excel.Range(«A1:K2»).HorizontalAlignment = 3; //Выравнивание по горизонтали
Sheet_Excel.Range(«A1:K2»).VerticalAlignment = 2; //Выравнивание по вертикали
Sheet_Excel.Range(«A1:K2»).Font.Bold = 1; //Установим жирный шрифт в шапке

// Выгружаем данные в таблицу

Количество_Строк = 3; //Заполнение ТЧ начинаем с третьей строки
Для Каждого ТекСтрока Из Выб_Таблица Цикл
Sheet_Excel.Cells(Количество_Строк, 1).Value = ТекСтрока.НомерПоПорядку;
Sheet_Excel.Cells(Количество_Строк, 2).Value = ТекСтрока.Табл_Текст;
Sheet_Excel.Cells(Количество_Строк, 3).Value = ТекСтрока.Табл_Число1;
Sheet_Excel.Cells(Количество_Строк, 4).Value = ТекСтрока.Табл_Число2;
Sheet_Excel.Cells(Количество_Строк, 5).Value = ТекСтрока.Табл_Число3;
Sheet_Excel.Cells(Количество_Строк, 6).Value = ТекСтрока.Табл_Число4;
Sheet_Excel.Cells(Количество_Строк, 7).Value = ТекСтрока.Табл_Число5;
Sheet_Excel.Cells(Количество_Строк, 8).Value = ТекСтрока.Табл_Число6;
Sheet_Excel.Cells(Количество_Строк, 9).Value = ТекСтрока.Табл_Число7;
Sheet_Excel.Cells(Количество_Строк, 10).Value    = ТекСтрока.Табл_Дата;
Sheet_Excel.Cells(Количество_Строк, 11).Formula    = «=F» + Строка(Количество_Строк)
+ «+G» + Строка(Количество_Строк);Количество_Строк = Количество_Строк + 1;
КонецЦикла;Количество_Строк = Количество_Строк — 1; //Последняя строка для форматированияSheet_Excel.Range(«A3:K» + Строка(Количество_Строк)).Borders.Linestyle = 1; //Линия границы
Sheet_Excel.Range(«A3:K» + Строка(Количество_Строк)).VerticalAlignment = 2; //Выравнивание по вертикалиДля НомерСтроки = 3 По Количество_Строк Цикл // Установка числового формата
Для Столбец = 4 По 9 Цикл
Sheet_Excel.Cells(НомерСтроки, Столбец).NumberFormat = «0.00»;
КонецЦикла;
Sheet_Excel.Cells(НомерСтроки, 11).NumberFormat    = «0.00»;
КонецЦикла;

Исключение

Excel_App.Quit();
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;

Попытка

Book_Excel.SaveAs(Объект.Файл);
Сообщить(«Файл » + Объект.Файл + » успешно сохранен»);
Исключение
Сообщить(ОписаниеОшибки() + » Файл не сохранен!»);
Возврат;
КонецПопытки;

Попытка

Excel_App.Quit();
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;

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

Справочно: Основные свойства и методы для работы с Excel через OLE в 1С 8.3:

Действия с приложением:

Установка видимости окна приложения …… Excel_App.Visible = Ложь;
Установка режима вывода предупреждений (выводить/не выводить) …… Excel_App.DisplayAlerts = Ложь;
Закрытие приложения …… Excel_App.Quit();

Действия с книгой:

Создание новой книги …… Book_Excel = Excel_App.WorkBooks.Add();
Открытие существующей книги …… Book_Excel = Excel_App.WorkBooks.Open(ИмяФайла);
Сохранение книги …… Book_Excel.SaveAs(ИмяФайла);
Закрытие книги …… Book_Excel .Close(0);

Действия с листом:

Установка текущего листа …… Sheet_Excel = Book_Excel.WorkSheets(НомерSheet_Excelа);
Установка имени …… Sheet_Excel.Name = Имя;
Установка защиты …… Sheet_Excel.Protect();
Снятие защиты …… Sheet_Excel.UnProtect();
Установка ориентации страницы …… Sheet_Excel.PageSetup.Orientation = 2; 1 — книжная, 2 — альбомная
Установка левой границы …… Sheet_Excel.PageSetup.LeftMargin = Excel_App.CentimetersToPoints(Сантиметры);
Установка верхней границы …… Sheet_Excel.PageSetup.TopMargin = Excel_App.CentimetersToPoints(Сантиметры);
Установка правой границы …… Sheet_Excel.PageSetup.RightMargin = Excel_App.CentimetersToPoints(Сантиметры);
Установка нижней границы …… Sheet_Excel.PageSetup.BottomMargin = Excel_App.CentimetersToPoints(Сантиметры);

Действия со строками, колонками, ячейками:

Установка ширины колонки …… Sheet_Excel.Columns(НомерКолонки).ColumnWidth = Ширина;
Удаление строки …… Sheet_Excel.Rows(НомерСтроки).Delete();
Удаление колонки …… Sheet_Excel.Columns(НомерКолонки).Delete();
Удаление ячейки …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Delete();
Установка значения …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Value = Значение;
Объединение ячеек …… Sheet_Excel.Range(Sheet_Excel.Cells(НомерСтроки, НомерКолонки),

Sheet_Excel.Cells(НомерСтроки1, НомерКолонки1)).Merge();

Установка шрифта …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Font.Name = ИмяШрифта;
Установка размера шрифта …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Font.Size = РазмерШрифта;
Установка жирного шрифта …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Font.Bold = 1; 1 — жирный шрифт, 0 — нормальный
Установка курсива …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Font.Italic = 1; 1 — курсив, 0 — нормальный
Установка подчеркнутого шрифта …… Sheet_Excel.Cells(НомерСтроки, НомерКолонки).Font.Underline = 2; 2 — подчеркнутый, 1 — нет

Загрузка из Excel файла (через ADODB.Connection) в 1С 8.3:

&НаСервере
Процедура ЗагрузитьИзXLS_ADODB()// Создание COM-объекта для соединения
ADODB_conn = Новый COMОбъект(«ADODB.Connection»);// Установка строки соединения
ADODB_conn.ConnectionString = «Provider=Microsoft.ACE.OLEDB.12.0;
|Data Source=»+ИмяФайла+«;
|Extended Properties=»»Excel 12.0 XML;HDR=YES»»;»;
ADODB_conn.Open(); // Открытие соединения

// Создание COM-объекта для получения выборки

ADODB_rec = Новый COMОбъект(«ADODB.Recordset»);
ТекстЗапроса = «SELECT * FROM [ЛистN1$]»;// Выборка (запрос)
ADODB_rec.Open(ТекстЗапроса, ADODB_conn);// Обход результата выборки
Пока НЕ ADODB_rec.EOF() Цикл
ЗначениеКолонки1 = ADODB_rec.Fields.Item(«КолонкаN1»).Value; // Обращение по имени колонки
ЗначениеКолонки2 = ADODB_rec.Fields.Item(0).Value; // Обращение по индексу колонки
ADODB_rec.MoveNext();
КонецЦикла;ADODB_rec.Close();
ADODB_rec = Неопределено;
ADODB_conn.Close();
ADODB_conn = Неопределено;

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

Выгрузка в Excel файла (через ADODB.Connection) в 1С 8.3:

&НаСервере
Процедура ВыгрузитьВXLS_ADODB()// Создание COM-объекта для соединения
ADODB_conn = Новый COMОбъект(«ADODB.Connection»);// Установка строки соединения
ADODB_conn.ConnectionString = «Provider=Microsoft.ACE.OLEDB.12.0;
|Data Source=»+ИмяФайла+«;
|Extended Properties=»»Excel 12.0 XML;HDR=YES»»;»;
ADODB_conn.Open(); // Открытие соединения

// Создание COM-объекта для команды

ADODB_com = Новый COMОбъект(«ADODB.Command»);
ADODB_com.ActiveConnection = ADODB_conn;// Присвоение текста команды для создания таблицы
ADODB_com.CommandText = «CREATE TABLE [ЛистN1] (КолонкаN1 char(255), КолонкаN2 date, КолонкаN3 int, КолонкаN4 float)»;
ADODB_com.Execute(); // Выполнение команды

// Присвоение текста команды для добавления строки таблицы

ADODB_com.CommandText = «INSERT INTO [ЛистN1] (КолонкаN1, КолонкаN2, КолонкаN3, КолонкаN4) values (‘абвгдеё’, ‘8/11/2017’, ‘12345’, ‘12345,6789’)»;
ADODB_com.Execute(); // Выполнение команды

// Удаление команды и закрытие соединения

ADODB_com = Неопределено;
ADODB_conn.Close();
ADODB_conn = Неопределено;

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

Создание нового листа Excel со структурой (через ADODB.Connection) в 1С 8.3:

&НаСервере
Процедура СозданиеНовогоЛистаВXLS_ADODB()// Создание COM-объекта для работы с книгой
Book_Excel = Новый COMОбъект(«ADOX.Catalog»);
Book_Excel.ActiveConnection = Соединение;// Создание COM-объекта для работы со структурой данных на листе
Excel_App = Новый COMОбъект(«ADOX.Table»);
Excel_App.Name = «ЛистN1»;
Excel_App.Columns.Append(«КолонкаN1», 202);
Excel_App.Columns.Append(«КолонкаN2», 7);
Excel_App.Columns.Append(«КолонкаN3», 5);
// Тип колонки (необязательный параметр):
// 5 — adDouble;
// 6 — adCurrency;
// 7 — adDate;
// 11 — adBoolean;
// 202 — adVarWChar;
// 203 — adLongVarWChar.

// Создание в книге листа с описанной структурой

Book_Excel.Tables.Append(Excel_App);
Excel_App = Неопределено;
Book_Excel = Неопределено;

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

Справочно: Объекты ADO для работы с Excel в 1С 8.3:

Connection
Command
Errors
Fields
Parameters
Properties
Recordset
Record
Stream

В строке соединения параметр HDR определяет как будет восприниматься первая строка на листе.

NO — первая строка воспринимается как данные. К значениям можно обращаться только по индексу колонки.

YES — первая строка воспринимается как названия колонок. К значениям можно обращаться по имени и по индексу колонки.

Выгрузка в Excel файл (через COMSafeArray) в 1С 8.3:

&НаСервере
Процедура ВыгрузитьВXLS_COMSafeArray(Выб_Таблица)

Если

Выб_Таблица.Количество() = 0 Тогда
Сообщить(«Пустая таблица! Операция прервана!»);
Возврат;
КонецЕсли;

Если НЕ

ЗначениеЗаполнено(Объект.Файл) Тогда
Сообщить(«Выберите файл! Операция прервана!»);
Возврат;
КонецЕсли;

Попытка

Excel_App = Новый COMОбъект(«Excel.Application»);
Excel_App.Interactive = Ложь;
Excel_App.DisplayAlerts = Ложь;
Исключение
Сообщить(«Не удалось подключиться к Excel, возможно программа на компьютере не установлена! Операция прервана!»);
Возврат;
КонецПопытки;КолонкиТаблицы = Выб_Таблица.Колонки;СтартМассив = Новый Массив;
Для каждого Колонка Из КолонкиТаблицы Цикл
СтартМассив.Добавить(Выб_Таблица.ВыгрузитьКолонку(Колонка.Имя));
КонецЦикла;РазмерМассив = Новый Массив;
РазмерМассив.Добавить(КолонкиТаблицы.Количество());
РазмерМассив.Добавить(Выб_Таблица.Количество());МассивArray = Новый COMSafeArray(СтартМассив, «VT_VARIANT», РазмерМассив);НачальнаяСтрока = 2;Book_Excel = Excel_App.Workbooks.Add();
Sheet_Excel = Book_Excel.Sheets(1);
Кол_Строк = Выб_Таблица.Количество()+1;
Кол_Колонок = КолонкиТаблицы.Количество();
Sheet_Excel.Range(Sheet_Excel.Cells(2,1), Sheet_Excel.Cells(Кол_Строк, Кол_Колонок)).Value = МассивArray;
a=0;
Для каждого Колонка Из КолонкиТаблицы Цикл
a=a+1;
Sheet_Excel.Cells(1,a).Value = Колонка.Имя;
Sheet_Excel.Columns(a).EntireColumn.AutoFit();
КонецЦикла;

Попытка

Book_Excel.SaveAs(Объект.Файл);
Исключение
Book_Excel.Close();
Book_Excel = Неопределено;
Сообщить(«Ошибка при записи файла! Операция прервана!»);
Возврат;
КонецПопытки;Excel_App.Interactive = Истина;
Excel_App.DisplayAlerts = Истина;
Excel_App.Application.Quit();
Excel_App = Неопределено;

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

Загрузка из Excel файла (напрямую через табличный документ) в 1С 8.3:

&НаСервере
Процедура ЗагрузитьИзXLSНапрямую()// Начиная с версии 1С 8.3.8 (только &НаСервере)ТабличныйДокумент.Прочитать(Объект.Файл, СпособЧтенияЗначенийТабличногоДокумента.Значение); //Способ чтения: Значение, ТекстКонецПроцедуры

Выгрузка в Excel файл (напрямую через табличный документ) в 1С 8.3:

&НаСервере
Процедура ВыгрузитьВXLSНапрямую()// Начиная с версии 1С 8.3.8 (можно и &НаКлиенте и на &НаСервере)ТабличныйДокумент.Записать(Объект.Файл, ТипФайлаТабличногоДокумента.XLSX); //Тип файла: XLS95, XLS97, XLSXКонецПроцедуры

💡 Готовые модели кода (шаблоны) с «Excel» 1С:

Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник

Источник

Как из 1С выгрузить таблицу или файлы в Эксель (Excel)

Метод 1: Берем каждую ячейку отдельно

Метод 2: вставляем список в заранее подготовленный Excel

Метод 3: оформляем отдельный новый документ

Метод 4: копируем диапазон

Метод 5: можно ли из 1С выгрузить документ в привычном уже формате Excel и сохранить

Форматы переноса данных любого вида и размера из 1С в удобный Эксель

Готовые решения для всех направлений

Как сделать выгрузку клиентов или отчетов из 1С в Excel программным путем

Метод 1: вызываем сохранение таблицы

Метод 2: задействуем механизм Excel.Aplication

Как вывести данные из 1С и перенести их в Excel: способы выгрузки из 1C

Как выгрузить из 1С любые понадобившиеся данные ячейки по товару или по созданному ранее справочнику в 1C в Excel (Эксель)

Как сделать выгрузку из 1С 8 в Эксель (Excel) большого количества данных

Как из «1С: Предприятие» выгрузить печатные формы документов или файлов в Excel

Как отправить базу целиком (в файл .dt)

Выгрузка из 1С в Excel отчетности и ее форм для комфортной печати

Как скопировать и вывести таблицу или данные любого объема в доступный для редактирования Эксель (Excel) – для версии 1С 8.3

Выгрузка информации из 1C в Excel

Способ 1: копирование содержимого ячейки

Способ 2: вставка списка в существующую книгу Excel

Способ 3: создание новой книги Excel со списком

Способ 4: копирование диапазона из списка 1С в Excel

Способ 5: Сохранение документов в формате Excel

Вопрос про формат ячейки.

Похожие темы (5)

Поиск