Hydro8

Bonjour Merci pour l'astuce mais je n'ai malheureusement pas covadis. (gile) quand je réalise la fonction sur une première polyligne cela fonctionne. Je copie ensuite les points sur un ensemble de polylignes et relance la fonction. J'obtiens des points en double au même endroit. Je te joints un dwg avec le résultat brut. Merci pour ton aide. Dessin2.dwg

Un grand merci (gile) cette routine fonctionne parfaitement !

Ok il faut que je vois comme avait fait @jujugeometreje suppose, avec une distance par rapport au sommet. C'est vrai que c'est quelque chose que je n'ai pas expliqué dans mon post initial. Une fois que j'ai fais mes contours sur un plan n°1, je copie ces contours et les points sur un plan n°2. Sur le plan n°2 je peux être amené à modifier certains contours, et je dois mettre des nouveaux points uniquement sur ces nouveaux sommets.

Bonjour J'ai testé ton lisp, elle fonctionne super bien ! Un grand merci ! Petite question, parfois lorsque je copie les contours et les points dans un autre dessin, il me remet des points où il y en a déjà. Comment regarde-t-il si il existe déjà un point pour ce sommet ?

Hum bizarre, pourtant j'ai essayé dans un nouveau dessin et en purgeant. Peut-être une variable ?

J'ai testé sur un dessin fait rapidement à la main mais il me sort des points à l'extérieur. Serais-tu pourquoi ? Dessin1.dwg

Bonjour (gile), Je viens d'essayer ton code et il fonctionne parfaitement ! Super un grand merci ! Est-il possible d'aller chercher le bloc "dv-point" s'il n'est pas présent dans le dessin ? C'est un bloc dans les fichiers support d'autocad. Encore merci.

Bonjour, très intéressant il faut que je regarde comment ca fonctionne ! Bonjour et merci pour ce lisp que je pourrais tester demain :) Pour répondre au premier post, j'imagine la logique suivante : - indiquer le numéro de point de depart. - sélectionner les polylignes. - les sommets sont numérotés par ordre de création de la polyligne et par ordre de création du sommet. Concernant les points intermédiaires, peut-être que cela serait plus simple de dire aux utilisateurs de créer des sommets pour chaque points qu'ils veulent numéroter. merci encore.

Bonjour à tous, Je me demandais s'il était possible en lisp de numéroter "automatiquement" les sommets d'une polyligne, sauf quand il existe déjà un point à ce sommet ? J'ai des dossiers avec pas mal de polyligne qui se touchent et je dois numéroter chaque sommet. Pour le moment, j'ai un lisp qui insère un block avec une numérotation automatique. L'idée serait de sélectionner toutes les polylignes et qu'il insère un numéro incrémenté automatiquement, sauf quand un sommet a déjà été inséré pour une polyligne précédente. J'en demande surement trop Surtout pour récupérer l'information comme quoi il existe déjà un point. Je mets un exemple du résultat actuel. Merci pour vos informations. Points.dwg

Luna je te remercie encore pour cette lisp qui fonctionne au top ! Juste une petite question, est-il possible au lancement de la commande de choisir total / partielle ? Afin d'afficher le csv normal si on choisit partielle) et afficher que le total par calque si on choisit total ? J'ai essayé de commencer par rajouter le choix au lancement de la commande mais ça casse tout :(

Merci à tous pour vos réponses :) Dans tous les cas il est important que la somme indiquée soit égale à la somme des surfaces indiquées, peu importe la compensation.

Je suis bien d'accord mais certaines personnes partent au contentieux car elles ont refait la somme à la calculette et trouve une différence avec la somme affichée :mellow:

Effectivement cela est réalisable en faisant des manipulations sur Excel, c'était histoire de gagner du temps :) En gros il affiche les surfaces à 2 décimales et les surfaces arrondies à 1 décimale pour chaque pièce. Pour la somme, fait-il la somme des surfaces à 2 décimales ? J'imagine que oui. Du coup cette somme arrondie n'est pas forcément égale à la somme des arrondis. Par exemple, la surface de l'appartement me donne 40.48m² donc son arrondi donne 40.5. La somme des arrondis des pièces me donne 40.4. Je sais donc que j'ai 0.1m² à compenser quelque part. L'idée était d'afficher dans une troisième colonne ce calcul afin que cela soit déjà fait :(rires forts):

Alors j'ai bien réussi à faire mon arrondi et à l'afficher dans une troisième colonne, super ! Maintenant, est-il possible dans la somme des surfaces du calque, en plus de la somme actuelle, de faire la somme des surfaces arrondies à la décimale ?

J'ai essayé de remplacer les 2 par des 1 dans les fonctions rtos mais j'obtiens des valeurs avec exposant dans le csv : Edit : pardon j'ai rien dit, je dois modifier que le deuxième 2...

Alors là c'est super ! Pour le problème des poteaux, j'ai bien compris le truc, je vais voir comment on peut faire facilement de notre côté. Pour les MTEXT, c'est top on va pouvoir l'utiliser dans plusieurs domaines :) Une dernière chose, à quel endroit gère-t-on l'arrondi de la surface ? Il faudrait que je rajoute une colonne "Surface arrondie" avant la colonne "Surface" avec les surfaces au décimètre. Merci beaucoup luna ! Ca va être très utile :D :D

Merci pour ces Lisps, ils vont me permettre d'en apprendre un peu plus :D

Bonjour, Voici le zip avec les fichiers actuels. J'ai mis deux MTEXT qu'on utilise, le format reste le même, seul le numéro change et les XXX sont remplacés. Merci GEGEMATIC pour cette fonction ! Il faut que je prenne le temps de l'essayer, en gros je récupère le texte d'un MTEXT sans tout le formatage ? Très intéressant ! Lisp.zip

J'envoi ça demain :) A quelle endroit devrait-on modifier la variable str ? J'ai essayé différent endroit notamment quand on recherche \P mais cela ne change rien ou provoque une erreur.

Bon j'ai du mal me débrouiller, cela fonctionne bien ! Merci beaucoup pour ton travail ! Concernant le MTEXT, la première ligne a bien sûr un formatage spécial La ligne apparaît : {\fTahoma|b1|i0|c0|p34;\H3x;7f1\fTahoma|b0|i0|c0|p34; Vu que c'est tout le temps le même formatage, on peut imaginer supprimer "{\fTahoma|" et "|i0|c0|p34;\H3x;7f1\fTahoma|b0|i0|c0|p34;" ou cela ne fonctionnerait pas ?

Malheureusement j'ai toujours une erreur. J'ai mis le fichier dwg en pièce jointe, peut-être une erreur avec nos textes ? Export2.zip

Ah super merci ! Par contre j'ai l'erreur : Commande: SURFAREA ; erreur: type d'argument incorrect: listp "(aménagement figuratif)" Après avoir sélectionner les objets.

Merci ça fonctionne au top ! Deux dernières questions (j'espère :unsure: ) : - est-il possible de filtrer le texte de la pièce par un calque spécifique ? Nous avons plusieurs textes dans une pièce et du coup ils sont tous présents dans le tableau. - pour un texte multiligne, est-il possible de récupérer que la première ligne ? Afin d'utiliser ce Lisp pour autre chose que de la surface, nous avons parfois des multilignes dont l'information principale est sur la première uniquement. J'imagine que pour enlever le formatage il faut travailler sur la valeur du texte, donc que ce formatage soit toujours le même ?

Malheureusement j'ai une erreur lorsque j'essaye cette nouvelle version, au moment de la sauvegarde du fichier : "erreur: nombre d'arguments insuffisants"

Merci beaucoup Luna ! Super lisp ! J'ai pu facilement le modifier pour mettre mes propres wildcards, top ! Par contre j'ai essayé de faire une petite modification mais je ne trouve pas :mellow: - Est-il possible de rajouter une colonne "Surface totale" avant la colonne "Surface" et "Périmètre total" avant la colonne "Périmètre" afin de noter la surface totale du calque dans cette colonne et pour les pièces dans les colonnes normales ? - Est-il possible de modifier le nom du calque avant l'insertion dans le tableau ? Par exemple Surface-Appartement A001 devient Appartement A001 ? Merci encore :D :D