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

FAQFAQ  SzukajSzukaj  UżytkownicyUżytkownicy  GrupyGrupy
RejestracjaRejestracja  ZalogujZaloguj  DownloadDownload

Poprzedni temat «» Następny temat
Makro: wszystkie obiekty -> bitmapa -> PDF
Autor Wiadomość
shap
Bywalec


Dołączył: 04 Cze 2010
Posty: 21
Skąd: Opole
Wysłany: 20 Czerwiec 2024, 10:44   Makro: wszystkie obiekty -> bitmapa -> PDF

Witam,
jaki będzie wyglądało makro, które:
- zaznaczy wszystkie obiekty na danej stronie
- zamieni na bitmapę (np. 150dpi, rgb)
- przejdzie do kolejnej strony, zaznaczy wszystkie obiekty na danej stronie
- ...
- na koniec zapisze pdf (np. 150dpid, rgb)

;-)
 
 
Martin Nez 
Doradca
Grafik?


Wersja CorelDRAW: 2019
Pomógł: 14 razy
Dołączył: 29 Sty 2011
Posty: 115
Skąd: Czmoń
Wysłany: 14 Luty 2025, 20:36   

Późno, ale może komuś się przyda:
Kod:
Sub shap()
    Dim dpi As Integer
    dpi = 200
    For Each p In ActiveDocument.Pages
        p.Activate
        p.Shapes.All.ConvertToBitmap , , , , dpi
    Next
    ActiveDocument.PublishToPDF Left(ActiveDocument.FullFileName, Len(ActiveDocument.FullFileName) - 3) & "pdf"
End Sub
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Nowe zasady dotyczące cookies. Wykorzystujemy pliki cookies, aby nasz serwis lepiej spełniał Państwa oczekiwania. Można zablokować zapisywanie cookies, zmieniając ustawienia przeglądarki.
 

ABC CorelDRAW X7 PL

ABC CorelDRAW X7 PL
Roland Zimek

Cena: 39.90 z�

dodaj do koszyka
zobacz opis

 

CorelDRAW X7 PL. �wiczenia praktyczne

CorelDRAW X7 PL. �wiczenia praktyczne
Roland Zimek

Cena: 27.00 z�

dodaj do koszyka
zobacz opis

 

Corel PaintShop Pro X4. Obr�bka zdj�� cyfrowych. �wiczenia praktyczne

Corel PaintShop Pro X4. Obr�bka zdj�� cyfrowych. �wiczenia praktyczne
Roland Zimek

Cena: 34.90 z�

dodaj do koszyka
zobacz opis

 

Windows 10 Krok po kroku eBook

Cena: 68.59 z�
Dodaj do koszyka

 

Roblox Lua w 24 godziny. Tworzenie gier dla początkujących

Roblox Lua w 24 godziny. Tworzenie gier dla początkujących
Roblox Corporation

Cena: 34.50 zł
zobacz opis

Strona wygenerowana w 0.07 sekundy. Zapytań do SQL: 13