cath287

Bonjour, en utilisant les tolérances limites tu obtiendrais quelque chose comme ça C'est ce que tu cherches?

Merci beaucoup pour ta réponse claire et pédagogique. En testant mon programme, j'avais vu que c'était sur editsolide qu'il y avait un soucis mais sans le comprendre. J'ai testé avec elst mais ça ne fonctionnait pas, mais j'ai compris qu'il fallait le remplacer par ent. elst ne me sert pas dans ce cas. (defun c:repfich (/ jeusel n ent) (command "controle" "Oui") (command "purger" "tout" "" "non") (command "purger" "appsenreg" "" "non") (command "repcontour" (setq jeusel (ssget "_X" '((0 . "3Dsolid")))) "" ) (setq n 0) (if jeusel (while (setq ent (ssname jeusel n)) (setq n (1+ n)) (command "editsolide" "corps" "nettoyer" ent "quitter" "quitter" ) ) ;fin de while ) ;fin de if ) Et maintenant ça marche !!! Ca va bien m'aider. Merci encore

Bonjour, j'ai une série de fichiers corrompus que j'ai besoin de réparer. En utilisant le "Guide : comment réparer des fichiers AutoCAD corrompus" j'arrive à résoudre la plupart des problèmes en utilisant les commandes : -purger -controle -repcontour -editsolide, corps, nettoyer. Mon souci est qu'il faut que je fasse editsolide sur chaque objet 3D un à un, ce qui prend un temps fou sans parler du risque d'oubli de certains objets. J'aurais donc voulu faire un lisp à lancer dans mes fichiers corrompus. Avec mon tout petit niveau en lisp, j'ai bidouillé ça : (defun c:repfich (/) (command "controle" "Oui") (command "purger" "tout" "" "non") (command "purger" "appsenreg" "" "non") (command "repcontour" (setq jeusel (ssget "_X" '((0 . "3Dsolid")))) "" ) (setq n 0) (if (setq jeusel (ssget "_X" '((0 . "3Dsolid")))) (while (setq ent (ssname jeusel n)) (setq elst (entget ent)) (setq n (1+ n)) (command "editsolide" "corps" "nettoyer" (elst) "quitter" "quitter" ) ) ;fin de while ) ;fin de if ) Ce qui me met comme message : "cdrs supplémentaire dans la paire pointée en entrée" J'ai besoin de vous pour comprendre ce qui ne va pas et résoudre mon problème svp Merci

Salut, c'est étrange cette affaire... quand on a les 4 avec ctrl A et qu'on supprime les objets 1 à 1 de notre sélection, peu importe dans quel ordre, jusqu'au dernier objet il y en a 1 supplémentaire. Bref, pour supprimer cet objet j'ai copié avec point de base les 3 objets, puis supprimé tout (ctrl A) et enfin coller les 3 objets avec point de base.

Merci beaucoup, je t'ai envoyé le lien par mp

ah oui la commande fonctionne mais en effet le fichier skp est trop récent :angry:

2018, ça devrait donc marché si j'ai bien compris

Salut Merci je n'avais pas vu ça. Mais je viens de le télécharger et de l'installer mais la commande importskp ne fonctionne pas. J'ai donc relancer mon autocad mais ça n'a pas suffit. J'ai regardé et trouvé le plugin de 2016 je l'ai donc desinstallé mais toujours pas... Il me semble que quand j'avais installé radicalpurge j'avais galéré aussi... Qu'est-ce que je fais mal?

Salut, un client m'a envoyé un fichier .skt et j'aurais besoin de le transformer en .dwg. Après quelque recherches j'ai l'impression qu'on ne peut le faire que si on a sketchup, ce qui n'ai évidemment pas mon cas. Une âme charitable pourrait me faire ça? Merci

Salut, ça y est maintenant que je commence à bidouiller un tout petit peu en lisp, j'arrive à répondre à mes petits besoins. Je viens donc de créer un tout petit programme, dont j'ai besoin depuis longtemps, pour faire l'export de présentation en objet de tous mes onglets en même temps. Je me suis dis que je pouvais poser ici ma première toute petite pierre à l’édifice cadxp alors je vous le mets là en espérant que ça puisse vous servir. (defun c:exportpres (/ pres) (setq pres (layoutlist)) (foreach p pres (setvar "ctab" p) (command "exportlayout" "") ) ) Bonne journée

Oui j'imagine qu'il y a un truc avec dynamo mais ne sachant même pas créer une ligne avec revit, de là à le programmer... Je viens d'aller poser la question sur l'autre forum merci.

Bonjour, Je n'y connais rien à Revit mais j'ai besoin d'exporter des types de familles de dizaines de fichiers. Savez-vous s'il est possible d'automatiser cette action et si oui comment je dois faire? Par exemple sur Autocad, en utilisant superautoscript, ça serait simple mais je ne sais pas si un tel outil est disponible sur Revit Merci de votre aide

Salut, la commande Echelle3D te permet de le faire mais seulement sur les maillages à ma connaissance.

Ok merci (gile), je comprends bien mieux ainsi Ah oui Didier je suis bien d'accord avec toi, tu es un vieil hibou néfaste :P Blague mise à part, je suis bien d'accord avec toi et je crois même que c'est en programmant, que je me rends compte que je ne suis pas aussi calée que je le croyais... Je profite aussi de ce message pour vous remercier tous les 2 pour les contenus que vous mettez à disposition, je suis tout le temps sur ton site Didier avec l'introduction à Autolisp de (gile) ouvert à côté de moi... Bon allez, je vais tenter de programmer ça maintenant. Je reviendrais peut être vers vous :D Bonne journée