| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Loften in VBA (585 mal gelesen)
|
Clayton Ehrenmitglied Konstrukteur
Beiträge: 1632 Registriert: 07.02.2004
|
erstellt am: 28. Sep. 2005 13:39 <-- editieren / zitieren --> Unities abgeben:
Hi, Wenn ich von Hand ein Loft erstelle, richte ich zuerst das BKS am Profil aus, wie gezeigt. Dann erstelle ich eine neue Sketchplane mit der Option "BKS" und dann mach ich ich aus der Polyline ein Profil. Zum Schluss wird das ganze in ein Part verwandelt. Geht ja auch ganz gut, ist aber zeitraubend. Gibt es da eine Moeglichkeit, das in VBA zu machen? Speziell: gibt es da einen Befehl, wo man eine Sketchplane erzeugen kann, der das "BKS" als Argument akzeptiert?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tunnelbauer Ehrenmitglied V.I.P. h.c. Bauingenieur
Beiträge: 7085 Registriert: 13.01.2004 ich hab eh keine Probleme damit...
|
erstellt am: 28. Sep. 2005 13:48 <-- editieren / zitieren --> Unities abgeben: Nur für Clayton
|
Clayton Ehrenmitglied Konstrukteur
Beiträge: 1632 Registriert: 07.02.2004
|
erstellt am: 28. Sep. 2005 13:52 <-- editieren / zitieren --> Unities abgeben:
|
startrek Moderator Architekt
Beiträge: 1361 Registriert: 13.02.2003 .
|
erstellt am: 28. Sep. 2005 14:58 <-- editieren / zitieren --> Unities abgeben: Nur für Clayton
Hi Clayton, ich beiss mal ganz ahnungslos;-), nimm doch mal eine neue/leere Zeichnung daher und zeichne dir so eine Sketch-Plane. Dann tippe mal im Direktfenster:
Code:
?typename(thisdrawing.modelspace.item(0))
und abentern. Oder für mehrere Objekte:
Code:
sub qwe() dim x as object for each x in thisdrawing.modelspace debug.print typename(x) next end sub
Dann setz den Cursor innerhalb des Schlüsselwortes im Direktfenster und F1. Wenn er's findet, steht da meist was wie Create using und access via, vielleicht hilfts ein stück weiter.Gruss Nancy Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mapcar Mitglied CADmin
Beiträge: 1250 Registriert: 20.05.2002 Die Phönizier haben das Geld erfunden - aber warum so wenig? (Johann Nepomuk Nestroy)
|
erstellt am: 29. Sep. 2005 23:52 <-- editieren / zitieren --> Unities abgeben: Nur für Clayton
|