Layer VPFreeze off - VBA

Hi

I want to know what is the code for have all my layer VPFreeze "on"

I know for lock , on, freeze, but I'm stuck:x with the VP freeze

Dim objLayer As AcadLayer
On Error Resume Next
   For Each objLayer In ThisDrawing.Layers
       objLayer.LayerOn = True
       objLayer.Freeze = True
       objLayer.????? = True      
   Next
   ThisDrawing.Regen (acActiveViewport)

A layers VP frozen state is actually determined by XData associated with a particular Viewport. While it is possible for a VBA routine to “VPfreeze” a layer, I don’t believe a way to “VPthaw” a layer had ever been demonstrated.

To bad, I'm going to find a another way to solve my problem

Thanks any way

Hi

I do that

@+

Gef.zip

Not exactly a “Layer VPFreeze off – VBA” method, but potentially useful to the neophyte nonetheless.

Not exactly a “Layer VPFreeze off – VBA” method, but potentially useful to the neophyte nonetheless.

Yes, but you can't with vba, lisp and vlisp (write xdata in viewport)

Only with arx, dll or vplayer's command.

@+