| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
Autor
|
Thema: VBA - ThisDrawing.ActiveUCS (725 mal gelesen)
|
RoSiNiNo Mitglied Konstrukteur
Beiträge: 1126 Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021 Windows 10 Pro 64bit HP Workstation Z620, 24GB GeForce GTX 970
|
erstellt am: 16. Jan. 2003 13:12 <-- editieren / zitieren --> Unities abgeben:
Wieder eine kniffelige Frage. Auch ein Herausforderung für Bernd?!? Ich bin in einem Layout im MSpace. Wenn ich nun ThisDrawing.ActiveUCS eingebe erhalte ich leider das UCS vom Layout und nicht vom Fenster. Wie bekomme ich das aktive im Fenster? ------------------ Roland Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 16. Jan. 2003 13:58 <-- editieren / zitieren --> Unities abgeben: Nur für RoSiNiNo
wollte einfach mal in der Hilfe nachsehen, leider funktioniert meine Hilfe Datei nicht so wie sie soll... wo wir aber beim Thema schonmal sind...für Lisp: DXF/AutoLisp*** =Gruppe 345 (benanntes ucs) =Gruppe 346 (orthogonale variante zu BKS) verweist auf AcDbUCSTableRecord (setq name (entget(cdr(assoc 345 (entget(ssname(ssget)0)))))) ------------------ Gruß Sebastian , Ffm Der Feind des Guten ist das Bessere. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RoSiNiNo Mitglied Konstrukteur
Beiträge: 1126 Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021 Windows 10 Pro 64bit HP Workstation Z620, 24GB GeForce GTX 970
|
erstellt am: 16. Jan. 2003 14:16 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 16. Jan. 2003 14:35 <-- editieren / zitieren --> Unities abgeben: Nur für RoSiNiNo
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 16. Jan. 2003 15:13 <-- editieren / zitieren --> Unities abgeben: Nur für RoSiNiNo
evtl helfen dir ja die Lisp-Ansätze und die grund-naiven Gedankengänge... kannst du nicht "kurz" in den pspace wechseln ? Die sysvar "cvport" lesen - ("Name/Kennzahl") des AFensters) >dann wechsel zu papierbereich< über diese Kennzahl (Gruppe 69) kannst du das vport suchen und dann wie oben beschrieben Gruppe 345/346 usw Aber jetzt laß´ich mal dir großen weiterspielen - in ein paar Jahren vielleicht (Lisp - nicht VBa) schweig... ------------------ Gruß Sebastian , Ffm Der Feind des Guten ist das Bessere. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RoSiNiNo Mitglied Konstrukteur
Beiträge: 1126 Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021 Windows 10 Pro 64bit HP Workstation Z620, 24GB GeForce GTX 970
|
erstellt am: 16. Jan. 2003 15:24 <-- editieren / zitieren --> Unities abgeben:
|
Bernd Cuder Mitglied Selbständig
Beiträge: 692 Registriert: 10.07.2002 AutoCAD 2002/2004/2005 unter Windows 2000 Professional SP3 PIV 3.4GHz 1024MB NVIDIA GeForce FX Go5700
|
erstellt am: 16. Jan. 2003 17:26 <-- editieren / zitieren --> Unities abgeben: Nur für RoSiNiNo
|
RoSiNiNo Mitglied Konstrukteur
Beiträge: 1126 Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021 Windows 10 Pro 64bit HP Workstation Z620, 24GB GeForce GTX 970
|
erstellt am: 16. Jan. 2003 18:21 <-- editieren / zitieren --> Unities abgeben:
|
Bernd Cuder Mitglied Selbständig
Beiträge: 692 Registriert: 10.07.2002 AutoCAD 2002/2004/2005 unter Windows 2000 Professional SP3 PIV 3.4GHz 1024MB NVIDIA GeForce FX Go5700
|
erstellt am: 18. Jan. 2003 11:38 <-- editieren / zitieren --> Unities abgeben: Nur für RoSiNiNo
|
RoSiNiNo Mitglied Konstrukteur
Beiträge: 1126 Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021 Windows 10 Pro 64bit HP Workstation Z620, 24GB GeForce GTX 970
|
erstellt am: 24. Feb. 2003 11:55 <-- editieren / zitieren --> Unities abgeben:
|