Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Block einfügen über Makro

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
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 über Makro (1524 mal gelesen)
namsokrok
Mitglied
CAD-Administrator


Sehen Sie sich das Profil von namsokrok an!   Senden Sie eine Private Message an namsokrok  Schreiben Sie einen Gästebucheintrag für namsokrok

Beiträge: 76
Registriert: 20.08.2008

Xeon CPU 3.33 Ghz
16 GB RAM
NVIDIA Quadro K 4000
Windows 7 64 bit
AutoCAD Map 3D 2013
AutoCAD Civil 3D 2014
Revit 2014

erstellt am: 06. Aug. 2014 08:38    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Guten Morgen,

vor einiger Zeit habe ich ein Makro erstellt, dass einen vom User frei wählbaren Block in die Zeichnung einfügt, die Zeichnungselemente alle auf einen Layer namens DC legt, die eingefügten Elemente mit dem Faktor 100 skaliert und bestimmte Elemente des eingefühgten Blocks entfernt.
Genutzt wird dieser Befehl für Bohrprofile, die wir als DXF im Maßstab 1:100 erhalten.

Jahrelang hat dieses Makro ausgezeichnet funktioniert.

Gestern habe ich festgestellt, dass sich nun leider kein Dialogfenster zur Auswahl des Blocks öffnet.
Hat jemand eine Idee, woran das liegen kann?

Hier das Makro:
^C^C_-layer;_m;DC;_c;7;DC;_lt;Continuous;DC;_s;DC;;ATTDIA;1;_INSERT;\;_pselect;_l;;_scale;\100;_explode;_l;_layiso;_s;_l;;\;_erase;_all;;_layuniso;

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

jupa
Ehrenmitglied V.I.P. h.c.
Ruheständler


Sehen Sie sich das Profil von jupa an!   Senden Sie eine Private Message an jupa  Schreiben Sie einen Gästebucheintrag für jupa

Beiträge: 6050
Registriert: 16.09.2004

Windows 10 64bit, ACAD Rel. 14 - ACAD 2023

erstellt am: 06. Aug. 2014 10:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

Reden wir denn noch von den in der Sys.-Info angegebenen 2010er Versionen?

Jürgen

------------------
Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)

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

namsokrok
Mitglied
CAD-Administrator


Sehen Sie sich das Profil von namsokrok an!   Senden Sie eine Private Message an namsokrok  Schreiben Sie einen Gästebucheintrag für namsokrok

Beiträge: 76
Registriert: 20.08.2008

Xeon CPU 3.33 Ghz
16 GB RAM
NVIDIA Quadro K 4000
Windows 7 64 bit
AutoCAD Map 3D 2013
AutoCAD Civil 3D 2014
Revit 2014

erstellt am: 06. Aug. 2014 10:27    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ooops ... Sorry!
Wir fahren bei uns im Hause die 2013er Versionen.

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

jupa
Ehrenmitglied V.I.P. h.c.
Ruheständler


Sehen Sie sich das Profil von jupa an!   Senden Sie eine Private Message an jupa  Schreiben Sie einen Gästebucheintrag für jupa

Beiträge: 6050
Registriert: 16.09.2004

Windows 10 64bit, ACAD Rel. 14 - ACAD 2023

erstellt am: 06. Aug. 2014 10:57    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

Da hat man mal was geändert. Auch ein einfaches (command "_insert") ruft in den neueren Versionen kein Dialogfenster mehr auf. Man kann also, wenn man die Befehlszeilenversion will den sonst üblichen Bindestrich vor dem Befehl weglassen.
Aber wie man das Dialogfenster nun erzwingen kann - habe leider noch keine Möglichkeit gefunden.

Jürgen 

------------------
Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)

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

namsokrok
Mitglied
CAD-Administrator


Sehen Sie sich das Profil von namsokrok an!   Senden Sie eine Private Message an namsokrok  Schreiben Sie einen Gästebucheintrag für namsokrok

Beiträge: 76
Registriert: 20.08.2008

Xeon CPU 3.33 Ghz
16 GB RAM
NVIDIA Quadro K 4000
Windows 7 64 bit
AutoCAD Map 3D 2013
AutoCAD Civil 3D 2014
Revit 2014

erstellt am: 06. Aug. 2014 11:31    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Das ist ja eine "großartige" Idee von Autodesk, das zu ändern 
Dann werde ich mal gucken, ob ich irgendwo eine Information finde, wie man das Dialogfenster erzwingen kann.
Vielen Dank zunächst für die Info!

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

jupa
Ehrenmitglied V.I.P. h.c.
Ruheständler


Sehen Sie sich das Profil von jupa an!   Senden Sie eine Private Message an jupa  Schreiben Sie einen Gästebucheintrag für jupa

Beiträge: 6050
Registriert: 16.09.2004

Windows 10 64bit, ACAD Rel. 14 - ACAD 2023

erstellt am: 06. Aug. 2014 11:45    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

Vorschlag:
Das Makro evtl. in zwei Teile zerlegen:
- erster Teil: geht nur bis zum _insert;
Wenn das Makro hier aufhört, erscheint noch das Dialogfenster.
Dann den Block wählen und das Einfügen manuell beenden.
- nun ein zweites Makro starten, das den Rest erledigt.

Ich weiß, eine furchtbare Krücke, aber evtl. besser als gar nichts.

Jürgen

------------------
Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 06. Aug. 2014 11:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

initdia ?
http://ww3.cad.de/foren/ubb/Forum54/HTML/001393.shtml#000001

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

System: F1
und Google

erstellt am: 06. Aug. 2014 11:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

Und ohne Lisp müßte es die Tilde~ sein die den Dialog erzwingt,
habe aber gerade keinen Rechner zur Hand.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

namsokrok
Mitglied
CAD-Administrator


Sehen Sie sich das Profil von namsokrok an!   Senden Sie eine Private Message an namsokrok  Schreiben Sie einen Gästebucheintrag für namsokrok

Beiträge: 76
Registriert: 20.08.2008

Xeon CPU 3.33 Ghz
16 GB RAM
NVIDIA Quadro K 4000
Windows 7 64 bit
AutoCAD Map 3D 2013
AutoCAD Civil 3D 2014
Revit 2014

erstellt am: 06. Aug. 2014 12:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ich habe mir jetzt mit ^R beholfen, das die Befehlsversionierung deaktiviert.
Vielen Dank!

Interessierende wurde mich interessierten, wie ich ~ verwenden würde.
Ich habe dazu nichts gefunden.

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

jupa
Ehrenmitglied V.I.P. h.c.
Ruheständler


Sehen Sie sich das Profil von jupa an!   Senden Sie eine Private Message an jupa  Schreiben Sie einen Gästebucheintrag für jupa

Beiträge: 6050
Registriert: 16.09.2004

Windows 10 64bit, ACAD Rel. 14 - ACAD 2023

erstellt am: 06. Aug. 2014 13:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

(initcommandversion 2); unmittelbar vor dem _insert-Aufruf sollte es auch richten. (Dein ^R ist natürlich eleganter  ).

Jürgen

------------------
Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)

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

namsokrok
Mitglied
CAD-Administrator


Sehen Sie sich das Profil von namsokrok an!   Senden Sie eine Private Message an namsokrok  Schreiben Sie einen Gästebucheintrag für namsokrok

Beiträge: 76
Registriert: 20.08.2008

Xeon CPU 3.33 Ghz
16 GB RAM
NVIDIA Quadro K 4000
Windows 7 64 bit
AutoCAD Map 3D 2013
AutoCAD Civil 3D 2014
Revit 2014

erstellt am: 06. Aug. 2014 13:59    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Geos
Mitglied
Vermessungstechniker i.R.


Sehen Sie sich das Profil von Geos an!   Senden Sie eine Private Message an Geos  Schreiben Sie einen Gästebucheintrag für Geos

Beiträge: 1017
Registriert: 21.09.2001

ACAD Map 2010, Win 7 Pro
eigene Lisp's<P>HW: Core i7 860, 2.8 GHz
3.3 GB, NVIDIA GeForce GTS 250

erstellt am: 06. Aug. 2014 19:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für namsokrok 10 Unities + Antwort hilfreich

Obs da auch eine "reine Blockauswahl" gibt, weiß ich jetzt nicht auswendig, aber wenn Blockwahl gleich Dateiwahl, dann gäbs "DosLib" bei
http://www.mcneel.com

Neben vielen anderen Funktionen gäbe es dann auch

Code:
(dos_getfiled title path filter)

------------------
Schöne Grüße
Ernst

www.geopaint.at

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz