Zobacz temat - Export do pdf pojedyńczej strony

Corel FORUM
Forum użytkowników programów firmy Corel. Grafika wektorowa, rastrowa i obróbka zdjęć cyfrowych

CorelDRAW - grafika wektorowa - Export do pdf pojedyńczej strony

dj_maras - 17 Lipiec 2015, 20:18
Temat postu: Export do pdf pojedyńczej strony

Witam, mam plik, kilknaście stron... mogę jakoś wyeksportować każdą pojedyńczo do pdf czy mam kopiować i sie bawić ???

Cysorz - 17 Lipiec 2015, 21:51

Spod Corela nie, trzeba zaznaczać po kolei.
Spod Acrobata tak.

tegraf - 17 Lipiec 2015, 23:06

A po co kopiować? Do czego?

chezare - 17 Lipiec 2015, 23:24

Oczywiście że można zapisać do pdf dowolne strony z dokumentu Corela, nie można tylko zmienić ich kolejności, tzn. można zapisać 1 i np. 3, ale nie da się 3 i 1, będzie najpierw 1, później 3. Można to obejść przestawiając strony w dokumencie.

Działa to tak:
W dokumencie było 7 stron,
w pierwszym przypadku do pdf została zapisana strona 1 i 3
w drugim 2 i 3 (od 2 do 3)
w trzecim 2 i 3 (od 2 do 3) i 5 i 6 (od 5 do 6), można to zapisać też tak: 2,3,5,6
w czwartym 4,5,6,7, można zapisać 4-7
w piątym 1,2,3,4, można zapisać 1-4, albo 1,2,3,4

Cysorz - 18 Lipiec 2015, 00:43

chezare napisał/a:

/.../ Oczywiście /.../

Ja to zrozumiałem tak, że jeżeli dokument ma np. 13 stron, to dj_maras chciałby dostać podczas "jednorazowego" kliknięcia 13 oddzielnych plików. Tak się w Corelu nie da, trzeba by było zaznaczyć "Eksportuj tylko tą stronę" i tak 13 razy.
Poszłoby to pewnie szybciej niż napisanie tutaj nowego tematu, no ale w końcu od czego jest forum ;-)

chezare - 18 Lipiec 2015, 11:14

Całkiem niewykluczone że dobrze zrozumiałeś? Jeśli tak to faktycznie takiego wbudowanego mechanizmu nie ma, ale jest jeszcze VBA, np.

Kod:

Sub jedna_str_jeden_pdf2()
Dim i As Integer
'
' tu powinny być parametry publikacji pdf, ja wpisałem tylko typ i zakres
'
ActiveDocument.PDFSettings.pdfVersion = pdfVersionPDFX1a
ActiveDocument.PDFSettings.PublishRange = pdfCurrentPage

For i = 1 To ActiveDocument.Pages.Count
ActiveDocument.Pages(i).Activate
ActiveDocument.PublishToPDF Left(ActiveDocument.FullFileName, _
Len(ActiveDocument.FullFileName) - 4) + "_" + ActivePage.Name + ".pdf"
Next i
MsgBox "GOTOWE"
End Sub

dj_maras - 23 Lipiec 2015, 19:53

chezare dzięki za info !

poradziłem sobie, kopiując po kolei każdą stronę do nowego dokumentu i z wówczas eksportowałem...

chezare - 23 Lipiec 2015, 21:04

Jak Ci się nie chciało skopiować parę linijek tekstu i kliknąć 2x gryzoniem, albo zrobić tak jak napisałem na początku, to cierp. :-)

Cysorz - 24 Lipiec 2015, 03:23

dj_maras napisał/a:

/.../ kopiując po kolei każdą stronę do nowego dokumentu i z wówczas eksportowałem /.../

Pamiętam z wojska (tak, tak, byłem kiedyś) zamiatanie schodów szczoteczką do zębów pod górę albo wycieranie rozlanego wiadra wody sznurówką - taka operacja właśnie mi to przypomina :-D

.
dj_maras - nie czytasz odpowiedzi na własne pytania, szkoda...

chezare - 27 Lipiec 2015, 10:31

Całe szczęście, że na mojej kompanii żadnych schodów nie było. :-)

kula69 - 27 Lipiec 2015, 11:51

A U MNIE NIE BYŁO KOMPANII TYLKO ODZIAŁ I TO ZAMKNIĘTY ;)