speedy

Bonjour tu as le choix dans ce forum concernant les métrés, c'est à toi de choisir la méthode. par l'intermédiare des blocs (voir lisp rea-att ou pline bloc) ensuite j'avais posté un vba excel pour extraire automatiquement tous ces blocs autocad depuis excel et faire ensuite le trie..... c'est un travail fastidieux il faut un peu d'organisation................. par contre je cherche toujours un moyen de lier les entités ligne autocad directement vers excel. ce qui est bien sur la 2008 à l'exportation on trouve l'extraction des attributs et les infos des objets dans autocad (ligne, polyligne,arc....) - je suis toujours sur la 2007. Bon courage Michel a

Bonjour à tous merci à lili2006, effectivement avec propriété je n'avais pas vue la flèche de défilement des sommets. je suis toujours épaté par les codes de bonuscad, sont super, j'essaye toujour de comprendre le cheminement du code, mais pas toujour évident pour moi, par contre trés éfficaces pour ma part je préfère 3dpoly_xy.lsp, ça m'oblige toujours de les faire une à une. je crois que je vais être obligé de créer un script comme je faisais, poly3d x,y,z ..... amicalement Michel a

Merci à vous poly2d ou poly3d pas de problème, le changement de l'élévation est global (tous les sommets à la même hauteur ou un seul sommet du Z choisi, j'aimerais pouvoir choisir le sommet et mettre sa hauteur. je connais bonuscad, j'ai déjà utilisé BlockAtt2End.lsp, c'est ce qui correspond à peu prés mais les les bornes du Zest à 0. 1 j'insère un bloc à chaques sommet de la poly 2 je modifie le point d'insertion de chaque bloc pour qu'ils prennent son insertion Z 3 je dessine une poly3d en s'accrochant à ces blocs (xyZ) en final je me retrouve avec la poly3d avec ses sommets xyz. Michel a

Bonjour à tous comment fait on pour attribuer un coordonné Z (il est à 0) à chaque sommet de la polyligne ... une idée s'il vous plait..... Merci Michel a

Bonjour si ce sont des blocs, le mieux est de les extraires et modifier le fichier exportation et les réinserer avec son Z. ou sinon mnt avec Mensura ou Covadis, ainsi tu récupères des points 3d. @+ Michel a

Bonjour je crée des fichiers pc3 comme périphérisque impression les copier dans le second pc et au pire il faut installer pdfcreator........tu auras une imprimante par défaut . @+ Michel a

Bonjour il ny'a pas de lien "ici" pour les blocs dyn, j'aimerais faire l'essai... @+ Michel a

Bonjour enregistrer en .dwt (gabarit) @+ Michel a

Bonjour ;;; Divise la polyligne en nombre de morceau (defun c:div_pl ( / ent obj_vlax param_start param_end perim_obj res_track old_osmd l_pt lg) (while (null (setq ent (entsel "\nChoix de la Ligne, Polyligne ou Spline: ")))) (cond ((member (cdr (assoc 0 (entget (car ent)))) '("LINE" "LWPOLYLINE" "POLYLINE" "SPLINE")) (vl-load-com) (initget 7) (setq res_track (getint "\nNombre de division: ") obj_vlax (vlax-ename->vla-object (car ent)) param_start (vlax-curve-getStartParam obj_vlax) param_end (vlax-curve-getEndParam obj_vlax) perim_obj (vlax-curve-getDistAtParam obj_vlax (+ param_start param_end)) res_track (/ perim_obj res_track) l_pt '() lg 0.0 old_osmd (getvar "osmode") ) (while (< (+ lg res_track) perim_obj) (setq l_pt (cons (vlax-curve-getPointAtDist obj_vlax (setq lg (+ lg res_track))) l_pt)) ) (setvar "cmdecho" 0) (setvar "osmode" 0) (foreach n l_pt (command "_.break" n "_first" n n)) (setvar "osmode" old_osmd) (setvar "cmdecho" 1) ) (T (princ "\nN'est pas une Ligne, Polyligne ou Spline: ")) ) (prin1) ) @+ Michel a

;plus court (defun c:gel_fen (/ ss n) (prompt "\nGeler les calques dans la fenêtre courante: ") (if (setq ss (ssget)) (repeat (setq n (sslength ss)) (command "_vplayer" "_freeze" (cdr (assoc 8 (entget (ssname ss (setq n (1- n)))))) "" "" ) ) ) (princ) ) ; Michel a

Bonjour j'avais trouvé ça...qui permet de geler en EP dans une fenetre les éléments sélectionnés. on peut utiliser laymanager d expresstools ou faire un script avec _volayer ;;;débutjavascript:insertAtCaret(':)','') ((LAMBDA (/ e plan lplan lsplan drap e_bis plan_bis) (cond ((= (getvar "tilemode") 0) (setq drap (getvar "expert")) (setvar "expert" 0) (while (setq e (entsel "\nPointez une entite: ")) (setq e_bis (car (nentselp (cadr e)))) (setq e (car e)) (setq plan (cdr (assoc 8 (entget e)))) (setq plan_bis (cdr (assoc 8 (entget e_bis)))) (if (/= plan plan_bis) (progn (princ "\nL'entité fait partie d'un bloc ou d'un xref.") (initget "Insertion Entite _Insert Entitie") (if (eq (getkword "\nAdopter le plan d'insertion ou de l'entité - [insertion/Entite]: ") "Entitie") (setq plan plan_bis) (setq plan plan) ) ) ) (setq lplan (cons plan lplan)) (princ (strcat " " plan " sera gelé dans la fenêtre courante.")) ) (if lplan (progn (setq lsplan (apply 'strcat (mapcar '(lambda (x)(strcat x ",")) lplan) ) ) (command "._vplayer" "_freeze" lsplan "" "") ) ) ) (T (prompt "\nIncorrect, TILEMODE doit être à 0.")) ) (princ) )) ;;;bon courage Michel a :)

bonjour Dans l'aide présentation....... Pour geler un calque dans ta vue il faut cliquer sur la troisième petite icone jaune à droite : geler ou libérer dans la fenêtre courante. Bon courage Michel a

Bonjour à tous merci Patrick_35 et gile de votre aide si précieux............ @+ Michel a

+ pour le fichier de Azerty, j'y ai procédé de la même manière et ces calques (- Calque inutilese) sont effacés difinivement.....à voir si cette astuce peut servir..... @+ Michel a

Merci Patrick_35 j'avais essayer de les purger, rien à faire, pour les supprimer j'ai créé une ligne par calque à effacer et ensuite avec _laydel je les a éffacé difinitivement. @+ Michel a

Bonjour à tous il est super "Edit_bloc" de Gile, j'ai le même prob avec des plans qui viennent de l'exterrieur...., je me retrouve avec des calques qui ne se purge pas ??.... J'ai remarqué que parfois il y avait des blocs dans un bloc et du copier colé qui venait d'un autre calque, je pense que c'est ça que je ne puisse pas les purger, j'ai essayé le code Patrick (cv.lsp), pas eu de résultat satisfaisant, ce code cherche les entités calque et bloc. y'aurait il un moyen de faire une analyse sur le bloc lui même ???, dans le style explode bloc à l'intérieur des blocs ou m'indiquer quel bloc est constitué de bloc à l'interrieur .... @+ Michel a

Bonjour La tablette est pratique pour une précision presque parfaite, depuis quelques quand j'ai besoin de digitaliser un plan, je passe en raster et je fais une digitalisation à l'écran. ou bien sure utiser un logiciel de vectorisation, la plus part du temps les reprographes en sont équipés et ils me fournissent le plan scanné et vectorisé.(ça ne vaut pas la numérisation sur tablette ou écran). pour les tablettes voir du côté de calcomp si ça existe encore.......ou ça http://www.tobago.fr/materiel.htm Michel a

Bonjour j'ai remarqué une chose certaine entité ve,nat d'autocad sont en conflit avec mensura, il suffit de refaire le dessin dans mensura et l'enregistrer. finalement résolu le problème de cartouche les blocs et attribut construits dans autocad, tout dans le calque 0 et c'est tout..... @+ Michel a Si vous avez des astuces, ils seront le bien venue sur ce forum.......

Bonjour à tous Je crée mon cartouche dans Autocad avec des attributs ensuite je transforme en bloc, et je le met dans la base de mensura 5.01,. Dans menura j'insère ce cartouche (manque de chance il y a un bug texte décalé, les hachures du logo pas térrible), alors je le modifie j'enregistre là je retrouve un cartouche parfait. je ferme ce fichier et j'en ouvre un autre j'insére ce cartouche et hop il est comme au départ il faut de nouveau le modifier ??? ou ce cache le fichier que j'avais modifié et enregistré ??? j'ai vérifier les préférences le répértoir est au même endroit...... @+ Michel a

Bonjour Certain netoyeur de registre font disparaitre certaines clés qui lui semble incorrectes et ça arrive que ça touche la clé Autocad "une sauvagarde de base de registre ou une restauration" en cas d'erreur il suffit de la reinjeter. Voilà....... @+ Michel a

Bonjour j'avais eu ce prob quand je faisais un copier collé de l'image (prob OLE) il vaut mieux inserer l'image normalement et en impression parametré le traceur meilleur qualité. @+ Michel a

Je suis allé trop vite, je peux transformer les textes en bloc, mais se ne sont pas des blocs et attributs explosable ni exportable ???? même propriété ne voit pas les attributs sauf avec _ddedit je vois l'attribut. je voulais récuperer tout les textes en blocs grace à la selection et ensuite les modifier en groupe dans excel. @+ Michel a

Salut Maximilien je confirme ton lisp fonctionne, il faut bien verrifier que se sont bien des (0.texte) , y'a t'il moyen de lui rajouter sélection global ..... un par un c'est un peu long. merci @+ Michel a

bonjour map tout seul je n'ai pas vue de routine profil intégré ??? il y a des routines lisp qui pourront peut être t'aider , sinon mensura, covadis, piste etc.... à un moment donné je créais un scripte sous excel et ensuite tu appliques ton fichier scr dans autocad c'est laboirieux mais on a de jolie profil.......... bon courage Michel a

Bonjour regarde du coté des lisp de patrick_35, il y a ong que tu charges et tu selectionnes tes onglets et tu imprimes, je m'en suis servi et c'est rapide, pourquoi s'embetter avec publier ??? http://www.cadxp.com/sujetXForum-11303.htm Michel a