Text in Corel Vorlage anhand von Makro / VBA ändern
#1
Hallo und Moin,

wir möchten gerne folgendes tun.
Wir haben in einer Ebene von Corel Draw mehrere Texte. In der Corel Vorlage ist es ein Grafiktext dem wir einen Namen geben, z.B. Text1.

Nun würde ich gerne diesen Text per VBA-Befehl ändern, es soll darin ein Auftragsnummer stehen, die vorher in einer Textbox im Dialog eingegeben wird.

Leider haben meine bisherigen Versuche nicht funktioniert, vielleicht hat ja jemand eine Idee.

Gruß

Olaf

Betriebssystem / Grafik-Software: Corel Draw GS SE 2018
Zitieren
#2
Hallo Olaf,

das geht mit einem Einzeiler, den Du in eine Ereignisprozedur des Dialogs schreiben kannst:

Code:
Private Sub TextBox1_Change()
   ActivePage.Shapes("Text1").Text.Story = TextBox1.Text
End Sub

[Bild: auftragsnummerp3kjn.gif]

Wenn die Codezeile von einem anderen Modul ausgeführt werden soll, muss noch der Name des Dialogs vor den Namen der Textbox gesetzt werden.

Gruß

Koter
[-] 1 Benutzer bedankt sich bei koter für diesen Beitrag:
  • Olaf
Zitieren
#3
Guten Morgen Koter,

da wäre ich wahrscheinlich nie drauf  gekommen, schön das es mit so wenig Code funktioniert. 

Ich Danke Dir

Gruß

Olaf

Betriebssystem / Grafik-Software: Corel Draw GS SE 2018
Zitieren
#4
Moin,
falls sie so etwas oder ähnliches öfters machen kann ich ihnen als tipp geben, dass sie mal "corel draw schildergenerator" googeln.
Ich will hier jetzt keine Namen nennen oder Werbung machen.
Aber da gibt es sehr nützliche Programme für laufende Nummer und vieles andere.

Grüße
Cadman
[-] 1 Benutzer bedankt sich bei Cadman96 für diesen Beitrag:
  • Olaf
Zitieren
#5
Moin Cadman,

wir brauchen dies tatsächlich nur für eine sehr spezielle Anwendung aber vielen dank für den Tipp, vielleicht wird das ja später einmal interessant für uns. Wobei es so aussieht als wenn man das Programm bzw. die Corel / VBA Vorlage nur in Verbindung mit einem Laser erwerben kann.

Gruß

Olaf

Betriebssystem / Grafik-Software: Corel Draw GS SE 2018
Zitieren



Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  Grafik per Makro Exportieren Chrisbeee 9 360 26.01.2023, 06:03
Letzter Beitrag: koter
  RGB auf CMYK ändern Reserl 8 1.990 22.01.2023, 16:31
Letzter Beitrag: mvm
  Corel Draw Problem - Funktion Kontur Boshi 11 2.826 10.01.2023, 13:37
Letzter Beitrag: Boerni
  Text in russisch OsCor 3 346 20.11.2022, 14:30
Letzter Beitrag: OsCor
  Corel Tabellen pdf Problem gagman 2 337 08.11.2022, 20:56
Letzter Beitrag: gagman
  Corel Graphic Suite 2020 oder 2021 + Fragen dazu Woodpecker 0 352 30.10.2022, 16:51
Letzter Beitrag: Woodpecker
  Corel Draw Graphics Suite 2020 | Vollversion goe21 0 333 12.10.2022, 12:35
Letzter Beitrag: goe21
  Corel X7 funktioniert seit heute nicht mehr Stresser 2 426 07.10.2022, 01:15
Letzter Beitrag: Stresser
  Corel Draw umstellen Schrift von pt in mm Tony Platte 1 434 12.08.2022, 00:03
Letzter Beitrag: miss_marple
  Corel Draw Himmel 4 713 24.06.2022, 20:52
Letzter Beitrag: Himmel