---

Hallo Forum

Beim Abspielen eines Marcros spring bei Befehl

Part.AddDimension x, y, z

immer das Bemaßungsfenster in SW auf und
unterbricht das Macro !
Kann man das Abstellen bzw. mit einem
Automatischen Enterbefehl versehen so, daß
das Macro durchläuft !

mfg
ston

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo ston,

da hast du bei dir die Option "Bemaßungswert einsetzen" unter Extras/Optionen Systemoptionen/Allgemein (direkt der erste) gesetzt. Entweder du schaltest den aus oder machst diese Aus- und anschließend wieder Einschalten in deinem Makro:

Code:

---

Dim swApp As Object
Dim Part As Object
' für die Maß-Inputbox ein paar Deklarationen
Dim old As Boolean
Const swInputDimValOnCreate = 10

Sub main()

' ... hier alles vorbereiten

' alte Zustand der Maß-Inputbox merken
old = swApp.GetUserPreferenceToggle(swInputDimValOnCreate)
' Inputbox ausschalten
Call swApp.SetUserPreferenceToggle(swInputDimValOnCreate, False)

' Maß antragen, Inputbox ist unterdrückt
Part.adddimension 0.05646, 0.0712999, 0

' und alte Zustand wiederherstellen, damit der User es nicht merkt
Call swApp.SetUserPreferenceToggle(swInputDimValOnCreate, old)

End Sub

---

Auch solltest du AddDimension2 verwenden, wenn dein Makro nicht mit einer älteren Version als 2001Plus laufen braucht.

Ciao,
Stefan

------------------
Inoffizielle deutsche SolidWorks Hilfeseite
http://solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Stefan

DANKE für die promte Antwort !
Werde das in meinen MACROS mal so versuchen !

mfg

ston

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP