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
  Corel Draw 2019 Suite Böhnix 0 59 16.09.2023, 13:47
Letzter Beitrag: Böhnix
  Größenproblem in Corel Draw 2023 malexel 2 530 06.08.2023, 11:46
Letzter Beitrag: malexel
  Corel X6 Symbole /Symbolleiste zu klein Galantuomo 15 4.485 02.08.2023, 12:15
Letzter Beitrag: Preamolar24
  Speichern in Vorversion von Corel Draw Artman 1 198 11.07.2023, 21:10
Letzter Beitrag: Gerrie25
  Tabellen in Corel 2020 Archer 2 164 11.07.2023, 11:25
Letzter Beitrag: norre
  Drucker Kalibrieren (Corel Draw) anorak 1 215 08.07.2023, 08:22
Letzter Beitrag: koter
  Corel Draw Farbprofile Lupidraw 8 351 26.05.2023, 14:43
Letzter Beitrag: mvm
  Corel Installation SetupARP.exe oder Setup.exe Wildfried 1 253 14.05.2023, 20:29
Letzter Beitrag: Aya
  vorlage nach pixelgröße erstellen panzerauto 1 238 11.05.2023, 12:16
Letzter Beitrag: Karthagos
  Textzeilen in einzelne Text-Objekte aufteilen Karthagos 8 413 01.05.2023, 10:34
Letzter Beitrag: Karthagos