Mehrere Objekte gleichzeitig drehen, um die eigene Achse
#1
Hallo,
ich habe eine Karte mit 1000 Hausnummern, die alle 90° verdreht sind. Die Hausnummer liegen einzeln als Textobjekt vor.
Ich will die Nummern jetzt drehen, aber natürlich jede um den eigenen Drehpunkt, nicht um einen gemeinsamen Drehpunkt.
Wie bekomme ich das am schnellsten hin?

Danke für alle Hinweise
Simon
Zitieren
#2
Hallo Simon,

Du kannst die Zahlen auswählen und einen VBA-Einzeiler in den Direktbereich eingeben und mit Enter abschließen:

[Bild: alledrehen75ks7.gif]

Code:
for each x in activeSelectionrange.Shapes.All: x.rotate 90 :next

Gruß

Koter
Zitieren
#3
Hi Koter,
das wäre ja sehr einfach.
Kannst du noch kurz einen Satz zum "Direktbereich" verlieren? Ich habe in Corel noch nicht mit VBA gearbeitet.
Wie rufe ich ihn auf?

Danke!
Zitieren
#4
Hallo Simon,

mit Alt+F11 öffnet sich der Makro-Editor. Wenn der Direktbereich dort nicht zu sehen ist, kann man ihn über das Menü Ansicht/Direktfenster oder mit Strg+G sichtbar machen.

Gruß

Koter
Zitieren
#5
Brilliant, einfach, effektiv!
Vielen Dank
Zitieren



Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  v2018: Objekte kombinieren mtemp 5 95 09.07.2019, 16:45
Letzter Beitrag: Unkraut
  Objekte und Text als Pfade / Vektorgrafik speichern corely 13 336 18.06.2019, 18:11
Letzter Beitrag: corely
  Objekte verschieben Heinzi 6 216 31.03.2019, 02:35
Letzter Beitrag: koter
  Mehrere Bilder skaliert einfügen anorak 4 195 27.11.2018, 12:58
Letzter Beitrag: norre
  Mehrere Maßstäbe in einer Zeichnung wdreinheim 9 447 18.08.2018, 20:13
Letzter Beitrag: wdreinheim
  Eigene jpg Füllmuster in CorelDraw 2018 Kohli2010 1 329 01.05.2018, 11:36
Letzter Beitrag: Unkraut
  Objekt-Manager - Ebenen und Objekte Karthagos 2 370 26.04.2018, 16:32
Letzter Beitrag: Karthagos
  Punkte und Objekte per Tastatureingabe verschieben? Micha1138 11 641 14.01.2018, 23:21
Letzter Beitrag: Micha1138
  Mehrere Objekte als Vorlage abspeichern druckstick 3 391 02.08.2017, 13:15
Letzter Beitrag: druckstick
  eigene Pfeilspitzen bei Bemaßung Karthagos 5 594 11.04.2017, 09:52
Letzter Beitrag: Karthagos