lesourd2

Salut fred 1166 Peut-etre une solution là

Salut La reponse etait là . @+

Salut et bienvenu En tapant burst en ligne de commande / en selectionnant l'attribut et valider. L'attribut deviendra texte. @+

Pour lili 2006 . @+

Salut usegomme Tester vite fait (v_2008 full) sans aucun probleme pour l'instant Merci @+

Salut OK et merci (gile).

Salut (gile) Tout d'abord merci J'aurais une suggestion: j'aimerais ne pas avoir à selectionner chaque attribut pour justement eviter a chercher par rapport donc à ceux-ci leurs doublons. C'est a dire que si j'ai x attributs m'eviter de faire x selections pour reperer une eventuelle valeur indentique (enormement de valeurs à controler). Serait-il possible de faire une selection totale dans le dessin, ensuite de choisir un bloc,de choisir son etiquette et que là les valeurs des attributs de cette etiquette doublés,triplés,etc.. se mettent en surbrillance.

Salut Oui mais c'e n'est pas tout à fait ça , l'idée etait bonne. Pour faire simple ( on va esayer) Dans un dessin une dizaine de sorte de blocs differents Ces blocs ont des attributs avec 5 etiquettes L'idee est de pouvoir choisir dans l'ensemble du dessin 1) le bloc 2) l'etiquette Une fois ces choix faits, reperer qu'aucune valeur soient indentiques dans les etiquettes choisies de chaque bloc .

Salut à tous Existe-t-il un moyen simple et rapide pour reperer des attributs de blocs en doublon. Merci de vos infos.

Salut lili 2006 Non aucune idée, mais je suis pas sur que la commande a pu "sauter" comme ça. A mon avis elle n'a jamais été presente de base. @+

Salut lili 2006 Bien vu . J'ai donc cree ma touche de raccourci et maintenant c'est bon Merci. @+

Salut Merci pour vos reponses doit avoir un probleme de clavier...

Salut bonuscad Excuses moi d'insister mais j'aimerais comprendre. Je suis dans l'EP ; j'ai donc 2 fenetres, l'une petite imbriquée dans l'autre la plus grande. Quelles sont precisément les manips pour passer d'une à l'autre ça m'interpelle vraiment... @+

Salut Là ça m'epate! une fenetre à l'interieure d'une autre fenetre moi je suis desolé je ne peux qu'activer la grande, meme avec CTRL +R et en double cliquant dans la petite j'active la grande.[Edité le 12/9/2008 par lesourd2][Edité le 12/9/2008 par lesourd2]

Salut Bienvenu 1) Commande: _insertobj 2)Dans la fenetre inserer un objet : cocher à partir d'un fichier. 3)Chercher le fichier 4)cocher lier 5) OK @+

Salut ????? Un gars qui connait bien DEF......... [Edité le 9/9/2008 par lesourd2] [Edité le 9/9/2008 par lesourd2]

Salut quelque part une icone s'ecroule.

Salut à tous Pour info ZC : zone de compartimentage. ZF : zone de desenfumage. VTP : Volume Technique Protégé MDNA : Module Déporté Non Adressable ( sur ANTARES 2). @+

Salut C'est tous a fait ce que je recherchais. Merci à vous deux pour vos reponses et tout particulierement à (gile). Merci encore. @+

Salut lili 2006 Non parce que je voudrais effacer les valeurs pour les modifier une sorte de remise a zero. @+

Salut Effectivement tu as bien fait Non car il s'agit vraiment de supprimer uniquement les valeurs mais pas les attributs. merci quand meme.

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. @+

Salut La conception d'AutoCAD MEP repose et est basee sur l'application AutoCAD .avec en plus des fonctions de trois grandes disciplines. Mecanique Electricite Plomberie Le travail est le meme que sur AutoCAD,et il est tout a fait possible d'utiliser MEP comme AutoCAD classique, tu peux te configurer un espace de travial "AutoCAD classique". Pour cela il te suffit de suivre les manips ci-apres: 1)Ouvrir Autocad ( 2007 ou 2008) 2)Outils => Personnaliser => menus=> onglet ransferer 3)Derouler la liste des fichiers .cui et cliquer sur enregister sous ( fenetre de gauche) 4)Enregistrer donc le fichier au nom voulu (rebcao.cui ) par ex.. 5)Ouvrir AutoCAD MEP 6)Cde CUI ou iup 7)Dans l'onglet transferer, derouler la liste dans le nouveau fichier .cui puis cliquer sur ouvrir ( là on est dans la fenetre de droite). 8)Ouvrir le fichier.cui ( rebcao.cui) par ex.. et là le contenu du cui enregistré dans AutoCAD 2007 ou 2008 s'affiche (toujours dans la fenetee de droite). 9)Glisser et deposer l"'espace de travail de droite vers la gauche. 10) OK @+

Salut x_all . Moi je pense qu c'est ça; à toi de voir. ;;;Fonctionnement : ;;;- Les cadres de pages doivent être des blocs. ;;;(Si vous avez des cadres en simple rectangle, transformez en un en bloc et faites un réseau ou un copier) ;;;- Afin d'éviter toutes erreur, une présentation déjà paramétré doit exister (Une fenêtre de présentation cadré et mis à l'échelle, Traceur, échelle de tracé pour un cadre). ;;;- Les cadres en Espace Objets peuvent être à n'importe quel échelle, et peuvent être mélangé Portrait et Paysage. ;;;- L'unité d'insertion doit être en millimètre, centimètre ou mètre. ;;;- Le nom des onglet sera incrémenter de +1. ;;;- Commande : CEP ; Crée un onglet EP par cadre (bloc) de page sélectionné en EO ; par Bred - Un onglet déjà paramétrer doit exister (defun c:CEP (/ ACDOC B C FEN I LAYS N-P NOM-P ONG-BASE ONG_DEST SEL XMIN YMAX A-P HAUT LARG P1 P2 NOM ECH LAY LOCK UNIT) (vl-load-com) ; 4 Millimètres 5 Centimètres 6 Mètres (setq Unit (cdr (assoc (getvar "INSUNITS") '((4 . 1) (5 . 10) (6 . 1000))))) (while (not sel) (setq sel (car (entsel "\n Choix du cadre (Bloc) :"))) (if sel (if (not (equal (vla-get-ObjectName (setq b (vlax-ename->vla-object sel))) "AcDbBlockReference")) (setq sel nil))) ) (setq sel (ssget '((0 . "INSERT"))) AcDoc (vla-get-activedocument (vlax-get-acad-object)) nom-p (getstring t "\n Nom des Onglets à Créer :") layS (layoutlist)) (if (> (length layS) 1) (progn (princ "\n Copie configuration traceur d'onglet Existant. \n Plusieurs Présentations détectées.") (while (not ong-base) (princ "\n") (repeat (setq i (length layS)) (princ (strcat (nth (- (length layS) i) layS) " * ")) (setq i (1- i))) (setq ong-base (getstring t "\n Présentation d'où la configuration du traceur sera récupérée :")) (if (not (member ong-base layS)) (setq ong-base nil)))) (setq ong-base (car layS))) (setq a-p (vla-item (vla-get-layouts AcDoc) ong-base)) (vla-getcustomscale a-p 'n 'm) (vla-put-ActiveLayout AcDoc a-p) (vlax-for e (vla-get-paperspace AcDoc) (if (equal (vla-get-ObjectName e) "AcDbViewport") (setq lay (vla-get-Layer e) lock (vla-get-DisplayLocked e))) ) (setq i 0) (repeat (sslength sel) (if (vlax-property-available-p (vlax-ename->vla-object (ssname sel i)) 'effectivename) (setq nom vla-get-effectivename) (setq nom vla-get-name)) (if (equal (nom (setq c (vlax-ename->vla-object (ssname sel i)))) (nom b)) (progn (vla-GetBoundingBox c 'xmin 'ymax) (setq n-p (vla-add (vla-get-Layouts AcDoc) (setq ong_dest (strcat nom-p " - " (rtos (1+ i) 2 0))))) (setq ech (vla-get-XEffectiveScaleFactor c)) (vla-copyfrom n-p a-p) (vla-put-ActiveLayout AcDoc n-p) (setq fen (vla-AddPViewport (vla-get-paperspace AcDoc) (vlax-3d-point '(0 0 0)) (setq Larg (* Unit (/ (- (car (vlax-safearray->list ymax)) (car (vlax-safearray->list xmin))) ech))) (setq Haut (* Unit (/ (- (cadr (vlax-safearray->list ymax)) (cadr (vlax-safearray->list xmin))) ech))))) (vla-put-Layer fen lay) (vla-put-DisplayLocked fen lock) (vla-ZoomExtents (vlax-get-acad-object)) (vla-Display fen :vlax-true) (vla-put-MSpace AcDoc :vlax-true) (vla-put-ActivePViewport AcDoc fen) (vla-ZoomWindow (vlax-get-acad-object) xmin ymax) (vla-put-MSpace AcDoc :vlax-false) (if (> (- (car (vlax-safearray->list ymax)) (car (vlax-safearray->list xmin))) (- (cadr (vlax-safearray->list ymax)) (cadr (vlax-safearray->list xmin)))) (vla-put-PlotRotation (vla-get-activelayout AcDoc) ac90degrees) (vla-put-PlotRotation (vla-get-activelayout AcDoc) ac0degrees)) (setq p1 (vlax-make-safearray vlax-vbdouble (cons 0 1)) p2 (vlax-make-safearray vlax-vbdouble (cons 0 1))) (vlax-make-variant (vlax-safearray-fill p1 (list (- (/ Larg 2)) (- (/ Haut 2))))) (vlax-make-variant (vlax-safearray-fill p2 (list (/ Larg 2) (/ Haut 2)))) (vla-put-PlotType (vla-get-activelayout AcDoc) acWindow) (vla-setwindowtoplot (vla-get-activelayout AcDoc) p1 p2) (setq i (1+ i)) ) ) ) (setvar "TILEMODE" 1) (princ) ) @+

Salut (gile) Ok je suis bien d'accord avec toi, mais là, la demande etait de creer un bouton dans une barre d'outils pour lancer in Lisp. Alors oui il y a confusion .Quelle donc la bonne reponse. Personnellement la reponse de lili2006 me parait pas deconnante.... et chez moi j'en use et abuse et fonctionne tres bien.