Hab jetzt eine Lösung gefunden!
Also auch für Diejenigen die es auch mal benötigen...
Diesen Code (entsprechend anpassen)
---
Sub main
Dim startPoint As MbePoint
Dim point As MbePoint, point2 As MbePoint
MbeSendCommand "MDL SILENTLOAD CHNGTXT"
MbeSetAppVariable "CHNGTXT", "chTextInfo.oldString", "13alt"
MbeSetAppVariable "CHNGTXT", "chTextInfo.newString", "36neu"
MbeSendCommand "CHANGE TEXT ALL "
MbeSetAppVariable "CHNGTXT", "chTextInfo.oldString", "14alt"
MbeSetAppVariable "CHNGTXT", "chTextInfo.newString", "35neu"
MbeSendCommand "CHANGE TEXT ALL "
MbeSendCommand "MDL UNLOAD CHNGTXT"
End Sub
---
Stapelverarbeitung starten.
THX an CADstation
...Mischa
------------------
Konstruktionsbüro CADesign . www.3D-CADesign.de
[Diese Nachricht wurde von CADesign am 18. Sep. 2007 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP