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

Makra - dodawanie ramki strony

michal.s - 12 Sierpień 2014, 00:10
Temat postu: dodawanie ramki strony
Witam Wszystkich ponownie.
Zwracam się o radę w sprawie jak w temacie.
A mianowicie:
Jak zapisać w makrze, żeby wstawiało prostokąt w formacie strony.
Np. mam stronę 1000/500 mm i wstawia nam prostokąt o takim formacie.
Jeżeli mamy stronę o formacie 1200/800 mm to wstawia prostokąt o formacie 1200/800 mm

Próbowałem nagrać makro, ale działa tylko w takim formacie jak zostało nagrane.
Jeżeli mam inny format strony to wstawi format prostokąta z nagranego makra.

Pomożecie??? :-)

Cysorz - 12 Sierpień 2014, 01:51

Kliknij dwa razy w ikonę prostokąta i nie będzie Ci potrzebne żadne makro...
chezare - 12 Sierpień 2014, 09:27

Malutki ma oczywiście rację, ale jak byś chciał makrem, to by było jakoś tak :-)

Sub ramka()
Dim prostokat As Shape
Dim x As Double
Dim y As Double
ActivePage.GetSize x, y
Set prostokat = ActiveLayer.CreateRectangle(0, y, x, 0)
End Sub

michal.s - 12 Sierpień 2014, 19:47

Malutki, dzięki za sugestię :-)
W taki sposób sobie dotychczas radziłem, ale dzięki poradzie chezare mogę kilka czynności połączyć w jeden ciąg. A mianowicie dotychczas importowałem kilka grafik, rozmieszczam je w narożnikach strony, potem wstawiam ramkę, skalowałem i.... trwało to całą wieczność... wybieranie za każdym razem tych samych okien..., plików.... wstawianie ramki strony, skalowanie.... BRRRRRRRRRR... :-(

A tu teraz jeden klik i JABADABADUUU... :-)

BARDZO DZIĘKUJĘ WAM ZA POMOC :-) chezare KOLEJNĄ POMOC :poklon )


Powered by phpBB modified by Przemo © 2003 phpBB Group