Wie exportiere ich Einfügepunkte von Blöcken aus AutoCAD nach Excel?

Was cadssistant tut

1. Wählt jedes INSERT namens TREE aus und liest in einem AutoLISP-Durchgang Einfügepunkt und Drehung jeder Referenz.
2. Antwortet mit einer Markdown-Tabelle. Jede Tabelle im Chat trägt Kopieren (tabulatorgetrennt, zum Einfügen in ein Tabellenblatt) und Excel (eine CSV-Datei, die in Excel in Spalten aufgeht).
3. Die Schaltfläche Excel öffnet den eigenen Speichern-Dialog von AutoCAD, die Datei landet also, wo Sie wollen; die Palette lädt nie von sich aus etwas herunter.

Dieselbe Aufgabe in AutoLISP

(progn
  (setq ss (ssget "_X" '((0 . "INSERT") (2 . "TREE"))) i 0
        f (open "C:/temp/trees.csv" "w"))
  (write-line "handle,x,y,rotation_deg" f)
  (if ss
    (repeat (sslength ss)
      (setq ed (entget (ssname ss i)) i (1+ i) p (cdr (assoc 10 ed))
            ang (if (assoc 50 ed) (cdr (assoc 50 ed)) 0.0))
      (write-line (strcat (cdr (assoc 5 ed)) ","
                          (rtos (car p) 2 3) "," (rtos (cadr p) 2 3) ","
                          (rtos (* 180.0 (/ ang pi)) 2 1)) f)))
  (close f)
  (if ss (sslength ss) 0))

Schreibt C:/temp/trees.csv (der Ordner muss existieren). Gruppe 50 ist in Bogenmaß; die Zeile rechnet in Grad um.

Gut zu wissen

• Koordinaten sind WKS, in Zeichnungseinheiten. Sagen Sie „im aktuellen BKS“, dann rechnet es sie mit trans um.
• Sagen Sie „mit dem Attribut DESCRIPTION“, dann bekommt die Tabelle eine Spalte aus den Attributen jeder Referenz.

Mehr aus „Export nach Excel und PDF“

• Wie exportiere ich alle Texte aus einer AutoCAD-Zeichnung nach Excel?
• Wie erstelle ich aus den Blöcken einer AutoCAD-Zeichnung eine Stückliste?
• Wie drucke ich in AutoCAD alle Layouts auf einmal als PDF?