Импорт из Excel в pdf

@ara_gorn · Регистрация: 07.06.2011

Студворк — интернет-сервис помощи студентам

Народ подскажите пожалуйста как импортировать один, определенный лист из экселя в pdf не стандартными средствами, а посредством кода vba

@Ципихович Эндрю · 05.09.2011, 16:54

извините, а если документ Ворда??

@аналитика · 05.09.2011, 17:46

так же (почти, синтаксис слегка отличается)

Visual Basic
1
2
3
4
5
6
7
    Selection.ExportAsFixedFormat OutputFileName:= _
        "C:\Мог_бы_и_сам_догадаться.pdf", _
        ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
        wdExportOptimizeForOnScreen, ExportCurrentPage:=False, Item:= _
        wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
        CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
        BitmapMissingFonts:=False, UseISO19005_1:=False

@Ципихович Эндрю · 05.09.2011, 22:15

говорит выделяяя ".ExportAsFixedFormat" метод не определён
???

@Ципихович Эндрю · 05.09.2011, 23:53

у меня 2003 й, из последнего сообщения не понял
как быть???

@Ципихович Эндрю · 06.09.2011, 00:31

то есть код в сообщении 4 копирнуть и ждать пока появится 2007 или 2010??, ОК!!

@ara_gorn · 06.09.2011, 12:57 **[ТС]**

Сообщение от аналитика

если у тебя XL >= 2007, то

Visual Basic
1
2
3
Range("b2:c13").ExportAsFixedFormat Type:=xlTypePDF, Filename:= "C:\Проба.pdf", Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False

простите, я не точно выразился, мне нужно универсальное средство импорта (наверное точней экспорта, когда "наружу"(все время путаю)) для exel 2000- 2007
а в данном методе нужно указывать только диапозон или можно sheets(х)

@аналитика · 06.09.2011, 13:26

данный метод является методом след. классов:

Chart
Range
Workbook
Worksheet

@ara_gorn · 07.09.2011, 13:28 **[ТС]**

а по поводу универсального метода для exele 2000-2007 или метод подходит для любого офиса?

@Busine2009 · 07.09.2011, 14:38

Чтобы загнать в PDF нужны специальные программы, например, Adobe PDF (платная программа), doPDF v7 (бесплатная программа, но PDF-файлы, сделанные с её помощи, не воспринимаются программой Adobe PDF (например нельзя будет файл из формата PDF перевести в текст). Т.е. вам надо сначала установить на своём компьютере программу по переводу формата Excel в PDF.
Далее нужно узнать имя PDF принтера, чтобы на него печатать. Для этого нужно сделать следующее:

в самом Excel: Файл – Печать (для Excel 2003, 2010); Круглая кнопка – Печать (для Excel 2007). Появится диалоговое окно;
выберите принтер, с помощью которого будете создавать PDF-файлы, - Закрыть;
затем нужно перейти в VBA и сделать следующее: View – Immediate Window. Появится диалоговое окно;
вставьте туда этот код:
Visual Basic
1
print application.ActivePrinter
поставьте курсор в конце только что вставленного кода;
нажмите клавишу Enter – появится имя выбранного принтера. Это имя будет использоваться в дальнейшем в коде.

Далее используйте этот код (смотрите комментарии – они зелёным цветом). В этот код вам надо будет занести свои данные.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Процедура1()
Dim Принтер As String
'Запоминаем активный принтер, чтобы после выполнения
'кода был нужный принтер.
Принтер = Application.ActivePrinter
'Выбираем PDF-принтер.
Application.ActivePrinter = "Adobe PDF (Ne02:)"
'Собственно распечатка первого листа Excel.
Worksheets(1).PrintOut From:=1, To:=1, Copies:=1, _
    Preview:=False, PrintToFile:=False, Collate:=True
'Возвращаем на место прежний активный принтер.
Application.ActivePrinter = Принтер
End Sub

@ara_gorn · 08.09.2011, 09:48 **[ТС]**

Прошу прощения, спасибо за помощь, но у меня еще один вопрос, один знакомый написал програмулину, которая с формы переносила данные на заданный формуляр в формате pdf, на сколько я помню, ни каких дополнительных программ устанавливать не требовалось, единственное если на комп не установлен Adobe reader 9 посмотреть или распечатать созданный фалы не удастся, я бы спросил у него, но он к сожалению писал все на delphi,
В связи с этим собсно вопрос, можно ли еще как либо экспортировать лист в pdf не прибегая к установке доп ПО,

@Busine2009 · 08.09.2011, 10:06

Сообщение от ara_gorn

я бы спросил у него, но он к сожалению писал все на delphi,

вы спросите у него: нужны ли PDF-программы для работы его программы.

@ara_gorn · 08.09.2011, 15:36 **[ТС]**

Сообщение от Busine2009

вы спросите у него: нужны ли PDF-программы для работы его программы.

использовал fastreport

мне просто интересно другое, если я файл exele потом на другой комп перенесу, там тоже потребуется доп ПО для экспорта, способом указанным Вами выше

Добавлено через 5 часов 9 минут
кстате а если подключить какой нибудь DLL, то как тогда,

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

@ara_gorn 2 / 2 / 1 Регистрация: 07.06.2011 Сообщений: 95

	Импорт из Excel в pdf 05.09.2011, 15:39. Показов 9999. Ответов 12 Метки нет (Все метки) Народ подскажите пожалуйста как импортировать один, определенный лист из экселя в pdf не стандартными средствами, а посредством кода vba 0

@Ципихович Эндрю 1712 / 579 / 76 Регистрация: 10.04.2009 Сообщений: 9,330
	05.09.2011, 16:54
	извините, а если документ Ворда?? 1

@Ципихович Эндрю 1712 / 579 / 76 Регистрация: 10.04.2009 Сообщений: 9,330
	05.09.2011, 22:15
	говорит выделяяя ".ExportAsFixedFormat" метод не определён ??? 1

@Ципихович Эндрю 1712 / 579 / 76 Регистрация: 10.04.2009 Сообщений: 9,330
	05.09.2011, 23:53
	у меня 2003 й, из последнего сообщения не понял как быть??? 1

@Ципихович Эндрю 1712 / 579 / 76 Регистрация: 10.04.2009 Сообщений: 9,330
	06.09.2011, 00:31
	то есть код в сообщении 4 копирнуть и ждать пока появится 2007 или 2010??, ОК!! 1

@аналитика здесь больше нет... 3376 / 1674 / 184 Регистрация: 03.02.2010 Сообщений: 1,219
	06.09.2011, 13:26
	данный метод является методом след. классов: Chart Range Workbook Worksheet 0

@ara_gorn 2 / 2 / 1 Регистрация: 07.06.2011 Сообщений: 95
	07.09.2011, 13:28 [ТС]
	а по поводу универсального метода для exele 2000-2007 или метод подходит для любого офиса? 1

@ara_gorn 2 / 2 / 1 Регистрация: 07.06.2011 Сообщений: 95
	08.09.2011, 09:48 [ТС]
	Прошу прощения, спасибо за помощь, но у меня еще один вопрос, один знакомый написал програмулину, которая с формы переносила данные на заданный формуляр в формате pdf, на сколько я помню, ни каких дополнительных программ устанавливать не требовалось, единственное если на комп не установлен Adobe reader 9 посмотреть или распечатать созданный фалы не удастся, я бы спросил у него, но он к сожалению писал все на delphi, В связи с этим собсно вопрос, можно ли еще как либо экспортировать лист в pdf не прибегая к установке доп ПО, 0