Corel DRAW X5

[koter]

hallo Boxer,

Etwas kleines noch, die Schriftgröße und den Schriftstile, daß kann man ja
über die Zeichenformatierung machen oder?

Ja, Du kannst es aber auch ins Makro packen:

Code:

With NrText
   .Text.Story.Font = Schriftart
   .Text.Story.Size = 12 ' Größe
   .Text.Story.Bold = False ' Fett
   .Text.Story.Italic = False ' Kursiv
   .Text.Story.Alignment = cdrCenterAlignment
   .CenterX = REck.CenterX
   .CenterY = REck.CenterY
   .OrderToBack
   .Name = "Nr " & Nr
End With

Bei Fett und Kursiv musst Du False durch True ersetzen.

Bei einer nachträglichen manuellen Änderung
müsstest Du die Ausrichtung auch manuell anpassen.

Gruß

Koter