Formatage des attributs

[lesourd2]

Salut à tous

 

Tous est dans le sujet , en effet je voudrais savoir comment effacer toutes les valeurs de tous les attributs d'un ou plusieurs blocs.

 

Merci par avance.

 

@+

[lili2006]

Bonsoir à toutes et tous,

 

Par l'éditeur de blocs, puis "_battman",synchronisation des attributs; non ?

 

lesourd2, je me suis permis de supprimer ton second message, erreur, je suppose,...

[lesourd2]

Salut

 

lesourd2, je me suis permis de supprimer ton second message, erreur, je suppose,...

 

Effectivement tu as bien fait

 

Par l'éditeur de blocs, puis "_battman",synchronisation des attributs; non ?

Non car il s'agit vraiment de supprimer uniquement les valeurs mais pas les attributs.

 

merci quand meme.

 

 

[lili2006]

Re,

 

Et les rendre invisibles, toujours non ?

[lesourd2]

Salut lili 2006

 

Et les rendre invisibles, toujours non

Non parce que je voudrais effacer les valeurs pour les modifier une sorte de remise a zero.

 

@+

[(gile)]

Salut,

 

Un petit LISP vite fait (penser à déverrouiller le ou les calques des attributs)

 

;;; FORMATT (gile)
;;; Attribue une chaîne vide à toutes les valeurs de tous les attributs des blocs sélectionnés

(defun c:formatt (/ doc ss)
 (vl-load-com)
 (princ "\nSélectionnez les blocs ou [b]: ")
 (if
   (or
     (ssget '((0 . "INSERT") (66 . 1)))
     (ssget "_X" '((0 . "INSERT") (66 . 1)))
   )
    (progn
      (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))
      (vla-StartUndoMark doc)
      (vlax-for b (setq ss (vla-get-ActiveSelectionSet doc))
 (foreach a (vlax-invoke b 'GetAttributes)
   (vl-catch-all-apply 'vla-put-TextString (list a ""))
 )
      )
      (vla-delete ss)
      (vla-EndUndoMark doc)
    )
 )
 (princ)
) 

[lili2006]

Bonjour à toutes et tous,

 

La solution apportée par (gile) semble la bonne,....

[lesourd2]

Salut

 

La solution apportée par (gile) semble la bonne

 

C'est tous a fait ce que je recherchais.

 

Merci à vous deux pour vos reponses et tout particulierement à (gile).

Merci encore.

 

@+