Aller au contenu
Problème de lien d'inscription (résolu ?) ×

Routines VBA

Postez ici vos routines VB ou VBA. Une routine est du code court destiné à être réutilisé. Par exemple, un programme trouvant la distance entre deux points est une routine. Ne postez pas d'applications ici!

127 sujets dans ce forum

  1. lancer programme dvb à partir d\'un bouton

    Par rm,
    • 3 réponses
    • 3,7 k vues

  2. Recherche routine calcul EP

    Par ASTERIXII,
    • 6 réponses
    • 5,5 k vues

  3. Handle=clé mais comment ça marche ?

    Par winfield,
    • 7 réponses
    • 3,6 k vues

  4. Choper la valeur d\'une variable lisp (même global)

    Par winfield,
    • 4 réponses
    • 3,6 k vues

  5. Form où je veux

    Par winfield,
    • 3 réponses
    • 3,1 k vues

  6. coordonnes xyz des points sommets des polylignes

    Par ch.zara,
    • 5 réponses
    • 7,5 k vues

  7. ATTRIBUT EN TEXTE

    Par ludo07,
    • 3 réponses
    • 4,9 k vues

  8. IMPACT CIRCULAIRE (Sechanbask)

    Par lili2006,
    • 13 réponses
    • 4,7 k vues

  9. J\'en demande trop ?

    Par winfield,
    • 5 réponses
    • 4,1 k vues

  10. Getsubentity

    Par winfield,
    • 1 réponse
    • 5 k vues

  11. Comment ça marche

    Par winfield,
    • 3 réponses
    • 4 k vues

  12. Prenons en de la graine

    Par winfield,
    • 7 réponses
    • 3,5 k vues

  13. Listing

    Par fabdo,
    • 5 réponses
    • 3,5 k vues

  14. bug ou évolution ?

    Par winfield,
    • 0 réponse
    • 7 k vues

  15. Evènement modification via palette propriété

    Par winfield,
    • 0 réponse
    • 3,2 k vues

  16. Section circulaire jolie avec calorifuge

    Par sechanbask,
    • 6 réponses
    • 5,4 k vues

  17. Excel : fusion de bases de données et/ou mise à jour...

    Par sechanbask,
    • 5 réponses
    • 4 k vues

  18. Tableau attribut (constant et classique) de bloc + propriétés dynamiques

    Par sechanbask,
    • 5 réponses
    • 4,6 k vues

  19. excel to autocad

    Par speedy,
    • 7 réponses
    • 7,7 k vues

  20. Acad et OpenOffice

    Par winfield,
    • 14 réponses
    • 4,9 k vues

  21. Insertion d\'un Mtexte de 2 lignes par le milieu de la hauteur

    Par sechanbask,
    • 0 réponse
    • 2,4 k vues

  22. aide pour gestion d\'erreur, etc.

    Par sechanbask,
    • 0 réponse
    • 2,7 k vues

  23. RECUPERER LE PLUS GRAND NOMBRE

    Par sail,
    • 9 réponses
    • 3,1 k vues

  24. Copier une selection d\'un fichier à un autre

    Par winfield,
    • 12 réponses
    • 4,1 k vues

  25. trier

    Par sail,
    • 1 réponse
    • 5,6 k vues


  • Statistiques des forums

    • Total des sujets
      49,4 k
    • Total des messages
      299,4 k

  • Sujets

  • Messages

    • Luna
      Aide à la modification d'un LISP

      Par Luna · Posté(e)

      Coucou, Juste à titre d'exemple (désolée, la passion à pris le dessus ^^') j'ai retravaillé ton code dans sa globalité pour qu'il soit un peu plus poussé (sans intégrer la partie concernant les blocs) et plus facilement modifiable (les paramètres développeurs notamment, car je reconnais que pour le reste c'est peut-être plus difficile à comprendre désormais). Il s'agit du fichier GRUE.lsp (mais il est dépendant des fonctions (getkdh), (lst2str) et (str2lst) d'où leur présence également mais rien ne t'empêche de tout regrouper dans le même fichier) et le nom de la commande est GRUE. Bisous (et désolée pour le dérangement), Luna UtDac . lst2str.lsp UtDac . str2lst.lsp UtUse . getkdh.lsp GRUE.lsp
    • Luna
      Aide à la modification d'un LISP

      Par Luna · Posté(e)

      Coucou, Tu parles d'avoir les courbes de charge de plusieurs grues sous forme de commandes séparées, or je doute que le fond du code change drastiquement. Je suppose que les seules informations qui changent réellement sont celles que l'on trouve dans la variable 'capacites' ? Au vu du programme, il y a de nombreuses choses que l'on peut vraiment améliorer pour un rendu plus professionnel, mais pour cela il faudrait l'ensemble du LISP et quelques infos supplémentaires (notamment qu'entends-tu par "les courbes de charge soient crées dans un bloc" ?). Si en revanche tu souhaites effectuer ces modifications de ton côté : Il faut ajouter : (setq point (getpoint "\nSpécifier le point d'insertion : ") x (car point) y (cadr point) ) juste après la ligne (setq valeur ... et modifier les 2 lignes comme suit : ;; remplacer '(0 0) par point (command "_circle" point (rtos rayon 2 2)) ;; remplacer (list rayon 0) par (list (+ x rayon) y) afin d'ajouter les coordonnées du point d'origine au calcul des coordonnées du texte (command "_text" (list (+ x rayon) y) "1" "90" (strcat (rtos rayon 2 2) "m - " (rtos charge 2 2) "t"))   Pour cela, j'aurais besoin d'un peu plus de détail et en fonction des réponses, cela changera la nature du code. Souhaite tu créer des définitions de blocs ou souhaites-tu insérer des références de blocs ? Dans le premier cas, ne serait-il pas plus simple de créer les définitions de blocs à la main (puisqu'il ne me semble pas que cela représente de nombreuses heures de travail) et cela permettrait en plus de créer des blocs dynamiques. Dans le second cas, cela suppose que les définitions de blocs existent déjà. Ou bien est-ce un programme qui se veut "intelligent" c'est-à-dire qu'il insère des références de blocs, et si la définition de bloc n'existe pas encore dans le dessin, alors il faut dans un premier temps créer cette définition de bloc pour ensuite insérer une référence de bloc ?   Pour poser une question à un utilisateur (et dans ton cas je te suggère de n'autoriser que certaines valeurs), tu peux utiliser (getkword) avec la fonction (initget). Voir un exemple ci dessous (pas le plus opti) : (initget 1 "219 218 178") (setq grueNum (getkword "\nVeuillez choisir le type de grue [219/218/178] : ")) (cond ((grueNum = "218") (c:GRUE_DIAG218)) ((grueNum = "219") (c:GRUE_DIAG219)) ((grueNum = "178") (c:GRUE_DIAG178)) ) Bisous, Luna
    • lecrabe
      Probleme Rotation accessoire sur Revit 2024

      Par lecrabe · Posté(e)

      Hello As tu le REVIT 2024.3.1 Update (1.4 Go) de novembre 2024 ? A priori je ne crois pas ! Bye, lecrabe  
    • Erased
      Mettre une coupe brisée et un profil en long dans la même page de présentation

      Par Erased · Posté(e)

      Salut, sur la mise en page du profil en long tu peux insérer un cadre de Vue en plan sur la coupe brisée Coupe brisée : commande Dessiner en DAO, crée une copie pérenne dans le module de son choix par défaut DAO, mais figée, de la coupe brisée Mise en page du PL : commande Vue en plan, délimiter le cadre et paramétrer ses propriétés pour afficher la représentation de la coupe brisée
    • Axxome
      Mettre une coupe brisée et un profil en long dans la même page de présentation

      Par Axxome · Posté(e)

      Bonjour, je ne suis pas sûr de comprendre le sens de ta question: Tu souhaites afficher une fenêtre de ta vue en plan de ta coupe brisée et une fenêtre du profil en long de ta coupe brisée sur une même feuille ? Cordialement

  • Sujets

×
×
  • 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é