+- Juergens-Workshops.de Forum (https://forum.juergens-workshops.de)
+-- Forum: Corel Grafik Forum (https://forum.juergens-workshops.de/forumdisplay.php?fid=65)
+--- Forum: Corel Draw (https://forum.juergens-workshops.de/forumdisplay.php?fid=93)
+--- Thema: X5 und X6 VBA Befehl "cdrToolDrawFreehand" funktioniert nicht (/showthread.php?tid=34052)
X5 und X6 VBA Befehl "cdrToolDrawFreehand" funktioniert nicht - Thomas Bayn - 04.12.2012
Ich bearbeite immer wieder eine große .cdr Datei, die einen großen Höhlenplan darstellt. Dafür habe ich mir für X4 einige praktische Makros geschrieben. Unter anderem benutze ich den Befehl (bzw. besser die Eigenschaft) cdrToolDrawFreehand, dass das Hilfsmittel "Freihand" auswählt. Gleiches könnte man mit der Tastatureingabe "F5" erreichen.
die codezeile lautet:
ActiveTool = cdrToolDrawFreehand
in X4 funktioniert alles gut, aber in X5 und X6 (Testversionen) wird der Befehl einfach ignoriert, ich habs auch schon mit:
ActiveTool = 5 probiert, es tut sich aber auch da nichts.
alle anderen Tools werden aber unterstützt.
Weiß eventuell jemand von euch einen Rat?
Viele Grüße
Thomas
X5 und X6 VBA Befehl "cdrToolDrawFreehand" funktioniert nicht - koter - 05.12.2012
Hallo Thomas,
versuch doch mal: SendKeys "{F5}"
Aber Achtung!
F5 startet im VBA-Editor die Sub, führt also zu einer Endlosschleife. Also nicht vom Editor aus starten!
Ich habe nur X4, kann also nicht testen ob es mit Deinen Versionen klappt.
Gruß
koter