didier

Bonjour @iowa13 Tu donnes les informations au compte-gouttes... donc le souci n'est que dans une partie du programme, la dynamique. J'ai changé d'espace de travail sans souci, je ne vois pas la raison de changer pour debugger ! Essaie-de charger classiquement par glisser-lâcher depuis l'explorer ou load, afin de voir si la macro est en cause. Amicalement

Bonjour @iowa13 Ok pour le niveau en lisp, je n'ai pas écrit "VL-LOAD-COM" mais (VL-LOAD-COM) avec des parenthèses ! Rien à voir avec le VBA. Comment utilises-tu le LSP de Lee Mac ? en copier-coller sur la ligne de commande ou par (load...) ou autrement encore ? Amicalement

Bonjour J'ai fait la recherche sur le code d'erreur. Moi non plus je n'arrive pas à reproduire le plantage. On ne sait pas quelle version AutoCAD ? Quel environnement ? À suivre… En tapant en ligne de commande (vl-load-com) avant de commencer, ça change quelque chose ? Amicalement

Bonjour @iowa13 Quelques recherches sur le net et pistes de recherche a priori cette erreur se déclenche sur des objets corrompus. Solution : Tester la liste avec entget du ename et arrêter le programme si cette liste est nulle. Source de la réponse Amicalement

Bonjour @m.l21 J'ai reçu le fichier, merci. En fait merci, oui et non, car le fichier est difficilement exploitable, je ne sais pas où sont les axes en plan et les profils ne correspondent pas à ce sont j'ai besoin. Quand on fait ce genre d'échange, on prend la peine d'expliquer ce qu'on attend sur le fichier, on met des flèches par exemple, avec un texte su style : Je cherche une solution pour que ce point (on le montre) du PT se retrouve à sa place sur la vue en plan et on dessine un cercle sur la position approchée. Ainsi, n'importe qui est en mesure de comprendre la finalité. Autre chose : Dans la question initiale, il était question de projeter "depuis un PT vers la vue en plan", ce que je comprends par montrer un point sur le PT (en élévation) et trouver sa position géométrique sur la vue en plan. Dans le message de livraison du fichier, c'est le contraire ! "est-il possible de faire apparaitre l'intersection des poly 3D avec la tabulation de PT sur le dessin de PT". Pour ce faire, il existe des possibilités Covadis en dessinant des polys 2D sur le plan et en dessinant un bloc dans le PT et je n'aurais pas répondu en proposant un programme. J'ai répondu au message, car de PT vers la vue en plan ça n'existe pas (confirmation de Thierry) et j'avais bidouillé des LSP il y a quelques années pour le faire. Certains pré-requis sont nécessaires et je ne les trouve pas dans les PT que j'ai reçu. À savoir : Dessin à l'échelle 1, erreur commune de dessin qui empêche de travailler dans les profils, il ne faut jamais choisir les configurations par défaut. Présence des coordonnées du point d'axe dans le PT. Présence du gisement dans le PT En l'absence de ces renseignements et d'un dessin échelle 1, je ne peux rien faire, désolé. Amicalement

Bonjour @Olivier Eckmann Oui, je suis d'accord, je sais trouver le deltaX et deltaY d'un point DANS le profil. Mais quand il va falloir le dessiner à sa place en XYZ il va falloir interroger l'abscisse curviligne et implanter le déport suivant le gisement écrit dans le profil. C'est le fait que l'axe en plan ne soit plus une entité AutoCAD qui devrait me créer un souci. Amicalement

Coucou Quand je dis que c'était AVANT il ne faut pas se méprendre, je ne dis pas que cette commande a existé dans une version antérieure de Covadis, Je dis que le programme qui le fait et que j'avais écrit (avant) fonctionnait avec des objets "simples" d'AutoCAD, lignes, polylignes. Avant qu'ils [Géomédia] fassent des objets spécifiques, Covadis, axe en plan, courbes de projet... J'attends le fichier de @m.l21pour vérifier si ça fonctionne encore, n'ayant pas de Covadis activé en ce moment sur ma machine. Amicalement

Bonjour @m.l21 Trois ou quatre profils complets, ce sera bien, ne pas trop filtrer les données, j'ai besoin de la même chose que l'utilisateur a à sa disposition. En plan, il faut l'axe en plan avec quelques tabulations pour se repérer et vérifier la projection. Amicalement

Coucou Un seul ce matin, le coupable est Invité quetiapine direct uk C'est bien mieux quand même Merci @Cadmin

Bonjour Je me permets de redemander des exemples de profils complets avec tous les renseignements pour que je regarde si mon idée peut fonctionner Amicalement

Bonjour @m.l21 Je n'ai pas Covadis sous la main pour confirmer mes dires. Il y a quelques années, j'avais fait un truc qui permettait de remettre en place les poly2 de profils en poly 3D géoréférencées le long de l'axe en plan. Ça ressemble quelque peu à ta demande, mais c'était AVANT... Avant qu'ils changent leurs méthodes, en particulier de créer des objets personnalisés, axe en plan, courbe de profil, etc. Je n'ai pas trop d'idée pour le faire aujourd'hui, mais si tu me fais passer quelques profils, je peux tenter d'essayer de trouver quelque chose. À moins que le Docteur Covadis, Thierry, passe par ici et te nomme la commande à utiliser. Amicalement

Bonjour @vins13007 Je ne suis pas concerné par ce sujet, mais je tiens à te félicite pour l'échange de la solution trouvée. Merci beaucoup de respecter l'esprit d'échange qui a fait de ce forum ce qu'il est : une mine de solutions dans toutes les directions. Amicalement

soit !

Ah !!! je crois que je viens de comprendre, ouais en même temps je suis sûr de rien. Ce ne serait pas le sens d'insertion du cartouche qui va définir le sens portrait ou paysage. C'est dans quel onglet de présentation que le résultat est inattendu ? Dans la présentation1(4), il faut faire une rotation pour imprimer en paysage sans rogner, ce n'est pas le traceur qui déconne, c'est la présentation.

Ce que je voudrais savoir, c'est : Est-il possible que dans l'objet présentation il y ait plusieurs formats à imprimer ? par exemple deux A4 en portrait et un A3 en paysage. Il y a tellement d'entités qui ne sont pas vraiment délimitées qu'un étranger*** à ta façon de faire ne peut comprendre. Dans toute forme de programmation il faut que le programme comprenne ce qu'attend l'utilisateur, si on a du mal à l'exprimer en langage naturel, le langage machine sera confus. Réponse à ton dernier message apparu pendant que je répondais. C'est la définition même de la méthode de sélection du ssget, X signifie la totalité des entités, calque actif ou non, gelé ou non, la totale ! Il faut penser à aller voir les aides fournies sur le net, rien que sur mon site, j'explique ça en long et en large… je ne pensais pas avoir fait tout ça pour rien. Amicalement *** il faut admettre que les autres ne sont pas dans ta tête

Perso, j'étais pas au courant qu'une action avait été engagée. Ce serait bien de communiquer, Cadmin... Car, dans le temps, j'avais une adresse mail de contact, mais elle n'est plus valable.

et un autre à l'instant... toujours un invité

De quel résultat inattendu parle-t-on ? Je ne comprends pas comment on choisit paysage ou portrait dans toutes ces données. Je veux bien des explications...

Bonjour @passi54 Ce n'est que de la gestion Excel, un simple clic sur la fonction de tri et c'est réglé. Il me semble même qu'on peut le faire en visionnant les résultats dans AutoCAD. Qu'est-ce que vous êtes exigeants !!! (hihi) Amicalement

Bonjour à l'instant je viens d'en masquer un nouveau, ce qui a été fait n'est sans doute pas suffisant.

Bonjour @phil 54 Tu comprends qu'on ne peut pas être dans ta tête, relis tes messages et mets-toi à la place d'un inconnu le lisant. Souvent donner un DWG avec des explications textuelles est un bon moyen de transmettre les questions. Je repose la question : de quoi dispose-t-on ? Je suis parti avec l'hypothèse que tu avais une paire de points, maintenant tu dis qu'on part d'une sélection graphique hétéroclite. Le programme de Lee Mac est, comme tout ce que fait ce Monsieur, un bijou. Mais si tu lances une sélection globale, il te trouvera la boîte englobante globale et je ne pense pas qu'on soit avancé. Donne un exemple de ce qu'il y a à faire s'il te plaît. Amicalement

Bonjour @Luna Je te comprends, car je suis souvent l'initiateur du genre de réponse que tu as faite. Je ne suis visiblement pas à un paradoxe près, parce que dans le cas présent, j'ai répondu en Lisp. Il est vrai que le niveau des utilisateurs baisse, et que leurs demandes de Lisp explosent alors que des solutions natives existent. Au moins dans ce message, on a été remercié et l'auteur va essayer. Le pire, c'est le message qui demande un service, qu'on se décarcasse pour répondre, et que l'auteur nous prend de haut en disant qu'on aurait pu faire un peu plus d'efforts. Les exemples sont nombreux. Je te salue respectueusement ma chère Luna.

Bonjour @passi54 NON, pour l'extraction de données, c'est une commande qui demande les qualités des entités qu'on souhaite enregistrer. Il n'y a pas de gabarit, on répond à des questions posées via une case de dialogue. Je plussoie @Luna de favoriser les commandes natives quand c'est possible. Toutefois, cette demande de listing étant récurrente, je propose cette solution en lisp. Le nom de la commande à lancer en ligne de commande une fois le lisp chargé est "passi54" Il est possible de l'améliorer, mais a minima, il répond à la demande formulée. Amicalement (defun c:passi54 ( / aire calque ent fich lis n nom ss) (setq ss (ssget (list (cons 0 "HATCH")))) (setq lis nil) (repeat (setq n (sslength ss)) (setq ent (vlax-ename->vla-object(ssname ss (setq n (1- n))))) (setq aire (vlax-get-property ent 'area)) (setq calque (vlax-get-property ent 'layer)) (setq lis (cons (strcat calque ";" (rtos aire 2 2)) lis)) ) (setq Nom (strcat (getvar "dwgprefix") (getvar "dwgname"))) (setq Nom (substr Nom 1 (- (strlen Nom) 4))) (setq Nom (strcat Nom ".csv")) (setq fich (open Nom "w")) (write-line "Calque;Superficie" fich) (foreach x lis (write-line x fich) ) (close fich) (alert (strcat "Le fichier : " nom " a été créé et contient " (itoa (sslength ss)) " enregistrements." ) ) )

Bonjour @passi54 Je me permets de répéter ma question... QUE doit-il y avoir dans ce listing ?

Bonjour @passi54 OK, donc le Lisp est supporté, que faut-il faire avec ces hachures ? Un listing de superficies, de calques, un mix des deux ? Amicalement