Aller au contenu

Insertion bloc dyn via Excel


julien1982

Messages recommandés

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.

  • Upvote 1
Lien vers le commentaire
Partager sur d’autres sites

  • 1 mois après...

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,

Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • 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é