Aller au contenu

Lisp pour faire un zoom etendu sur chaque onglet ou page.


Ayting

Messages recommandés

Bonjour,

 

Mon employeur souhaite que lorsque l'on ouvre chaque folio, celui ci soit en zoom etendu, il me demande donc de bien vérifier à chaque fois sur chacun de mes plans que tout mes folios ont cette configuration.

Néanmoins il arrive que j'ai une cinquantaine de folio à vérifier et c'est extrêmement long et fastidieux.

 

Existe il un lisp pouvant réaliser cette manipulation ? 

Merci par avance

Cordialement.

Lien vers le commentaire
Partager sur d’autres sites

Salut,

(defun c:zal (/ tab)
  (setq tab (getvar 'ctab))
  (foreach l (layoutlist)
    (setvar 'ctab l)
    (command-s "_.zoom" "_extents")
  )
  (setvar 'ctab tab)
  (princ)
)

Avec le temps gagné, tu devrais pouvoir étudier le LISP : da-code, Introduction à AutoLISP.

Gilles Chanteau - gileCAD -
Développements sur mesure pour AutoCAD
ADSK_Expert_Elite_Icon_S_Color_Blk_125.png

Lien vers le commentaire
Partager sur d’autres sites

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité