| |
![](https://ww3.cad.de/php/image.php?resolution=width:20050) | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Polylinie aus Excel in ACAD (8562 mal gelesen)
|
Wolli Mitglied Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Wolli](/foren/ubb/pmimages/gbu.gif) Beiträge: 704 Registriert: 28.02.2001 Win7 64Bit+32Bit VM-Ware I7 12GB ACAD Mech 2010 Inventor Pro 2010 + 2012 Ansys 13 NLS
|
erstellt am: 07. Nov. 2001 10:55 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo Zusammen, ich habe in Excel die Daten für ein Weg-Zeit-Diagramm berechnet und als Ergebnis zwei Spalten mit X und Y Koordinaten damit möchte ich mir in ACAD eine Polylinie zeichnen lassen. Beispiel: _pline 0 | 0 5 | 5 5 | 10 mit "|" meine ich dass die Zahlen jeweis in einer Zelle sind So hat es funktioniert: Excel-Blatt als .csv speichern als .txt umbenennen und mit Word öffnen ; durch , ersetzen als .scr umbenennen Script in ACAD starten. Dies ist mir zu aufwendig, ich habe mal probiert den Bereich in Excel zu markieren und kopieren und in der ACAD-Befehlszeile mit Strg + V einzufügen. Acad zeichnet dann Linien aber diese haben nichts mit den Koordinaten zu tun die in Excel stehen. Wie muß ich die Excel-Tabelle verändern? Danke und Gruß Wolfgang [Diese Nachricht wurde von Wolli am 07. November 2001 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Ehrenmitglied V.I.P. h.c. CAD on demand GmbH
![](/foren/avatars/Brischke.gif)
![Schreiben Sie einen Gästebucheintrag für Brischke](/foren/ubb/pmimages/gbu.gif) Beiträge: 4186 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 08. Nov. 2001 08:05 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Wolli
Hallo Wolfgang, folgender Code macht das: Bedingung ist, dass das in Excel standardmäßige Zahlenformat beibehalten wird. Komma als Defzimaltrennzeichen OHNE Tausender-Trennzeichen. Excel-Datei als txt-Datei mit TAB's als Trennung speichern. Bei Fragen ... Grüße Holger (defun c:xlspl ( / datei f datzeile zeile tabli x) (setq datei (getfiled "Datei wählen" "" "txt" 0)) (setq f (open datei "r")) (while (setq datzeile (read-line f)) (setq zeile (read (vl-string-translate "," "." (vl-string-translate " " (chr 209) (vl-string-translate "." (chr 182) (strcat "(" datzeile ")") ) ) ) ) tabli (if tabli (append tabli (list (cons 10 zeile))) (list (cons 10 zeile)) ) ) ) (close f) (entmake (append (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") '(67 . 0) '(410 . "Model") '(8 . "0") '(100 . "AcDbPolyline") (cons 90 (length tabli)) '(70 . 0) '(43 . 0.0) '(38 . 0.0) '(39 . 0.0)) (apply 'append (mapcar '(lambda (x) (list x '(40 . 0.0) '(41 . 0.0) '(42 . 0.0)) ) tabli )) (list '(210 0.0 0.0 1.0)) );append ) ) [Diese Nachricht wurde von Brischke am 08. November 2001 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Wolli Mitglied Konstrukteur
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Wolli](/foren/ubb/pmimages/gbu.gif) Beiträge: 704 Registriert: 28.02.2001 Win7 64Bit+32Bit VM-Ware I7 12GB ACAD Mech 2010 Inventor Pro 2010 + 2012 Ansys 13 NLS
|
erstellt am: 08. Nov. 2001 10:32 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo Holger, danke für Deine Antwort, aber ich möchte die Koordinaten ganz ohne Lisp und VBA aus Excel als Plinie nach ACAD bringen. Nur mit kopieren und einfügen. Es scheint möglich zu sein, da ja beim Einfügen in die Befehlszeile eine Linie gezeichnet wird, nur halt falsch. Danke und Gruß Wolfgang Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADS Support Mitglied Dipl Ing (FH) Holztechnik
![Schreiben Sie einen Gästebucheintrag für CADS Support](/foren/ubb/pmimages/gbu.gif) Beiträge: 8 Registriert: 21.12.2000
|
erstellt am: 16. Nov. 2001 15:55 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Wolli
Hallo , eigentlich kein Problem. Wenn Du das öfters brauchst dann schreib die ein VBA Progrämmchen in EXCEL. Dieter Zitat: Original erstellt von Wolli: Hallo Zusammen,ich habe in Excel die Daten für ein Weg-Zeit-Diagramm berechnet und als Ergebnis zwei Spalten mit X und Y Koordinaten damit möchte ich mir in ACAD eine Polylinie zeichnen lassen. Beispiel: _pline 0 | 0 5 | 5 5 | 10 mit "|" meine ich dass die Zahlen jeweis in einer Zelle sind So hat es funktioniert: Excel-Blatt als .csv speichern als .txt umbenennen und mit Word öffnen ; durch , ersetzen als .scr umbenennen Script in ACAD starten. Dies ist mir zu aufwendig, ich habe mal probiert den Bereich in Excel zu markieren und kopieren und in der ACAD-Befehlszeile mit Strg + V einzufügen. Acad zeichnet dann Linien aber diese haben nichts mit den Koordinaten zu tun die in Excel stehen. Wie muß ich die Excel-Tabelle verändern? Danke und Gruß Wolfgang [Diese Nachricht wurde von Wolli am 07. November 2001 editiert.]
------------------ SD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADS Support Mitglied Dipl Ing (FH) Holztechnik
![Schreiben Sie einen Gästebucheintrag für CADS Support](/foren/ubb/pmimages/gbu.gif) Beiträge: 8 Registriert: 21.12.2000
|
erstellt am: 16. Nov. 2001 15:55 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Wolli
Hallo , eigentlich kein Problem. Wenn Du das öfters brauchst dann schreib die ein VBA Progrämmchen in EXCEL. Dieter Zitat: Original erstellt von Wolli: Hallo Zusammen,ich habe in Excel die Daten für ein Weg-Zeit-Diagramm berechnet und als Ergebnis zwei Spalten mit X und Y Koordinaten damit möchte ich mir in ACAD eine Polylinie zeichnen lassen. Beispiel: _pline 0 | 0 5 | 5 5 | 10 mit "|" meine ich dass die Zahlen jeweis in einer Zelle sind So hat es funktioniert: Excel-Blatt als .csv speichern als .txt umbenennen und mit Word öffnen ; durch , ersetzen als .scr umbenennen Script in ACAD starten. Dies ist mir zu aufwendig, ich habe mal probiert den Bereich in Excel zu markieren und kopieren und in der ACAD-Befehlszeile mit Strg + V einzufügen. Acad zeichnet dann Linien aber diese haben nichts mit den Koordinaten zu tun die in Excel stehen. Wie muß ich die Excel-Tabelle verändern? Danke und Gruß Wolfgang [Diese Nachricht wurde von Wolli am 07. November 2001 editiert.]
------------------ SD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
![](https://ww4.cad.de/Ads/adview.php?what=zone:16178&n=aee1ae73)
| Elektrotechniker (m/w/d) Automatisierungstechnik Chemieanlagenbau | Menschen und Technologien zu verbinden, den Perfect Match für unsere Kunden zu gestalten, immer die richtigen Expert:innen für die jeweilige Herausforderung zu finden - das ist unser Anspruch bei FERCHAU und dafür suchen wir dich: Wir realisieren spannende Projekte für namhafte Kunden im Anlagenbau und arbeiten mit an anspruchsvollen Lösungen für die Industrie.
Elektrotechniker (m/w/d) Automatisierungstechnik ... | Anzeige ansehen | Elektrotechnik, Elektronik |
|
mgru Mitglied
![Schreiben Sie einen Gästebucheintrag für mgru](/foren/ubb/pmimages/gbu.gif) Beiträge: 3 Registriert: 15.11.2003
|
erstellt am: 18. Nov. 2003 14:57 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für Wolli
Einfachst: Daten stehen ab 2.Zeile in Excel In der ersten zeile steht der Befehl _pline im Feld C1 mit =verknüpfen(A2,",",B2) der wertepaare im Feld C2 den Befehl auf alle Wertepaare anwenden (durch markieren und auf der rechten unteren Ecke herunterziehen) Dann den Bereich von C1 bis Ci ins Kopierfach und unter Autocad in die Befehlszeile einfügen fertig d.h. das Dezimalzeichen muss global auf PUNKT eingestellt sein (unter Windows - Regionale Einstellung) sonst gehts nicht. ------------------ mgru Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |