PHILPHIL

Hello SuperNoob plutot que de modifier ton attribut avec un champ rajoute une "TABLE DES PROPRIETES" dans l'onglet actions dans la table tu rajoutes la visibilite et ton ttribut et tu mets en relation la visibilite et ton attribut quand tu changes de visiilite ton attribut s'affichera en conséquence a+ phil

hello Gile merci j'ai fini par ecrire ca ca fournit une liste au final, exploitable pour d autre lisp ca devrait marcher pour le bloc parametrique et normaux ;;; ;;;-------------------------------------------------- ;;;selectionner bloc par nom effectivenanme ;;;-------------------------------------------------- (defun c:selectionner_bloc_meme_nom (/) (setvar "cmdecho" 0) (setvar "CURSORSIZE" 10) (setq osm (getvar "osmode")) (if (and (setq source (car (entsel "\nCLIQUER SUR LE BLOC DE REFERENCE : "))) (setq source (vlax-ename->vla-object source)) (= (vla-get-objectname source) "AcDbBlockReference") ) (progn (setq namebloc (vla-get-effectivename source))) ) (setq compt 0 selinsertname (ssadd) ) (prompt "\nSELECTIONNER LES BLOCS :") (setq selinsert (ssget (list (cons 0 "INSERT")))) (setq com (sslength selinsert)) (while (< compt com) (if (= (vla-get-effectivename (vlax-ename->vla-object (cdr (assoc -1 (entget (ssname selinsert compt)))))) namebloc ) (progn (ssadd (cdr (assoc -1 (entget (ssname selinsert compt)))) selinsertname)) ) (setq compt (1+ compt)) ) (command "SELECT" selinsertname) (command "SELECT" "p") (setvar "CURSORSIZE" 100) (setvar "osmode" osm) (princ) ) a+ Phil

hello Rebcao parlait d'un SSGET au debut du sujet comment sélectionner avec un SSGET les blocs dynamiques qui on le meme nom qu'un bloc de référence, si on ne peut pas l'avoir directement en "DXF" a moins qu'il y est une commande "vl-lisp" similaire a SSGET qui le permette? a+ Phil

Hello Ksow je viens de regarder tes blocs. ils semblent qu'il ne sont pas a l'échelle la vue de dessus est bonne, on a bien 250cm de largeur mais quand on passe en vue avant,on a 188.1 cm et tes réhausses de 50cm font 37.6 cm ca doit etre du a une importation en inch peut etre de tes blocs que tu as redécomposé et pour alléger le fichier, pourquoi ne pas faire des bloc en cm ( ou metre, ou millimetre ) seulement et quand tu demandes si tu bosses en metre ou millimetre, de leurs donner une échelle X,Y,Z de 10 ou de .1 ca evite d'avoir les fichiers en metre et millimetre a+ Phil

bonjour je cherche un LISP pour incrémenter des blocs paramétriques. j'ai des blocs paramétriques avec 3 paramètres : LONGUEUR, HAUTEUR, VISIBILITE et un attribut : NUMERO je souhaiterai trier par ( LONGUEUR, HAUTEUR, VISIBILITE ) et attribuer un NUMERO identique a chaque bloc aillant les memes caractéristiques Tout en incrémentant l'attribut : NUMERO LONGUEUR HAUTEUR VISIBILITE NUMERO 25 25 A 1 25 25 A 1 25 25 B 2 25 25 B 2 25 30 A 3 25 30 A 3 50 30 A 4 55 30 A 5 MERCI A+ phil

hello L'incrémentation journalière, ou presque,de mes nom de fichiers a un coté pratique mes clients ont des portables, ils mettent du temps a ouvrir les fichiers dans l'explorateur de fichier ils voient tout de suite de quel fichier on parle sans a voir a l'ouvrir, pour aller regarder l indice dans un onglet et je peux leurs envoyer deux versions dans la meme journée quand ils ouvrent un *.pdf la référence du nom de fichier *.dwg est dans le cartouche on si retrouve plus vite, ca me permet aussi de suivre s'il sont a jour, et sur quel fichier ils travaillent mes nom de présentations se termine par un chiffre et une lettre, et sont récupés a l'aide d'un champ dans le cartouche style "PL001-" 001 = N° de la planche "-" "A" = indice de la planche et avec mes lisps, je change les noms de présentations en 2sec j'incrémente, je change la derniere lettre, a+ Phil

HELLO ca n'a rien de pratique ce gestionnaire, c'est lent en plus quand on fait des sous jeu,( qui corresponde a des carnets ) on peut déterminé s'il s'imprime dans un *.pdf multi-feuille ou pas indépendamment d'un autre sous jeu ? avoir un sous jeu s'imprimant dans un *.pdf multi-feuille et un autre sous jeu qui s'imprime dans plusieurs *.pdf et le nom de sortie du *.pdf on le determine comment une bonne fois pour toute ? c'est meme pas la concatenation du nom du jeu de feuille avec le nom du sous jeu j'ai voulu essayer "JTB WORLD, sheetset publish" mais ca a planter et depuis le delai de 30 jours est passé qui l'a testé ? a+ phil

hello merci je vais regarder ca de plus pres, mais je sens un inconvenient, c'est que chaque jour j'incremente mon fichier *.dwg et que je crois savoir que un jeu de feuille est lier a un *.dwg, donc quid de la mise a jour a moins d'ouvrir le fichier jeu de feuille avec un editeur de texte et changer rapidement le nom du *.dwg a+, Phil

bonjour j'ai des fichiers avec pas mal de présentations de différentes tailles certaines sont a imprimer dans un *.pdf a feuille unique : les A0 ou A1 certaines sont a regrouper / imprimer dans un *.pdf a plusieurs feuilles : les A3 A4 pour les *.pdf a feuille unique pas de souci avec PUBLIER pour les carnet *.pdf a plusieurs feuille je suis obligé de refaire plusieurs fois de suite PUBLIER avez vous une astuces , un programme, un LISp, un fichier excel permetant de de choisir les présentations, et de définir si celle ci s'imprime dans un *.pdf a feuille unique ou regrouper des présentations pour les imprimer dans un ou des *.pdf a feuille multiple presentation01 => presentation01.pdf presentation02 + presentation03 => carnet01.pdf presentation04 + presentation05 => carnet02.pdf presentation06 => presentation06.pdf en choisissant le nom de sortie pdf bien sur en choisissant / dispatchant / imprimant les 186+ présentations d'un coup apres y'en a pour une heure d'impression pour autocad sur a+, Merci, Phil

repose en Paix Patrick Merci a toi pour ce que tu nous as apporté et que l'on utilise chaque jour condoléance aux proches

hello Zeberd Gile m'avait ecrit un lisp pour le déplacement dans des fenêtres on sélectionne une fenêtre de base, puis les fenetres dans lesquelles faire des déplacement s avec "PAN", puis ca retourne dans la fenetre de base pour pointer les deux points du "PAN". et ensuite le "PAN" se fait tout seul inconvénient les points ne sont pas enregistrer quelque part. si on doit dézoomer pour sélectionner les fenetres, il faut pas oublier de rezoomer sur la fenetre de base pour pouvoir bien sélectionner les deux points de bases. et comme les points ne sont pas enregistrés,c'est pas facile de retrouver les points de base des fois dans d'autres fenetres de autres présentations, surtout si celles ci ne sont pas cadrés au meme endroit je l'utilise quand je veux déplacer les entités dans des fichiers de sous traitant qui bossent a "32153.145687452, 452163.451236466 klm" du point zero,zero, en déplaceant tout d'une intersection de files au point "0,0,0" ;;; ;; deplacement -PAN dans des fenetres selectionnees ;;; (defun c:dfxybase (/ vp1 ss p1 p2 n) (and (or (/= (getvar 'ctab) "Model") (prompt "\nCommande non accessible en espace objet")) (vl-cmdf "_pspace") (princ "\nSélectionnez la fenêtre référence") (setq vp1 (ssget "_:S:E" '((0 . "VIEWPORT")))) (setq vp1 (ssname vp1 0)) (princ "\nSélectionnez les fenêtres") (setq ss (ssget '((0 . "VIEWPORT")))) (or (ssdel vp1 ss) t) (setq p3 (getpoint "\nZOOMER ET POINTER LA FENETRE POUR LES POINTS DE BASE : ")) (vl-cmdf "_mspace") (setvar 'cvport (cdr (assoc 69 (entget vp1)))) (vl-cmdf "_pan" (setq p1 (getpoint "\nSpécifiez le point de base: ")) (setq p2 (getpoint p1 "\nSpécifiez le deuxième point: ")) ) (setq n 0) (while (setq vp (ssname ss n)) (setq ena (vlax-ename->vla-object (cdr (assoc -1 (entget vp))))) (vla-put-displaylocked ena 0) (setvar 'cvport (cdr (assoc 69 (entget vp)))) (vl-cmdf "_pan" p1 p2) (vla-put-displaylocked ena -1) (setq n (1+ n)) ) (vl-cmdf "_pspace") ) (princ) ) j'ai ma version qui enregistre les déplacements suivant "X" et "Y" du SCG dans "ACAD.cfg" ca sous entend dans ton cas ZEBERD de connaitre avec 8 chiffres apres la virgule les valeurs "X" et "Y" entres tes deux points de déplacement (defun c:dfxy (/ vp ss n) (setvar "cmdecho" 0) (setq fealpha (atof (getcfg "APPDATA/FEALPHA"))) (setq febeta (atof (getcfg "APPDATA/FEBETA"))) (initget 4) (setq tmp1 (getdist (strcat "\nENTRER LA VALEUR DE FE_ALPHA ( SUR X ) <" (rtos fealpha 2 8) ">: "))) (if tmp1 (setq fealpha tmp1) ) (initget 4) (setq tmp2 (getdist (strcat "\nENTRER LA VALEUR DE FE_BETA ( SUR Y ) <" (rtos febeta 2 8) ">: "))) (if tmp2 (setq febeta tmp2) ) (and (or (/= (getvar 'ctab) "Model") (prompt "\nCommande non accessible en espace objet")) (vl-cmdf "_pspace") (princ "\nSélectionnez les fenêtres") (setq ss (ssget '((0 . "VIEWPORT")))) (vl-cmdf "_mspace") (setq n 0) (while (setq vp (ssname ss n)) (setq ena (vlax-ename->vla-object (cdr (assoc -1 (entget vp))))) (vla-put-displaylocked ena 0) (setvar 'cvport (cdr (assoc 69 (entget vp)))) (command-s "scu" "") (vl-cmdf "_pan" (strcat (rtos fealpha 2 8) "," (rtos febeta 2 8)) "0,0") (command-s "scu" "p") (vla-put-displaylocked ena -1) (setq n (1+ n)) ) (vl-cmdf "_pspace") ) (setcfg "APPDATA/FEALPHA" (rtos fealpha 2 8)) (setcfg "APPDATA/FEBETA" (rtos febeta 2 8)) ;;; (setvar "cmdecho" 1) (princ) ) a+ ps : merci a Gile phil

hello lecrabe l idée ne vient pas de moi mais du forum autodesk et je viens de l'a tester avec la commande EDITREF sélection le bloc ou l'xref sélection se que tu veux dupliquer, et copie le a 500 unités a droite a gauche comme tu veux supprime du jeu de sélection les copies des entités a 500 unités ( elles changent de couleur ) sort de EDITREF sans sauvegarder avec "ignorer les modifications", ton XREF ou BLOC reste intact tu redéplaces les nouvelles entités de 500 unités dans l'autre sens et tu as les copies au meme endroit maintenant tout ça peut être intégrer dans un lisp sans avoir a déplacer les entités, le jeu de sélection a voir les lispeurs a+ Phil et tu as les copies des enti

hello DIDIER merciiiiiiiiiii ORDREATTBLOC : je ne connaissais pas ( donc ca veux dire qu'il y a quelques fonctions cachées que je'nai pas exploité ) heuu ca date de quand cette fonction ? bon ba ca aide pas mal en effet pour les mettre en ordre y'a plus qu'a quoi a+ Phil

bonjour remettre les attributs dans un certains ordre, ca pourrait etre sympa aussi pour d'autres notamment les retrouver dans l'ordre alphabétique dans la fenetre des PROPRIETES ou dans l'ordre afficher dans le bloc dans la fenetre des PROPRIETES a+ Phil

hello ba si justement regarde ton fichier sur le cote "gauche" ou "droit" ou"avant" "arrière" et zoom pour voir si tu as pas de Z qui ne sont pas égal a 0.0000000 ou fait un "ID" ( commande "ID" ) en cliquant sur les entites de ton bloc pour voir si tu as pas un Z autre que 0.00000 a+ Phil

hello c'est un plan géometre pour dessiner a des klm du SCG 0,0,0 ? et ton bloc il a pas la meme echelle echelle X = 1.3368 echelle Y = 1.2567 echelle Z = 1.2961 alors que tu dois travailler en 2D ? bizarre tout ca a+ Phil

hello Philsogood heuu je ne l'ai pas ton fichier j'en ai deja assez sur ma becanne :D :D trace un trait qui va de 0,0,0 a 1000,0,0 importe ton fichier topo en xref, puis aligne une face de mur du fichier topo sur cette ligne et tu bossera tout pres du point 0,0,0 comme ca c'est pas le géometre qui décide a ta place a combien de kilometres tu dois bosser du SCG je suppose que ton fichier tu le renvoies a d'autres, donc ils aimeraient bien que tes entites a toi soit proche du SCG, surtout si eux bossent pres du SCG parce que si tu as le malheur de mettre une entite sur ton fichier implanter a 0,0,0 et que tu fais un "zoom" "etendue" tu dois rien voir a l'ecran tellement les entite sont éloignées a+ Phil

Hello fait le test dans une copie de ton fichier de tout rapprocher vers le point 0,0,0 moi je pars du principe que le fichier géometre est toujours un xref de mon plan, pour travailler au plus pres du 0,0,0 et d'avoir un mur horizontal ou verticale pile poil commencant a 0,0,0 car en générale le fichier géometre peut tres bien a voir son point de référence a 330 klm et etre tourné dans un sens ou l autre et tu bosses en metre ou centimetre la ? 1360158701 cm = 13601.58701 klm ??? 2260881833 cm = 22608.81833 klm ??? fausse 3D des polylignes avec une épaisseur des blocs avec des entites a z=450 et le point d'insertion a z=0 ou des entites formant la cote a z=500 mais les deux points pour le calcule de distance z=0 ou 120 des trucs comme ca quoi a+ Phil

Hello Philsogood il n'y aurait pas une histoire de fausse 3D dans ce fichier ? un scu loin du SCG un plan bancale quoi si tu le regardes en vue de gauche ou droite ca donne quoi ? toutes les entités altimétrie ou z=0 a+ Phil

bonjour Gile j'ai essayé de réinstaller "LAYLOCK" avec le dernier LayLockSelSetup.msi ( 595ko du 04/04/2017 17:34) mais impossible, il me dit qu'une autre version est déja installée j'ai bien installé une autre version mais impossible de la désinstaller soit a partir du panneau de désinstallation windows ou a partir des autres *.msi que je dois avoir ( réparé ou désinstallé ne marche pas erreur:1001) LayLockSelSetup.msi ( 594ko du 06/06/2016 16:55) LayLockSelSetup.msi ( 511ko du 22/01/2015 12:49) LayLockSelSetup.msi ( 499ko du 02/06/2012 14:42) chaque *.msi ne doit pas forcement installé le programme au meme endroit. une idée ? fouiller avec REGEDIT.exe la base de registre et supprimer tous les "laylock" ? a+ Phil

Bonjour Lecrabe tu as remarqué ca aussi tiens. je suis pas sur d'etre le seul a me plaindre de récupérer ce genre de fichier. je pense que tous on en récupere des TRUCS sur le calque ZERO sans echelle, ou un au metre, l'autre au centimetre, millimetres loin du 0,0,0 ( des fois a 300 klm quoi mais quoi , NABILA tu'es mis a autocad quoi ??) entité forcé nom de calque incomphréhensibles des blocs A$c..... des vue de dessus 2D dessiné en 2D mais avec des partie en 3D, quand c'est pas avec des altimétrie differentes. tourner dans tous les sens et vous en avez surement d'autres des comme ca ou alors je suis le seul a raler sur le forum lolllll donc je veux pas les récupérer, mais ils arrivent sur mon bureau "windows" sans rien demandé bonne semaine Phil

Bonjour voila j'ai récupéré des fichiers avec des blocs ou les points d'insertion sont a 500 metres miniumum des intités, et d'autres ou les point d'insertion sont logiques sur une extremitée d'entité ou une intersection, donc proches, ceux la pas de problemes pour moi donc quand on fait un zoom tout le plan est petit a l'écran pour ceux dont le point d'insertion est tres loin auriez vous un lisp qui ramènerait le point d insertion de facon plus LOGIQUE sur une extremité d'entite du bloc, ou un coin de sa "boite enveloppe". sachant que les blocs ont tous des noms différents, quand c'est pas des "A$C....." MERCI a+ Phil

bonjour Patrick dans LXL quand on fait la mise a jour vers excel, est ce qu'il serait possible de choisir quel tableau doit etre mis a jour. pour aller plus vite j'ai des tableaux a plus de 10 000 cases et d'autres a 500 cases et le programme met 30 mn a gerer tous les tableaux du temps a passer pour une mise a jour ou / et verification non nécessaire sur certains tableaux merci Phil

hello bonuscad tu lances ca comment ? comme un LIsp avec un defun ? a partir d'autocad ? ca selectionne un sous repertoire ? et les sous sous sous repertoire qui vont avec ? a+ Phil

hello Gile oui je parlais bien du plugin increment d'accord donc faut bien tout réaligner pile poil avant Merci Phil