blenner

pour la création de pdf (entre autre), je te recommande d'aller voir à l'adresse suivante http://www.the-frog-concept.com/apps/ j'utilise se soft dans la société ou je travaille et je n'ai plus de probleme avec les pdf. La taille du papier est automatiquement trouvé avec 7mm de chaque coté. Tu as la possibilité aussi de faire des carnet de schémas et donc de joindre tes folio en un seul pdf. Elle est pas belle la vie. Bonne utilisation.

Salut, en lisp (defun c:lgspl () (setq CalqueTraite (cdr (assoc 8 (entget (car (entsel "\nChoix du calque :")))))) ;la variable "dec", est la précision du fichier actuel (setq dec (getvar "luprec")) ;initialisation de la longueur (setq longueur 0) (setq surface 0) ;création d'un jeu de sélection des polylignes(lw) sur le calque choisi (setq jeusel (ssget "X" (list (cons 0 "SPLINE") (cons 8 CalqueTraite)) ) ) ;initialisation du compteur d'entité (setq n 0) ;combien y a t'il d'entité dans le jeu de sélection (setq lonsel (sslength jeusel)) ; à faire autant de fois qu'il y a d'entité dans le jeu de sélection (repeat lonsel (setq ent (ssname jeusel n)) (command "aire" "ob" ent) (setq longueurtempo (getvar "perimeter")) (setq airetempo (getvar "area")) (setq longueur (+ longueur longueurtempo)) (setq surface (+ surface airetempo)) (setq n (+ 1 n)) ) ;affichage d'un message annonçant le résultat (alert (strcat "Le cumul des longueurs des SPLINE du Calque : " calquetraite "\nest de : " (rtos longueur 2 dec) "\nLa surface des SPLINE du Calque : " calquetraite "\nest de : " (rtos surface 2 dec) ) ) (princ) ) mais comment faire en vba? Merci