lecrabe

Hello Vu de loin, cela me parait impossible !? J ai au moins 4 PCs differents sous Win 10 avec des AutoCAD / MAP / Archi 2016-2021 sans avoir jamais eu un quelconque probl avec les XREFs ! Au fait as tu bien le Update AutoCAD 2019.1.2 sur tes ACADs 2019 !? Et si tu as des AutoCAD MAP 2019, alors en plus le Update MAP 2019.0.1 ... La Sante, Bye, lecrabe "fatigue"

Hello WAOUH cela fonctionne sur mon DWG special test ! sur les Proprietes : X , Y , Z , XSCALE, YSCALE Apres il faudra que je "corse" un peu plus mes tests ! Au fait est il necessaire que je teste avec des Blocs dynamiques ?? Ou bien es tu relativement sure de toi a ce niveau !? Au fait pas encore teste le fameux probl de la ROTATION !? La Santé, Bye, lecrabe "fatigué"

Hello OK Merci, je regarde cet AM... Avec mon DWG spécial Test... La Santé, Bye, lecrabe "fatigué"

Hello J ai progresse ... Mauvaise utilisation de ta routine ! Je coche dans la colonne de gauche, les ATTRs a traiter ... Puis des que je coche dans la colonne centrale la 1ere propriete correspondante : bad argument type: stringp nil La Sante, Bye, lecrabe "fatigue"

Hello Luna 1) Voir mon DWG de Test joint ... Multiples Blocs CLASSIC (NON Dynamic) avec multiples attributs pour tester des cas differents ! 2) Soit je ne sais pas utiliser ton Lisp, soit il y a un autre truc !? 3) SVP tu regardes en haut a gauche les Blocs nommes : C_XY , C_XYZ , C_XY_XSCYSC avec les attributs qui vont bien, remplis par des valeurs numeriques ... 4) Je selectionne un Bloc de Reference puis LES Blocs concernes ... ET malheureusement, il ne se passe RIEN !! Au fait je suis avec AutoCAD 2022 Beta RC US/English et IDEM avec AutoCAD MAP 2021 French ... >> Command: ATTPROPERTIES []============= LANCEMENT DE ATTPROPERTIES =============[] Initialisation en cours... Selectionner le bloc referent [ Nom ] : Veuillez selectionner les blocs du nom de "C_XY_XSCYSC", ENTER pour selectionner toutes les occurrences. Select objects: Specify opposite corner: 2 found Select objects: ATTSYNC complete. Fin de l'execution... Un total de 2 bloc(s) denommes "C_XY_XSCYSC" ont ete traites a partir des attributs suivants : - X - XSCALE - Y - YSCALE >> MERCI, La Sante, Bye, lecrabe "fatigue" Bloc_Luna_0.zip

Hello IDEM dans mon message du 21/10/2016 de CE MEME sujet ... Humour : sais tu lire ?? ---- Sais tu vraiment LIRE, il y a des parentheses et des guillemets !! ---- Tu fais un Copier depuis la parenthese ouvrante jusqu'a la parenthese fermante !! ---- Et tu colles dans la ligne de commande puis ENTREE !! SVP tu tapes : (menucmd "P03=+acad.view") La Sante, Bye, lecrabe "fatigue et enerve x 2"

Hello IDEM dans mon message du 21/10/2016 de CE MEME sujet ... Humour : sais tu lire ?? SVP tu tapes : (menucmd "P03=+acad.view") La Sante, Bye, lecrabe "fatigue et enerve"

Hello Luna WAOUH tu bosses a 01h-02H du matin ! Donc tu es aux Antilles en Mode Cool / Zen ... Main droite tu degustes un Ananas ... Main gauche une Pina Colada !? Je vais essayer de te faire un retour des que possible ... MERCI, La Sante, Bye, lecrabe "fatigue"

Hello Pas sur de bien te suivre !? AVEC ou SANS Covadis, en Interface CLASSIC, si tu veux le vieux Menu deroulant "Affichage", alors tu tapes au clavier : (menucmd "P03=+acad.view") A propos sur ton AutoCAD 2020, j espere que tu as le Update AutoCAD 2020.1.3 (sorti en Mai 2020) !? La Sante, Bye, lecrabe "fatigue"

Hello Pas sur de bien te suivre ?! Pour chaque Présentation / Layout, tu peux avoir un CTB ou STB différent qui va s appliquer aux N Fenêtres / FMULT... Aucun rapport avec les États de calque ! Donc je ne sais pas faire ce que tu demandes ! Si j ai compris ?! Après on pourrait envisager un Lisp qui appliquerait un CTB ou STB dans une Présentation / Layout en fonction de quoi ??? Il y a longtemps j avais vu chez qq un Lisp qui détectait les 3/4/5 premières lettres du Nom de la Présentation / Layout et appliquait le Bon CTB ou STB... Et ce sur la Présentation courante ou sur N Présentations... On pourrait envisager un Lisp "un poil" different : En fonction des 3/4/5 premières lettres du Nom de la Présentation / Layout on appliquerait un Etat de calques specifique a TOUTES les Fenetres / FMULT de la Presentation / Layout !? La Santé, Bye, lecrabe "fatigué"

Hello Voir ici : https://cadxp.com/topic/49690-barre-doutils-covadis/page__gopid__298931 La Sante, Bye, lecrabe "fatigue"

Hello Thierry Cela me semble "interessant" ta solution !? J envisageais de renommer certains .ARX ... Ce qui me paraissait "un peu" dangereux !? La Sante, Bye, lecrabe "fatigue"

Hello Sniff, Sniff, Steven n'aime pas les routines Lisp que j'ai en stock !? La Sante, Bye, lecrabe "fatigue"

Hello Et la 3001eme routine, c MERCI a VDH-Bruno ! La Sante, Bye, lecrabe "fatigue"

Hello Et comme tu es PENIBLE ET EXIGEANT, tu veux en plus une version qui traite TOUS les Blocs definis dans le DWG ! ( Donc aucune selection necessaire ) Voici donc la version qui va bien : Exp2DXF_ALL Les 2 routines ont ete testees sur AutoCAD 2022 ... La Sante, Bye, lecrabe "fatigue" PS: un excellent whisky single malt ! ;; ;; https://www.cadtutor.net/forum/topic/70488-each-unique-block-reference-to-separate-dxf-file/ ;; ;; Routine: Exp2DXF_ALL by Skierz ;; ;; --- Export to DXF2000 ALL the Blocks of the current DWG --- ;; The current DWG must be saved before running ... ;; After running please QUIT without Updating the current DWG ! ;; ;; DXF are automatically written into the current DWG Folder ... ;; (vl-load-com) (defun KGA_Conv_Pickset_To_ObjectList (ss / i ret) (if ss (repeat (setq i (sslength ss)) (setq ret (cons (vlax-ename->vla-object (ssname ss (setq i (1- i)))) ret)) ) ) ) (defun c:Exp2DXF_ALL ( / doneLst fld fnm nme ref spc ss) (if (and (or (= 1 (getvar 'dwgtitled)) (prompt "\nError: DWG must be saved first ") ) (setq ss (ssget "_X" '((0 . "INSERT")))) ;;; "_X" Version pour TOUS les Blocs ) (progn (setq fld (getvar 'dwgprefix)) (setq spc (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)))) (foreach obj (KGA_Conv_Pickset_To_ObjectList ss) (if (not (vl-position (strcase (setq nme (vla-get-effectivename obj))) doneLst)) (progn (setq doneLst (cons (strcase nme) doneLst)) (setq ref (vla-insertblock spc (vlax-3d-point 0.0 0.0 0.0) nme 1.0 1.0 1.0 0.0)) (vla-put-layer ref "0") (command "_.zoom" "_object" (vlax-vla-object->ename ref) "") (setq fnm (strcat fld nme ".dxf")) (vl-file-delete fnm) ; Delete existing file. (command "_.dxfout" fnm ; Full path. "_entities" (vlax-vla-object->ename ref) "" "_version" "2000" ; Valid DXF version. 6 ; Accuracy ) (vla-delete ref) ) ) ) ) ) (princ) )

Hello Comme je suis fondamentalement "Bon, Gentil, Aimable, Serviable, etc", j ai une routine tiree de mon stock de 3001 routines ... qui pourrait eventuellement te convenir !? Routine: Exp2DXF qui ecrit en DXF2000 TOUS les Blocs selectionnes ... Par contre , il faut que tous les Blocs a traiter, soient "devant toi" ! Un peu comme une legende avec tous les Blocs ... SVP tu regardes bien le Blabla dans le Lisp ... La Sante, Bye, lecrabe "fatigue" PS: un excellent whisky single malt ! ;; ;; https://www.cadtutor.net/forum/topic/70488-each-unique-block-reference-to-separate-dxf-file/ ;; ;; Routine: Exp2DXF by Skierz ;; ;; Export to DXF2000 ALL selected Blocks of the current DWG ;; The current DWG must be saved before running ... ;; After running please QUIT without Updating the current DWG ! ;; ;; DXF are automatically written into the current DWG Folder ... ;; (vl-load-com) (defun KGA_Conv_Pickset_To_ObjectList (ss / i ret) (if ss (repeat (setq i (sslength ss)) (setq ret (cons (vlax-ename->vla-object (ssname ss (setq i (1- i)))) ret)) ) ) ) (defun c:Exp2DXF ( / doneLst fld fnm nme ref spc ss) (if (and (or (= 1 (getvar 'dwgtitled)) (prompt "\nError: DWG must be saved first ") ) (setq ss (ssget '((0 . "INSERT")))) ) (progn (setq fld (getvar 'dwgprefix)) (setq spc (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)))) (foreach obj (KGA_Conv_Pickset_To_ObjectList ss) (if (not (vl-position (strcase (setq nme (vla-get-effectivename obj))) doneLst)) (progn (setq doneLst (cons (strcase nme) doneLst)) (setq ref (vla-insertblock spc (vlax-3d-point 0.0 0.0 0.0) nme 1.0 1.0 1.0 0.0)) (vla-put-layer ref "0") (command "_.zoom" "_object" (vlax-vla-object->ename ref) "") (setq fnm (strcat fld nme ".dxf")) (vl-file-delete fnm) ; Delete existing file. (command "_.dxfout" fnm ; Full path. "_entities" (vlax-vla-object->ename ref) "" "_version" "2000" ; Valid DXF version. 6 ; Accuracy ) (vla-delete ref) ) ) ) ) ) (princ) )

Hello SVP tu regardes dans le forum: Ordinateurs Le sujet: Configuration Tour et Portable Ma réponse du 8 février 2021 17H07 ... La Santé, Bye, lecrabe "fatigué"

Hello Sniff, Sniff pour toi , la bière n est pas ma tasse de thé ! Mots clés avec Google: autocad wblock all blocks La Santé, Bye, lecrabe "fatigué & couché"

Hello le Gege de la Basse Savoie Donc tu dois un Apero au Breton : ??? et au Stephanois : Whiskey Single Malt - Mais je ne peux pas en profiter car Odorat a 10% depuis fin Janvier 2021 ... - Pas grave car j ai gueri tout seul du COV19 sans l aide de la science ! La Santé, Bye, lecrabe "fatigué"

Hello ZERO Updates sur ton AutoCAD MAP 2018 ! La Sante, Bye, lecrabe "fatigue"

Hello 1) Deja ton AutoCAD MAP 2018 est il bien A JOUR !? Pour la partie AutoCAD 2018 : Update 2018.1.2 Pour la partie MAP 2018 : Update 2018.0.1 2) Ensuite quand tu fais une Hachure en mode Point ou un Contour : -- Un maximum de calques invisibles -- Si possible aucun texte, mtexte, attribut, cotations visibles -- Se mettre sur un calque specifique -- Voir a l ecran la totalite de la zone qui va etre hachuree ou zone de contour La Sante, Bye, lecrabe "fatigue"

Hello Si tu tapes la commande BURST (ou autre commande des Express/Bonus), ça dit quoi ? As tu bien dans tes chemins de Support, le dossier avec "dedans" 123 fichiers (4.20 Mo) ? Tu as un AutoCAD 2018 ET un AutoCAD CIVIL 2018 ? Pour un AutoCAD MAP 2018, tu dois avoir 3 fichiers ACETMAIN*.* ici : C:\Users\root\AppData\Roaming\Autodesk\Autodesk AutoCAD Map 3D 2018\R22.0\fra\Support La Santé, Bye, lecrabe "fatigué" PS: +1 avec Eric pour la commande EXPRESSTOOLS si toutes les conditions sont réunies ?!

Hello OOPS SORRY, j ai un peu "zappe" ta demande ! Voir le lien Download Free ... En esperant que cela te convienne !? Fichier "PCG__Nuage.rar" en ligne ... Le fichier sera accessible (1 mois) a : http://dl.free.fr/ikwZdrtiG La Sante, Bye, lecrabe "fatigue"

Hello Franchement je n'ai pas tout compris !? Si tu veux re-organiser / trier / renommer / deplacer / etc, tes Presentations, je te conseille l excellente routine "TabSort" de Lee-Mac ! http://www.lee-mac.com/tabsort.html Voir aussi la routine "RenumberLayouts" : http://www.lee-mac.com/renumberlayouts.html MERCI au Grand Maitre Lee-Mac !! La Sante, Bye, lecrabe "fatigue"

Hello Rappel : je suis au niveau 0.2 en Lisp mais bon, il me semble que : Commande: RG REGEN Commande: (ssget "_X" '((0 . "ACDBPOINTCLOUDEX"))) Cela te donne un jeu de selection de TOUS les Nuages (car "_X") que tu peux recuperer par Selection Precedente ! Donc pour UN Nuage : (ssget '((0 . "ACDBPOINTCLOUDEX"))) La Sante, Bye, lecrabe "fatigue"