| | | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Block einfügen (387 mal gelesen)
|
BerndE Mitglied Hochbautechniker
Beiträge: 557 Registriert: 05.07.2003 Revit 2013 ACA 2012 deutsch BuildingOne 5.4.5 Win7 WindowsNetz
|
erstellt am: 22. Nov. 2005 11:24 <-- editieren / zitieren --> Unities abgeben:
Hi Forum, mit Code: einfüge = ThisDrawing.Utility.GetPoint(, "Einfügepunkt angeben") Set blockref = ThisDrawing.ModelSpace.InsertBlock(einfüge, importfile, 1, 1, 1, 0)
setze ich einen Block. Das klappt auch.Nur wenn ich nach der Aufforderung "Einfügepunkt angeben" statt direkt einen Punkt anzugeben einen der Situation entsprechenden Objektfang wählen will, reagiert mein Code mit der Fehlermeldung: "Die Methode 'Getpoint' für das Object 'IAcadUtility' ist fehlgeschlagen" Normalerweise kann ich während des normalen Zeichnens jederzeit in aktiven Befehlen einen Objektfang wählen. Wie bekomme ich das auch bei VBA hin? Oder falls das nicht geht, wie fange ich das Wählen eines Objektfanges ab (und mache dieses wärend der Codeausführung unmöglich), denn o.a. Fehler kann ja auch aus anderen Gründen auftreten. ------------------
Bernd Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Stelli1 Moderator Verm.-Ing.
Beiträge: 1521 Registriert: 17.08.2005 Map 2000-2014, Rasterdesign, MapGuide, Autodesk Topobase, VS6, VS.net 2013
|
erstellt am: 22. Nov. 2005 11:42 <-- editieren / zitieren --> Unities abgeben: Nur für BerndE
Hallo Bernd, wie wärs mit Fehler abfangen? Kannst auch noch eine Wiederholungsschleife einbauen
Code:
on error resume next 'thisdrawing ..... Punkt holen if err.number <> 0 msgbox err.discription else on error goto 0 'Thisdrawing Block einfügen end if
Wenn das im Profil mit Acad 2000i stimmt, wirst du auf die Möglichkeit während der Auswahl zu zoomen und Objektfang einstellen verzichten müssen.Stelli ------------------ Warum lisp'eln wenn's auch anders geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BerndE Mitglied Hochbautechniker
Beiträge: 557 Registriert: 05.07.2003
|
erstellt am: 22. Nov. 2005 12:12 <-- editieren / zitieren --> Unities abgeben:
ja, das mit 2000i stimmt (leider) noch....wir waren schon in der umstellung zu 2005 und architectural desktop begriffen, haben aber alles nochmal wegen dem sehr interessanten revit zurück gestellt. blöderweise gibts da kein vba (oder weißt du da was anderes?) um aber zum thema zurückzukommen: heißen dank, wenigstens kann ich so den fehler abfangen und kommentieren und dann weiter machen ------------------
Bernd Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|