dede - 9 Październik 2009, 07:32 Temat postu: 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 - 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. |
