---

Moin, Moin,
hat jemand 'ne Idee, wie ich die Anzahl eines eingefügten bzw. kopierten Blockes herausbekomme? Habe diverse Pläne zu erstellen, bei denen verschiedene Blöcke eingefügt und dann x-mal kopiert werden. Am Ende muß ich dann immer die Anzahl jedes einzelnen Symbols auszählen. Das ist vielleicht nervig. Außerdem verzähl ich mich dauernd.

Grüße Mülli

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

---

Hallo Mülli,
ja wenn das Blöcke mit Attributen wären - so wie bei Stücklisteninformationen... siehe Verwendung von Attributen, aber einfach nur Block? - weiß nicht, ist mir im AutoCAD pur nichts bekannt.
Gruss Angelika

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

---

Hallo Angelika,
einfach gesagt, kann ich Blöcke also mit bestimmtem Attributen belegen und dann sind sie auszählbar? Wenn das so in etwa ist, würde ich mich nämlich damit mal näher beschäftigen. Z.Z. kreise ich mir bestimmte Bereiche immer mit einer Polylinie ein, damit ich weiß, welche Abschnitte ich schon ausgezählt habe. Am Ende lösche ich dann alle P-Linien wieder weg. Wat 'ne Arbeit sag ich Dir.

Grüße Mülli

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

---

Hi Mülli,
Benutzerhandbuch - Verwenden von Blöcken und Attributen - arbeiten mit Attributen - auch in der OnlineHilfe so zu finden...
Gruss Angelika

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

---

Hallo Mülli,

hab Dir da eine Lispelei rangehängt.
Beschreibung in der Zip-Datei vorhanden.

Grüße
Thomas

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

---

wäre es nicht auch ein einfacher weg, man würde jeweils eine sorte block auf einen layer legen (z.b. alle notausgangssymbole auf layer sym_notaus)? am ende den layer mittels bonus-befehl "layiso" isolieren. z.b. befehl "löschen" starten, fenster über die komplettzeichnung (also nur noch die eingeblendeten symbole) fahren. computer meldet: 44 gefunden (oder so...). befehl abbrechen.

rené

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

---

unabhängig von der Layerstrukturierung sind evt. die Befehle Filter oder Schnellauswahl (mit Eigenschaft:Blockname) hilfreich

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

---

Dank erst mal an dieser Stelle.

Ich kann oder besser will nicht für jeden Block, d.h. jedes Symbol einen neuen Layer anlegen. Es sind zu viele Unterschiedliche. Ich habe im Prinzip sämtliche Blöcke ( es sind ungefähr 100 Stk.)in einer Art Legendendatei, die ich komplett in meine Zeichnung einfüge. Dann habe ich auch automatisch alle Blöcke mit drin. Dann kopiere ich die entsprechenden Blöcke nur noch an die jeweiligen Stellen und lösche alle nichtbenötigten Blöcke. Über Befehl BEREINIG lösche ich dann alles nicht Benötigte wieder vollständig heraus.

Eure anderen Vorschläge mit Attribut oder Eigenschaft von Blöcken muss ich mir erst mal in Ruhe anschauen.

Grüße Mülli

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

---

Hallo

anbei ein kleines Programm, das die Blöcke in einer Zeichnung zählt
ich hoffe, dass es Dein Problem löst

Grüße
Heinz

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

---

Hallo Mülli,

so etwas lösen wir mit dem DataManager von modulCAD. Der kann natürlich noch viel mehr als nur die Anzahl von Blöcken (mit oder ohne Attributen) ausgeben...zum Beispiel liest er alle Attribute aus allen Blöcken von beliebig vielen dwgs GLEICHZEITIG aus und schreibt die Daten in eine access-Datei oder in eine Excel-Tabelle!
Eine 30-Tage-Testversion kann man von www.modulCAD.com kriegen.
Viel Erfolg!

------------------
RCADLER

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

---

Hi,
versuch's mal mit dieser LISPellei:

Code:

---

(defun c:zähl (/   ADDIERE    DATNAME HELMUT   INDEX
      OBJ_DAT   OTTO     SGET SGET_LENGTH
      SGET_NAME  SGET_TYP  SGET_ZAEHL WERT   WERT_NEU
      )
  (if (= (setq SGET (ssget "I")) NIL) ;_ wenn kein pickset vorh.
    (setq SGET (ssget "X" (list (cons 0 "INSERT")))) ; nimm alle
  ) ;_ end of if
  (if sget
    (progn (setq sget_length
  (sslength sget)
otto '()
helmut '()
index 0
  ) ;_ end setq
  (while (< index sget_length)
    (setq sget_name (ssname sget index)
  obj_dat  (entget sget_name)
  sget_typ  (cdr (assoc 2 obj_dat))
    ) ;_ end setq
    (if (= (member sget_typ helmut) nil)
      (progn (setq sget_zaehl (cons sget_typ 1)
    helmut    (append (list sget_typ) helmut)
    otto      (append (list sget_zaehl) otto)
      ) ;_ end setq
      ) ;_ end progn
      (progn (setq addiere    (assoc sget_typ otto)
    wert      (cdr addiere)
    wert_neu  (1+ wert)
    sget_zaehl (cons sget_typ wert_neu)
    otto      (subst sget_zaehl addiere otto)
      ) ;_ end setq
      ) ;_ end progn
    ) ;_ end if
    (setq index (1+ index))
  ) ;_ end while
  (setq datname (open "c:/temp/zaehlen.txt" "w"))
  (foreach element otto
    (princ element datname)
    (princ "\n" datname)
  ) ;_ end foreach
  (close datname)
  (startapp "notepad" "c:/temp/zaehlen.txt")
    ) ;_ end progn
    ;;end progn
    (princ "\nSorry keine Blöcke gefunden !")
  ) ;_ end if
  ;;end if
  (princ)
) ;_ end defun

---

(Code in Notepad kopieren und als "Zähl.lsp" im Acad-Suchpfad speichern. Dann in AutoCAD mit (load "zähl") laden und mit "Zähl" (ohne Hochkomma) starten.)

Ciao,
Marc

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

---

Moin Mülli,

MIT AutoCAD GANZ EINFACH.

Befehl: Filter
wähle Blockname
dann die Taste - Wählen -> und den gewünschten Block aus der Liste wählen

dann die Taste - In Liste
dann die Taste - Anwenden

Objekte wählen: Fenster um die ganze Zeichnung
die Differenz der angezeigten Zahlen ist die Anzahl Deiner Blöcke
dann Return

Wenn Du nicht Rechnen willst, dann anschließend z.B.
Befehl: Schieben
Objekte wählen: v (v eingeben und Return)
und Du siehst die Anzahl der Blöcke
dann Befehl: Schieben mit Esc abbrechen (damit Du nichts verschiebst).

Gruß
Werner

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

---

Count.zip

Hi,

wenn es nur ums Zählen von Blöcken geht, dann klappts auch mit dem uralten COUNT.LSP. War früher sogar auf der Install-CD bzw. den Disketten (!!!) drauf. Ich benutze es seit R12 und es läuft auf 2002 immer noch. Wenn eine einfache Tabelle mit Blockname und Anzahl reicht, dann ist das auch was.

Gruß Gunnar

[Diese Nachricht wurde von GuG am 29. Mai 2002 editiert.]

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

---

@ otterloh

Man kann natürlich auch für jeden Kram ein extra Lisp erfinden!
Selbst wenns mit Standart AutoCAD Befehlen schneller geht...

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

---

Moin, moin,

recht herzlichen Dank. Das Posting von mir ist ja nun schon fast ein Jahr alt. Trotzdem kommen jetzt noch interessante Beiträge. Insbesondere die Sache mit count.lsp ist sehr einfach und erfüllt voll meine Belange.

Grüße an alle
Mülli

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