Przesunięty przez: roland 26 Maj 2011, 07:43 |
skrypt wyłączający warstwy |
Autor |
Wiadomość |
dede
Początkujący
Dołączył: 09 Paź 2009 Posty: 1 Skąd: Poznań
|
Wysłany: 9 Październik 2009, 07:32 skrypt wyłączający warstwy
|
|
|
Witam,
Potrzebuję wsparcia przy rozszerzenia skryptu do zamiany cdr na pdf. Korzystam do tego z wx_FileConwerter (różni się od standardowego właśnie dodaną funkcją pdf).
Dokładniej chodzi mi o wyłączenie dwóch warstw w corelu w trakcie działania wx_FileConverter.
Plik składają się z trzech podstawowych warstw:
1 - warstwa ruchoma,
2 - podkład,
3 - prowadnice.
I przed zapisaniem do pdf'a muszą być wyłączone do druku warstwy 2 - podkład i 3 - prowadnice.
Czy ktoś wie jak to zrobić z automatu.
Będę wdzięczny za pomoc.
Daniel |
|
|
|
|
wawel
Ekspert wawel
Pomógł: 261 razy Dołączył: 30 Mar 2008 Posty: 2143 Skąd: podgorze
|
Wysłany: 10 Październik 2009, 17:50
|
|
|
a moze zrobic to w 2 krokach
jeden (pierwszy) to uzycie np: tego skryptu (macro) na ost.. otwartym dokumencie przy wszystkich otwartych ktore chcemy zmieniac.
Sub ReplaceLayerPrintOptions()
Dim d As Document
Dim p As Page
For Each d In Documents 'Loop all the open documents
For Each p In d.Pages 'Loop each page
p.Layers("Prowadnice").Printable = False
p.Layers("podklad").Printable = False
Next p
d.Save
d.Close
Next d
End Sub
Skrypt dziala na wszystkich rownoczesnie otwartych dokumentach (moze ich byc wiele)
Otwarte pliki musza zawierac warstwy o nazwach Prowadnice i podklad, moga oczywiscie byc tez inne ale te wymienione musza byc.
Dzialanie skryptu polega na wylaczeniu drukarek na warstwach podklad i Prowadnice a nast. zapisanie i zamkniecie wszystkich dokumentow.
Na wersji corel 12 dziala jak na innych nie wiem.
a nast. uzycie juz na zmienionych i zapisanych plikach wx_FileConverter. |
|
|
|
|
|