Hallo Catia-Gemeinde.
Bin neu hier im Forum, aber noch neuer in Sachen Makros.
Bin gerade dabei mich einzufuchsen.
Dabei trat auch gleich ein Problem auf...
Und zwar möchte ich in einer Drawing per Makro die Schriftart ändern.
Den Text Schriftart auf "Swis721 LtCn BT" und Bemaßung gleiche Schriftart und Schriftgröße 3,5mm.
Hab mit dem Recorder folgendes aufgezeichnet:
Language="VBSCRIPT"
Sub CATMain()
Set drawingDocument1 = CATIA.ActiveDocument
Set selection1 = drawingDocument1.Selection
selection1.Search "CATDrwSearch.DrwText,all"
Set selection2 = drawingDocument1.Selection
selection2.Search "CATDrwSearch.DrwDimension,all"
End Sub
In der Doku stand: MyText.SetFontName 0, 0, "Courrier 10 BT"
Aber ich bekomme es nicht hin...
Kann mir jemand helfen??? Danke im Voraus.
Gruß bronnerc
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP