Hi there,
I have a totally convoluted drawing that I inherited (1000+ layers) and I need a little utility to switch between layer states.

I have my userform with 3 buttons, and I want button1 one to restore the GEO layer state, button2 the PVGRDR state, and button3 the UTILS state.

So here goes my program, can you help me fix it?
I'm quite pathetic at programming, so please don't laugh:

UserForm1

Private Sub CommandButton1_Click()
Module1.LAYERRESTORE
End Sub

Private Sub CommandButton2_Click()
Module1.LAYERRESTORE
End Sub

Private Sub CommandButton3_Click()
Module1.LAYERRESTORE
End Sub

Module1

Sub LAYERRESTORE()

Dim LS As AcadLayerStateManager
Dim State As String

LS.Restore

End Sub

And that's as far as I got--told ya I'm quite pathetic.
TIA

JK
Ps: I would also like to embed it to the drawing so other people can use it without having to vbaload it or vbarun it.