---

Ein Hallo an alle ACADler
Meine Frage:
(Acad 2000i) wie exportiere ich einen Text aus einer DWG in einen Editor oder Excel?

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

---

Servus Robert,

wenn Dir das reicht:
Im ACAD-Editor Text markieren Strg + C drücken
Im externen Editor Strg + v drücken.
evtl. noch Farben und Textstil ändern.

Gruß Wolfgang

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

---

Hallo Robert K.,
ist es einfach nur Text, dann würde ich es so machen wie Wolfgang vorschlägt, oder handelt es sich um Attribute - Attribute kann man auslesen (siehe Hilfe: Exrahieren von Blockattributen).
Gruss Angelika

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

---

Sorry hatte die frage in meiner Verzweiflung nicht korrekt gestellt!

.....DWG Text in einen Text-Editor ....
Wenn ich es mit markieren und einfügen versuche habe ich eine typische OLE funtion ...!
Aber ich möchte den text in Excel weiter verarbeiten und nicht ein fenster mit schwarzen Hintergrund bekommen!
Vielleicht habt ihr eine neue Idee..?
Danke im vorraus für jeden denkanstoß!

Mit kollegialen Grüßen

R. K.

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

---

Hallo Robert,
ich denke, die Frage war schon korrekt gestellt, die Antwort war es auch:
Du musst den Text im Editor markieren (d.h. dort, wo er auch bearbeitet werden kann, also nicht das AutoCAD_Element Text, sondern die Buchstaben als solche)und wie gesagt mit Strg+C in die Windows-Zwischenablage kopieren.
Probiere es doch noch mal.

------------------
gruß
thomas

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

---

Thomas Danke für deine Geduld mit mir und die rasche Reaktion!

Ich dachte es gibt die möglichkeit den text von der ganzen DWG
auszulesen (einige hundert) und in eine Excel Datei zu speichern.
Sowie es bei attributen die möglichkeit geben sollte!

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

---

Hallo Robert,
wenns häufiger vorkommt lohnt sehr wahrscheinlich ein Programm (Lisp oder).
Gruß
Seher

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

---

Tatü tata, die Post ist da!
Das Teil sucht Dir eine *.csv Datei, die Du in Excel bearbeiten kannst.
Ausserdem werden wur die Texte ausgewählt, die sich in aktuellen Layout befinden.

(defun c:schreibtext (/)
  (setq OLDERR  *ERROR*
        *ERROR* MYERROR
        as      (ssget "_X" (list (cons 0  "TEXT")(cons 410 (getvar "ctab"))))
        zaehler 0
        datei  (getfiled "Datei speichern" "csv" "" 1)
        dat    (open datei "a")
        ) ;_ end of setq
(if datei
(progn
  (repeat (sslength as)
    (setq tt (cdr (assoc 1 (entget (setq gg (ssname as 0))))))
    (write-line (strcat tt ";") dat)
    (setq as (ssdel gg as))
    ) ;_ end of repeat
  (close dat)
)
(Prompt "\nKeine Datei erstellt - Ende")
  (setq *error* olderr)
  ) ;_ end of defun

(defun myerror (s)                      ; If an error (such as CTRL-C) occurs
                                        ; while this command is active...
  (if (/= s "Funktion abgebrochen")
    (princ (strcat "\nFehler: " s))
    ) ;_ end of if
  (close dat)
  (setq *error* olderr)                ; Restore old *error* handler
  (princ)
  ) ;_ end of defun

------------------
Gruß
CADwiesel

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

---

Oops sorry
hinter "(Prompt "\nKeine Datei erstellt - Ende")" fehlt noch eine Schliessende Klammer für die if schleife

------------------
Gruß
CADwiesel

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

---

Ein Danke an CADwiesel!!!
und alle die sich mit meinem Problem beschäftigt haben!
Bin kein Programmierer aber es sieht sehr gut aus !!!

Danke im vorraus werd mich heute abend damit aussernader setzten...
Kunde wartet und möchte etwas auf dem Papier sehen!...

Grüße an Alle
R.K.

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

---

Mein HELD!! 

dieses Forum ist eine wahre Goldfundgrube!!

Vielen Dank

------------------

viele grüße
carambita

[Diese Nachricht wurde von carambita am 29. Oktober 2002 editiert.]

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

---

Hy Leute,

da gabs unter 12 mal ne witzige lsp die konnte auch noch was in der
richtung.die hat allen text in einen Editor gepackt,dort konnte
man das ganze mit allen optionen maipulieren und
dann einfach zurück in die Zeichnung geben.

also bei bedarf könnte man nach dem teil fahnden.

CU cw

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