---

AnsichtSW.PNG

Guten Morgen. Ich habe ab und zu das Problem, dass der Arbeitsbereich 3D verschwindet. Ich schaff es leider nicht, der Arbeitsbereich wieder korrekt herzurichten. Das Problem kommt von unterschiedlichen Auflösungen, wo der der Featurebaum unterschiedlich breit dargestellt ist.

Kann mir jemand helfen, wie ich das rasch wieder hinkriege?

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

---

Hallo simon.hu,

das lässt sich wahrscheinlich am besten mit einem Macro lösen. Andi Spieler  hat in Stefan Berlitz MakroMania - Tauschbörse ein solches zur Verfügung gestellt (Nr. 18).

Bei mir läuft der code aber nicht so durch. Aber mit einer kleinen Abänderung...

Code:

---

Option Explicit
Dim swApp As Object
Dim model As Object
Dim size As Long
Dim retval As Long

Sub main()
Set swApp = Application.SldWorks
Set model = swApp.ActiveDoc
retval = model.GetFeatureManagerWidth()
  If retval = 0 Then
    size = 180
  Else
    size = 0
  End If
retval = model.SetFeatureManagerWidth(size)
End Sub

---

Das stellt beim aufrufen die Breite des FeatureManagers auf 0 bzw 180 (ich würde schätzen es sind Pixel).

HTH
Ralf

------------------

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

---

Hallo,

Taste "F9" und Featurebaum neu aufziehen.

Grüße, Andi

------------------
Hast du kein Problem?
Such dir eins. ( Und löse es )

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

---

Zitat:

---

Original erstellt von Andi Beck:
Taste "F9" und Featurebaum neu aufziehen.

---

...oder so 

... gibt's ja erst seit 2013 

------------------

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