Kann mir jemand sagen, wie ich einen Text per Macro erstelle? Wenn ich ein Macro aufzeichne, Textfeld erstelle und Text tippe, dann sagt er die Aufzeihnung dieser Funktion wird nicht unterstützt.
Ich kann zwar einen Text importieren, aber wie kann ich ihn dann formatieren? Ausrichtung, Schriftart, Größe etc.
Danke
![[-]](https://forum.juergens-workshops.de/images/collapse.png)
•
Beiträge: 58
Themen: 10
Danke erhalten: 0 in 0 Posts
Danke gesagt: 0
Registriert seit: 02.02.2009
Hi,
das geht in meiner Version 12 auch nicht. Scheinbar ist der Bereich ausgenommen.
Gruß
surfy
•
Beiträge: 4.600
Themen: 265
Danke erhalten: 81 in 69 Posts
Danke gesagt: 85
Registriert seit: 19.11.2007
Hallo Surfy,
falls Dich Macros ernsthaft interessieren, suche mal auf englisch sprachlichen Webseiten. Durch ein paar kleine Anpassungen und durch die entsprechenden VBS-Module soll es angeblich doch gehen.
Freundliche Grüße vom Unkraut
Betriebssystem / Grafik-Software: Win 7
•
Beiträge: 150
Themen: 3
Danke erhalten: 0 in 0 Posts
Danke gesagt: 0
Registriert seit: 01.02.2009
07.02.2009, 17:39
(Dieser Beitrag wurde zuletzt bearbeitet: 07.02.2009, 21:27 von Nimbin.)
Bei der Makro-Aufzeichnung wird die Erstellung von Textfeldern generell nicht unterstützt.
Das musst du schön von Hand erstellen.
Am effektivsten arbeitest du so:
1. Text normal in Corel Draw reintippen.
2. Text markieren
3. Dein Makro starten
4. Das Makro greift auf die ActiveSelection zu
z. B. setzt der code unten deinen markierten Text auf Italic
s=ActivePage.Activeselection
t=s.text
t.Story.Paragraphs.Italic =True
Alternativ kannst du im Makro auch Text erstellen, zum Beispiel so:
s = ActiveLayer.CreateArtisticText(1, 2, "Blablabla")
Den Inhalt könntest du dann über ein Textfeld in einer Userform abfragen und dann nach s schreiben, aber die Methode oben ist da besser.
Hoffe, ich habe jetzt nicht sämtliche Klarheiten beseitigt...
•
