LeonnaejJCN
Messages postés2Date d'inscriptionmercredi 3 novembre 2010StatutMembreDernière intervention 3 novembre 2010
-
3 nov. 2010 à 18:00
Number7
Messages postés23Date d'inscriptionvendredi 1 février 2002StatutMembreDernière intervention27 décembre 2010
-
15 nov. 2010 à 00:28
Bonjour,
Voilà, je cherche à récupérer (codé en VBA) le centre d'un cercle se trouvant dans un bloc (Autocad), ce bloc ayant été, au préalable, sélectionné par l'utilisateur.
J'arrive bien (Normal! me direz-vous...c'est simple) à récupérer le nom de ce bloc, à contrôler qu'il s'agit bien d'un bloc, mais ne peux obtenir d'info sur les entités le composant.
Dois-je exploser le bloc, passer par un jeu de sélection...?
Number7
Messages postés23Date d'inscriptionvendredi 1 février 2002StatutMembreDernière intervention27 décembre 20101 15 nov. 2010 à 00:28
Essais Ca (Pour ce qui est d'avoir le centre, je n'ai pas trouver comment) :
Dim Bloque As AcadBlock
Dim Entite As AcadEntity
Dim Cercle As AcadCircle
Dim Centre As Variant
For Each Bloque In ThisDrawing.Blocks
If Bloque.Name = "BLOCK_X" Then
For Each Entite In Bloque
If TypeOf Entite Is AcadCircle Then
Set Cercle = Entite
MsgBox Cercle.Diameter
End If
Next Entite
End If
Next Bloque