Visibilité d un bloc dynamic

[FRED350]

Bonjour,

je suis débutant .

j'ai un block Dynamics AGENCES

je voudrais ouvrir mes prototypes

et changer l'état de visibilité du bloc Agences en vba ou lisp

si quelqu'un peut m aider.

Agences.zip

[Goldorak44]

Salut,

a quel endroit tu coince dans ton programme ?

post ton code, ce sera plus facile pour t'aider.

;)

[FRED350]

Salut,

a quel endroit tu coince dans ton programme ?

post ton code, ce sera plus facile pour t'aider.

;)

je sais retrouver dans mon dessin mon blocK dynamic "agences" et je voudrais afficher état de visibilité pour le changer

 

 

Private Sub ToggleButton1_Click()

   Dim objBloc As AcadBlock
   Dim strNomDuBloc As String
   strNomDuBloc = "Agences"
   If strNomDuBloc = "" Then Exit Sub

   On Error Resume Next

   Set objBloc = ThisDrawing.Blocks(strNomDuBloc)
   If objBloc Is Nothing Then
           MsgBox "Le bloc '" & strNomDuBloc & "' n'existe pas."
   Else
       MsgBox "Le bloc '" & strNomDuBloc & "' existe."
   End If

End Sub

[x_all]

l'incontournable (gile) avait fait un post sur le sujet. je suis dessusil y a peu en faisant des recherches sur le sujet...

 

http://cadxp.com/topic/30066-modifier-un-bloc-dynamique-en-fonction-de-son-attribut/

 

quite a rajouter un attribut pour etre raccord il doit y avoir tout ce qu'il te faut ..

[FRED350]

l'incontournable (gile) avait fait un post sur le sujet. je suis dessusil y a peu en faisant des recherches sur le sujet...

 

http://cadxp.com/topic/30066-modifier-un-bloc-dynamique-en-fonction-de-son-attribut/

 

quite a rajouter un attribut pour etre raccord il doit y avoir tout ce qu'il te faut ..

Merci

je regarde, mais c'est du lisp et je voulais en VBA.

[Patrick_35]

Salut

 

Merci

je regarde, mais c'est du lisp et je voulais en VBA.

et changer l'état de visibilité du bloc Agences en vba ou lisp

Merci d'avoir précisé, mais tu auras beaucoup plus de chance en lisp que tu pourras ensuite traduire en vba

 

@+