Communauté
AutoCAD – tous produits - Français
Bienvenue sur les forums AutoCAD d’Autodesk. Partagez vos connaissances, posez des questions, et explorez les sujets AutoCAD populaires.
annuler
Affichage des résultats de 
Afficher  uniquement  | Rechercher plutôt 
Vouliez-vous dire : 

AutoCAD : Je cherche un lisp ou bien un vba excel qui va insérer un bloc AutoCAD

6 RÉPONSES 6
RÉSOLU
Répondre
Message 1 sur 7
Topo94_
430 Visites, 6 Réponses

AutoCAD : Je cherche un lisp ou bien un vba excel qui va insérer un bloc AutoCAD

Bonjour,

 

Je cherche un lisp ou bien un vba excel qui va insérer un bloc Autocad  qui va me permettre d'insérer un listing de points ( Points topo levés ) : le but est d'avoir le point - L'altitude levé - l'écart entre les deux 

mohammed_kherbach_auditeur_0-1707382126607.png 

mohammed_kherbach_auditeur_1-1707382248156.png

 

 


Le titre du sujet a été modifié par un modérateur pour faciliter la recherche. Titre original:
Re: [ATE] Des spécialistes AutoCAD à votre écoute le jeudi 8 février 2024

 

6 RÉPONSES 6
Message 2 sur 7
Y.AUBRY
en réponse à: Topo94_

Bonjour,

 

Tu trouveras dans le lien ci-dessous une méthodologie pour générer un script de commande d'insertion de bloc traité dernièrement.

https://forums.autodesk.com/t5/autocad-tous-produits-francais/autocad-script-d-insertion-de-bloc/m-p...

 

A+ Yoan

Yoan AUBRY

EESignature

Message 3 sur 7
Y.AUBRY
en réponse à: Topo94_

Pour répondre un peu plus spécifiquement à ta question il faudrait que tu nous communique :

- le nom du bloc à insérer (et si possible nous le communiquer pour les tests)

- la manière d'obtention de tes informations d'altitude et d'écart car elle ne sont actuellement pas présente dans la capture d'écran que tu as fourni.

 

Je suppose que la première colonne correspond au numéro de point (auto-incrémenté), X en deuxième colonne , Y en troisième colonne.

La quatrième colonne correspond au Z? à l'écart?

 

En attente de ton retour

Yoan AUBRY

EESignature

Message 4 sur 7
braudpat
en réponse à: Topo94_

Hello @Topo94_ 

 

Connais tu la merveilleuse Routine Lisp/VLisp "IXL" du regrette Patrick_35 qui insere un Bloc depuis un XLS bien prepare ?

 

SVP tu regardes bien l Image jointe qui te montre ce que doit contenir le XLS ...

 

Je l ai encore utilise cette semaine pour inserer des centaines de Blocs (Poubelle) sur la Cartographie de Vesoul !

 

Mon record avec cette Routine, c plus de 10 000 Chambres Telecom sur Cherbourg !

Le traitement avait ete un peu long et j avais coupe en 2 le fichier XLS donc 2 traitements 

... Les gens que je formais ont "pleure" quand ils ont vu le resultat ...

 

Bien ajouter le chemin OU tu vas stocker les fichiers IXL pour les ajouter au chemin de SUPPORT de ton ACAD !

 

Bye, Pat

 

---- Mode d emploi ---- 

 

01) BON j ai decouvert un Micro-Bug "pas grave" ... Probl de la Rotation !
( C en fait lie aux Unites Geometre du DWG Grade+Nord+etc et donc de Covadis )
( Le contournement sera tres facile ! ) 

 

02) TOUT d abord tu vas stocker tes LSP+DCL+etc dans un dossier specifique du genre < BONUSLSP >

 

03) Tu vas ajouter ce chemin a tes chemins de Support de ton ACAD / ACAD MAP 201X-202X
... Voir Image jointe ... 

 

04) Tu vas decompresser le ZIP (LSP+DCL) joint dans ce Dossier < BONUSLSP >

 

05) Tu verras dans le ZIP une Image JPG qui te donne qq Indications
sur le XLS EXIGE par la routine IXL !
( MAIS je te redonne par ecrit TOUS les prerequis ! )

 

06) Fichier XLS avec la 1ere Ligne TITRE et dans les Titres de Colonne
( que des Lettres / Chiffres / "_" et RIEN d AUTRE ! )

Les 1eres colonnes (A-G) SONT IMPOSEES

A partir de la Colonne H , c les N ATTRIBUTs du Bloc voulu !
( que des Lettres / Chiffres / "_" et RIEN d AUTRE ! )

A partir de la Ligne/Rangee 2-N , c les DONNEES 

 

ATTENTION 1 : TOUTES les Colonnes doivent etre de Type "TEXTE" dans Excel 

 

ATTENTION 2 : TOUTES les valeurs numeriques ( X Y Z ANGLE ECHELLE )
doivent etre avec un POINT DECIMAL (et non pas une Virgule) ! 

 

ATTENTION 3 : pas de cellule VIDE dans les Colonnes ATTRIBUT si valeur non remplie
DONC on va mettre un "." decimal , c assez discret !

Tu pourras toujours plus tard dans ACAD selectionner TOUS les Blocs
et voir les Attributs communs vides avec un "." et supprimer le Contenu !

 

07) AVANT de lancer le traitement, on va contourner le Bug de la Rotation !

Commande : UI < Entree >

Remettre : Type Angle = Degres decimaux ,
DECOCHER Sens horaire puis "Direction" et remettre le ZERO a l EST !
OK - OK

ALORS seulement on peut lancer le traitement ...

 

08) Chargement de la routine "IXL" avec APPLOAD comme d habitude ...

 

09) Au clavier : IXL < Entree >

Tu vas chercher le XLS puis tu choisis le bon Onglet puis TRAITEMENT ...

 

10) Bien entendu le/les bon(s) Bloc(s) (avec les BONs Attributs) sont deja inseres dans le DWG

ou bien sont presents dans les Chemins de recherche SUPPORT de ton ACAD / ACAD MAP / etc

 

Et tu lances ... ALORS ??

 

11) A la fin avant d enregistrer ...

Commande : UI < Entree >

Remettre : Type Angle = Grades ,
COCHER Sens horaire puis "Direction" et remettre le ZERO au NORD !
OK - OK

 

 

Patrice ( Supporting Troops ) - Autodesk Expert Elite
If you are happy with my answer please mark "Accept as Solution" and if very happy please give me a Kudos (Felicitations) - Thanks

Patrice BRAUD

EESignature


Message 5 sur 7
rebcao
en réponse à: Topo94_

Bonjour,

 

Les SCRIPTS sont effectivement une solution pour régler pas mal de problèmes d'optimisation et d'automatisme... J'utilise depuis très longtemps des SCRIPTS ce qui rend toutes mes Applications 100% compatibles avec les versions LT puisque je n'utilise pas de LISP... Même si avec la LT 2024 on peut, mais ça ne changera mes habitudes !

 

Je développe de très nombreuses "petites" Applications basées sur le couple "diabolique" EXCEL-AutoCAD et AutoCAD-EXCEL qui génère le SCRIPT et dans AutoCAD, il n'y a plus qu'à l'exécuter...

 

Voici un fichier EXCEL que j'utilise pour traiter des listes de POINTS avec différentes infos ! (N° de Point, Type de Point, X, Y, Z, etc. EN cliquant sur MODIFIER LA BASE 0x... il suffit de remplacer les valeurs par les nouvelles et revenir sur la 1ere feuille et cliquer sur la DISQUETTE pour générer le SCRIPT...

 

Fichier_EXCEL_POINTS_TOPO.png

 

Ce fichier est isolé et sorti de mes Applications, il se peut qu'il "tousse au début" !   😊   Les MACROS EXCEL vont écrire dans un dossier qui doit exister et aura le chemin suivant :

 

    C:\_MNU_sur_C_NOMENC-DEVIS\

 

Il est possible d'utiliser un autre chemin, dans ce cas, il suffit de corriger le chemin dans les MACROS EXCEL...

 

Christian


Formateur Indépendant, Consultant, AutoCAD, AutoCAD LT, REVIT MEP, INVENTOR -
www.rebcao.fr

Christian REB

Message 6 sur 7
-didier-
en réponse à: Topo94_

Bonjour @Topo94_ 

 

On est d'accord qu'insérer des points est relativement simple et bien documenté.

Que ce soit script ou LSP.

Ce que je ne comprends pas dans la demande, c'est d'insérer la différence d'altitude entre deux points.

De quels points parle-t-on ?

Y-a-t'il des doublons de points en XY dans le listing ? et ce sont ces doublons qu'il faut traiter ?

Amicalement

Éternel débutant.. my site for learning : Programmer dans AutoCAD

Didier Aveline

EESignature

Message 7 sur 7
rebcao
en réponse à: rebcao

En complément de mon fichier EXCEL, voici un ZIP contenant les différents .DWG des POINTS qui seront insérés via les SCRIPT.

 

Il faut IMPORTER la PALETTES D'OUTILS du dossier SV_palettes.

 

Il faudra simplement tout regrouper dans le dossier TOPO à placer dans le dossier C:\_MNU_sur_C_NOMENC-DEVIS

 

Y compris le fichier EXCEL

 

Christian 


Formateur Indépendant, Consultant, AutoCAD, AutoCAD LT, REVIT MEP, INVENTOR -
www.rebcao.fr

Christian REB

Vous n'avez pas trouvé ce que vous recherchiez ? Posez une question à la communauté ou partagez vos connaissances.

Publier dans les forums  

Autodesk Design & Make Report