| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Leere VBA-Projekte - was tun? (1821 mal gelesen)
|
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3701 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2018 BricsCAD 22
|
erstellt am: 19. Apr. 2006 12:26 <-- editieren / zitieren --> Unities abgeben:
Ich habe zahlreiche Blöcke bekommen, die leere VBA-Projekte enthalten. Da ich in VBA nicht bewandert bin, unsere Installation kein VBA verträgt und wir es auch sonst nicht brauchen - wir werde ich die Dinger wieder los - vor allem schmerzlos in scripttauglicher Form? (In der Anlage eine Zeichnung: nur ein Strich und das Project.) Peter ------------------ Für jedes Problem gibt es eine einfache Lösung. Die ist aber meistens falsch. ;-) [Diese Nachricht wurde von Peter2 am 19. Apr. 2006 editiert.] [Diese Nachricht wurde von Peter2 am 19. Apr. 2006 editiert.] [Diese Nachricht wurde von Peter2 am 19. Apr. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1357 Registriert: 24.07.2002
|
erstellt am: 19. Apr. 2006 13:16 <-- editieren / zitieren --> Unities abgeben: Nur für Peter2
Hallo Peter, Exportiere die Zeichnung als WBlock. Danach hast du keine VBA-Project mehr in der Zeichnung. Ich würde dem Ersteller aber mal auf die Frage stellen, was er mit den leeren Project bezwecken will. Gruß, Carsten Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 .
|
erstellt am: 19. Apr. 2006 13:20 <-- editieren / zitieren --> Unities abgeben: Nur für Peter2
eine Möglichkeit: die dwg als Block in eine neue Dwg einfügen und evtl."_explode"n zweite Möglichkeit: das Tool im Anhang sollte die VBA-Macros löschen ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3701 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2018 BricsCAD 22
|
erstellt am: 19. Apr. 2006 14:10 <-- editieren / zitieren --> Unities abgeben:
|
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3701 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2018 BricsCAD 22
|
erstellt am: 01. Nov. 2007 12:12 <-- editieren / zitieren --> Unities abgeben:
Zitat: Original erstellt von CADmium: ...das Tool im Anhang sollte die VBA-Macros löschen
Thomas, das Programm hat mir viel geholfen, danke. Eine Bitte bzw. Frage dazu habe ich: Wie kann ich per Lisp erkennen, ob es was gelöscht hat oder nicht? Ich lasse nämlich viele Zeichnungen per Script laufen und brauche dann die Entscheidung Code: "Wenn VBA gelöscht, dann ... sonst ...."
Gibt es eine Variable, die ich nach dem Durchlauf prüfen kann? DBMOD geht nicht, weil sich immer irgendwas ändert. Peter ------------------ Für jedes Problem gibt es eine einfache Lösung. Die ist aber meistens falsch. ;-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 .
|
erstellt am: 01. Nov. 2007 12:26 <-- editieren / zitieren --> Unities abgeben: Nur für Peter2
..ohne das Programm umzuschreiben , kannst du nichts auswerten .. wird ja bloß ne Meldung zurückgegeben, die dir im Scrip nicht viel nützt...mal sehen, wenn Zeit ist. ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3701 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2018 BricsCAD 22
|
erstellt am: 02. Nov. 2007 15:29 <-- editieren / zitieren --> Unities abgeben:
Ich habe ein bisschen geübt. Code: (defun vba-del () (if (dictremove (namedobjdict) "acad_vba") (setq vba-del_meldung "Dictionary ACAD_VBA wurde gelöscht.") (setq vba-del_meldung "Dictionary ACAD_VBA wurde nicht gelöscht.") ) (princ (strcat "\nProgrammergebnis und Variable vba-del_meldung lauten: " vba-del_meldung)) (princ) )
Was ist davon zu halten?Peter ------------------ Für jedes Problem gibt es eine einfache Lösung. Die ist aber meistens falsch. ;-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 .
|
erstellt am: 02. Nov. 2007 18:04 <-- editieren / zitieren --> Unities abgeben: Nur für Peter2
na ich hatte es mit ActivX und Fehlerabfangroutine gemacht .. aber Dicionary und Name stimmen .. warum sollte es nicht funktionieren? ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Peter2 Ehrenmitglied V.I.P. h.c.
Beiträge: 3701 Registriert: 15.10.2003 Win 10/64 Pro AutoCAD MAP 3D 2018 BricsCAD 22
|
erstellt am: 02. Nov. 2007 19:38 <-- editieren / zitieren --> Unities abgeben:
Fehlerabfangen hatte ich auch angedacht, aber da beim Löschen von "nichts" nur nil zurückkommt, könnte es in der sparsamen Version auch gehen. Oder habe ich wieder was vergessen? Peter ------------------ Für jedes Problem gibt es eine einfache Lösung. Die ist aber meistens falsch. ;-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |