---

Hallo

Ich möchte gerne über ein Makro Ansichten so bemaßen, wie in der Skizze vom Pad bzw in der Skizze der Bohrungen.

Hab es über den Befehl "Create Dimension Step by Step" versucht aber dies hat nicht funktioniert. Sprich händisch geht es, aber nicht über ein Makro, da ich nicht genau die Felder des geöffneten Fensters ein- oder ausschalten kann wie ich das möchte, oder doch ?

Kann mir hier jemand weiter helfen?? Wäre lieb. Vielen Dank.

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

---

Habe hier mal das Programm was ich bis jetzt ausgearbeitet habe, leider funktioniert es nur bis SendKeys "Enter"

Sub CatMain()

oFrontView.Activate

AppActivate "CATIA V5"

SendKeys "c:Generate Dimensions Step by Step", True
SendKeys "{Enter}", True

'Das Feld "...associated with unrepresented elements" soll makiert werden, leider weiß ich nicht wie dieses
'Kontrollkästchen benannt ist, kann man das irgendwie herrausfinden ?
'Hab es jetzt erstmal checkbox.Value genannt

checkbox5.Value = True

'Nun muss das Fenster mit Ok bestätigt werden
Ok.Value = True

'Nachdem alle Maße eingeblendet sind wieder mit ok bestätigen
NextGenerationDimension = True
Ok.Value = True

End Sub

Zum Schluss müssen die Maße noch schwarz sein. Funktioniert das überhaupt so wie ich es vorhabe oder gibt es noch andere Möglichkeiten.

Bis jetzt habe ich leider nur wenig VBA-Erfahrungen, brauche es für meine Projektarbeit. Würde mich über jeden kleinen Tipp freuen.

Lg Steffi

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