Controlre les présantations

[FLORIANQC]

Bonjour a tous,

 

Mon projet consiste en un programe qui numérote et remplis le cartouche d'un dessin Autocad.

Lorsque l'utilisateur a choisi une présantation, je n'arrive pas à selectionné seulement les éléments de cette présentation. J'arrive a séléctionné tous les éléments du dessin et choisir le bloc qui m'interesse. Mais comme j'ai a chaque foi le même bloc dans chaque présantation je ne sais pas le quels je rempli. Comme j'aimerai avoir quelque chose d'adaptable je préfaire ne pas avoir a modifier le nom des blocs.

 

J'aimerai également supprimer les présentations nom utilles.

 

Merci a tous pour votre aide.

[Patrick_35]

Salut

 

Pour la sélection de ton bloc dans une présentation, utilise le code dxf 410

 

@+

[Lommig]

Bonjour,

 

Ce sujet (en anglais) peut t'intéresser :

http://forums.augi.com/showthread.php?55147-Select-only-objects-in-the-active-layout

 

Cette routine VBA parcourt les objets de la présentation nommée "Présentation1" :

Sub TEST()

Dim MaPrésentation As AcadLayout

Set MaPrésentation = ThisDrawing.Layouts("Présentation1")

For Each obj In MaPrésentation.Block

' Si l'objet est une référence de bloc :

If TypeOf obj Is AcadBlockReference Then

' ... TON CODE ...

End If

Next obj

End Sub

 

Guillaume