Insertion bloc dyn via Excel

[julien1982]

Bonjour,

 

Apres avoir recherché sur plusieurs poste ...

 

J'aimerais pourvoir insérer un bloc dynamique sur Autocad 2017 ou 2018 a partir d'Excel.

Avec deux points référencé par des coordonnées X,Y.

Etant que débutant en VBA je fais appel a votre génie ...

 

Ci-joint le fichier excel comprenant dans la Colonne A : Le nom du bloc Dynamique

Puis les coordonnées X,Y du point A puis le point B.

Ainsi que les deux blocs dynamique.

 

https://www.partage-fichiers.com/upload/pknhkukp/

 

merci d'avance pour votre aide.

[Dartsu]

Bonjour à tous, le forum,

 

L'insertion de bloc se fait assez bien avec ce code :

 

Dim insert_point(0 To 2) As Double

Chemin_massif = "Chemin du bloc"

insert_point(0) = 0#: insert_point(1) = 0#: insert_point(2) = 0:

 

'initialisation du bloc avec le point d'insertion et chemin d'accès

Set massif = Autocad.AcadApplication.ActiveDocument.ModelSpace.InsertBlock(insert_point, Chemin_massif, 1#, 1#, 1#, 0)

 

Mais je n'arrive pas à trouver comment gérer l'onglet "Personnaliser" du bloc dynamique puisque le boup de code plus haut gère seulement l'onglet "Géométrie du bloc".

Il gère donc la Position X; Position Y; les Echelles

Mais pas la Position1X; Position1Y ; Position2X ; Position2Y

Si quelqu'un à une idée ...

 

Codialement,