#0
by VadimMS
Обработкой формируюся 2 печатные формы:подскажите как я могу их сохранить из 1С в один ексель-файл, но на 2 листах.
#4
by Heckfy
Может поможет. Таблицы 1С и Excel. Многие пользователи для удобства работы сохраняют таблицы 1С (печатные формы) в формате Excel (*.xls). После чего в полученном файле делают различные группировки, сортировки, вычисления и т.п. Связано это с тем, что в таблицах 1С нет такого огромного функционала как в таблицах Excel. Но в версии 1С 8.0 есть нововведения, делающих работу с таблицами более комфортной. На сайте 1С есть полезная программка, которая дает возможность открывать таблицы 1С в Excel и сохранять лист Excel как таблицу 1С. Это пригодится в том случае, если таблицу 1С не сохранили в формате Excel, а на том компьютере, где нужно открыть эту таблицу не установлена 1С. Да и постоянно помнить о том, что сохранить таблицу 1С нужно в формате Excel, не будет необходимости. Полная информация о программе находится здесь. Скачать программу можно здесь (архив zip 682 739 байт). Замечание: В Excel разделителем дробной части считается символ ",". Поэтому перед сохранением таблицы 1С в формате Excel замените в ней другой разделитель (например ".") на ",". Иначе в Excel с этими числами не удастся произвести вычисления, или они вообще не будут отображаться как числа. Например, в таблице 1С "15.2" отобразится в Excel как "15.фев". Получение данных из Excel. Доступ из 1С к Excel производится посредством OLE. Например, код Попытка позволит нам получить доступ через переменную "Эксель" к запущенному приложению Excel. А далее уже можно получить доступ к книге (файлу), листу и ячейке с данными. Далее примеры кода. Открытие книги (файла): Книга = Эксель.WorkBooks.Open(ПутьКФайлу); ПутьКФайлу - полный путь к файлу книги Excel. Выбор листа книги для работы с ним: Лист = Книга.WorkSheets(НомерЛиста); или Лист = Книга.WorkSheets(ИмяЛиста); НомерЛиста - номер листа в книге, ИмяЛиста - имя листа в книге. Получение значения ячейки листа: Значение = Лист.Cells(НомерСтроки, НомерКолонки).Value; НомерСтроки, НомерКолонки - номер строки и номер колонки, на пересечении которых находится ячейка. Важно: не забывайте поле выполнения нужных действий добавлять код Эксель.Quit; , иначе запущенный процесс останется незавершенным и будет занимать память и процессор компьютера. Вывод данных в Excel. Для вывода (выгрузки) данных в Excel необходимо либо открыть существующую книгу, либо создать новую, и выбрать рабочий лист для вывода данных. Открытие существующей книги описано выше, а для создания новой книги нужно использовать следующий код: Попытка Так как при создании книги в Excel автоматически создаются листы (Сервис->Параметры->Общие->Листов в новой книге), то нужно лишь произвести выбор листа, с которым будет вестись работа: либо добавить в книгу новый лист, если необходимо: Лист = Книга.Sheets.Add; Следующим шагом будет установка значения ячейки: Лист.Cells(НомерСтроки, НомерКолонки).Value = Значение; НомерСтроки, НомерКолонки - номер строки и номер колонки, на пересечении которых находится ячейка. И в конце нужно произвести запись созданной книги: Попытка Книга.SaveAs(ПутьКФайлу); КонецПопытки; ПутьКФайлу - полный путь к файлу книги Excel (включая имя). Важно: не забывайте, что в имени файлов не должно содержаться символов / : * ? " > < |. Часто используемые методы для чтения/установки значений в Excel. Эксель = СоздатьОбъект("Excel.Application"); Получение доступа к приложению Excel. Эксель.Visible = Видимость; 0 - Excel не виден, 1 - виден. Книга = Эксель.WorkBooks.Add; Создание новой книги (файла) Excel. Книга.SaveAs(ИмяФайла); Сохранение книги Excel. Лист = Книга.WorkSheets.Add; Добавление нового листа в книгу. Книга = Эксель.WorkBooks.Open(ИмяФайла); Открытие существующей книги (файла) Excel. Лист = Книга.WorkSheets(НомерЛиста); Установка листа в качестве рабочего с номером НомерЛиста. Лист.Name = ИмяЛиста; Задание рабочему листу имени ИмяЛиста Лист.PageSetup.Zoom = Масштаб; Задание параметра страницы "Масштаб" (от 10 до 400). Лист.PageSetup.Orientation = Ориентация; Ориентация: 1 - книжная, 2 - альбомная. Лист.PageSetup.LeftMargin = Эксель.CentimetersToPoints(Сантиметры); Задание левой границы (в сантиметрах). Лист.PageSetup.TopMargin = Эксель.CentimetersToPoints(Сантиметры); Задание верхней границы (в сантиметрах). Лист.PageSetup.RightMargin = Эксель.CentimetersToPoints(Сантиметры); Задание правой границы (в сантиметрах). Лист.PageSetup.BottomMargin = Эксель.CentimetersToPoints(Сантиметры); Задание нижней границы (в сантиметрах). Лист.Columns(НомерКолонки).ColumnWidth = Ширина; Задание ширины колонке. Лист.Cells(НомерСтроки, НомерКолонки).Value = Значение; Ввод данных в ячейку. Лист.Cells(НомерСтроки,НомерКолонки).Font.Name = ИмяШрифта; Установка шрифта в ячейке. Лист.Cells(НомерСтроки,НомерКолонки).Font.Size = РазмерШрифта; Установка размера шрифта в ячейке. Лист.Cells(НомерСтроки,НомерКолонки).Font.Bold = Жирный; 1 - жирный шрифт, 0 - нормальный. Лист.Cells(НомерСтроки,НомерКолонки).Font.Italic = Курсив; 1 - наклонный шрифт, 0 - нормальный. Лист.Cells(НомерСтроки,НомерКолонки).Font.Underline = Подчеркнутый; 2 - подчеркнутый, 1 - нет. Лист.Cells(НомерСтроки, НомерКолонки).NumberFormat = Формат; Установка формата данных ячейки. Лист.Cells(НомерСтроки,НомерКолонки).Borders.Linestyle = ТипЛинии; Установка рамок ячейки. 1 - тонкая сплошная.
#5
by VadimMS
4- ок, у меня уже есть процедуры формирования печатной формы в 1С, теперь мне еще нужно написать то же самое только в ексель файл? через Таб.Записать(ПутькФайлу) не получиться ??
Тэги: 1С 7.7 и ранее
Ответить:
Комментарии доступны только авторизированным пользователям
Похожие вопросы 1С
- v7: v7 : НДС при возврате
- v7: Что нужно чтоб подключить ККМ Меркурий 112F к 1с V7 Торговля + склад
- v7: v7.7 премещение элемента справочника
- v7: v8: v7: Кто-нибудь сумел скачать комплект отчетности за I квартал 2007 года
- v7: Отображения списка значений v7
- v7: 1С V7.7 в сети
- v7: 1C:V7 starter program (for SQL) - обнаружена ошибка
- v7: Открытие формы элемента справочника из формы списка
- v7: Таблица в режиме ввода данных v7
- v7: Перенос данных Бухгалтерия из v7 в v8
- v7: Не могу сохранить отчет в формате xls. Меню "Сохранить как" не активно. Этокак ?
- v7: v7 Перехват глобального события ПриЗаписи() или ОбработкаПроведения()
В этой группе 1С
- Столбцы в при выводе макета ставятся стандартной ширины!?
- v7: Два раза попадают счета фактур в книгу продаж
- Как добавить свои параметры в рапорт руководителя.
- "Ошибка инициализации ODBC!"-патчим движок по методу Romix`a
- Как правильно создать в конфигураторе счет, если такой уже создан вручную?
- Есть мысли как по тайм ауту закрывать окно выбора пользователя 1с ?
- Загрузка банков с РБК
- начисление по б.л в ЗУП - как выделить 2 дня за счет работадателя
- При формировании отчета 1С Зависает
- Средний заработок после перерасчета окладов
- Выгрузка данных из базы СКБ Контур "Персонал" в 1С:Зарплата и Управление пе
- v8: Как определить какая у текущего пользователя роль(всегда одна)
- Как в Visual FoxPro передать в функцию аргументом пустую строку?
- Для исполнения запраса недостаточно памяти. Размер выборки превышает ХХХХХ байт
- Как в базе проверить уникальность кода и номера документа
- Можно ли обработать двойной клик мышкой по шапке таблицы?
- Настройка прав: чем отличается право на редактирование от права на изменение?
- Formex: Альфу: как-то интересно ПриЗагрузкеВнешнегоОтчета()
- Где можно скачать свежый дистрибутив опенконфа?
- Можно ли программно управлять содержимым полей Описание и Подсказка?