Liste des blocs

[sierenens]

Bonjour,

J'aimerais imprimer la liste des blocs (repérsentation + nom) de mon dessin. Ils sont visible sur designCenter, mais j'aimerais exporter genre sur exel, ou powerpoint.

Merci.

[Tramber]

commande EATTEXTE

[Patrick_35]

Salut

 

Quelque chose comme ça, puis avec un copier/coller

 

@+

 

(vl-load-com)
(setq bls (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object))))
(setq dest (strcat (getvar "dwgprefix") "Liste_Bl.txt") fic (open dest "w"))
(vlax-for bl bls
 (if (eq (vla-get-isxref bl) :vlax-false)
   (if (not (eq (vl-string-elt (vla-get-name bl) 0) 42))
     (write-line (vla-get-name bl) fic)
   )
 )
)
(close fic)
(princ (strcat "\nEcriture du fichier " dest " pour le(s) nom(s) de blocs"))
(princ)

[sierenens]

merci les 2 solutiuons. J'aurais aussi voulu qu'on puisse voir a quoi resemble le bloc. C'est pour archiver sur papier tous les blocs que l'on utilise .

 

merci d'avance.

[Tramber]

J'aurais aussi voulu qu'on puisse voir a quoi resemble le bloc

 

fffffiii.......

 

C'est nouveau ça !

[sierenens]

(repérsentation + nom) !

ben c'est pas mal utile. si des gens veulent migrer nos dessins dans d'autres formats et qu'on doit receéer les symboles. Genre ou est le point d'insertion, grandeur, couleur etc ... vous trouver pas utile d'avoir la bibliothèque des symboles sous forme d'archives ???

[sierenens]

je vais faire un tableur exel avec les donnée extraites. ensuite je fais un dessin avec ce tableur et je met le bloc à coté de la ligne, ainsi j'ai une bibliothèque de mes blocs. C'est pas trés académique mais c'est partique !!!