RE: Routine to strip ALL AutoCAD Mtext

AutoCAD VBA

And - reset fonts to Arial...

OPTION EXPLICIT

Sub ResetTextStyles_TO_ARIAL()
''reset ROMANS and other text styles to ARIAL
Dim ObjTStyle As AcadTextStyle
For Each ObjTStyle In ThisDrawing.TextStyles
ObjTStyle.fontFile = "C:\WINDOWS\Fonts\ARIAL.TTF"
Next ObjTStyle
End Sub

Comments

Popular posts from this blog

Revit area plans adding new types and references (Gross and rentable)

Organization and management of data in Revit across omniclass, Masterformat, Uniclass, and Uniformat