topic Re: How to make the selected value in a combobox the current layer in the drawin in VBA Forum

How to make the selected value in a combobox the current layer in the drawing

Anonymous — Wed, 19 Dec 2012 15:09:36 GMT


Private Sub UserForm_Initialize()
 
 Dim layerColl As AcadLayers
 Dim entry As AcadLayer
 Dim LayList As String
 Set layerColl = ThisDrawing.Layers
 For Each entry In layerColl
    ComboBox1.AddItem entry.Name
 Next

 End Sub

Hi,

I have a form with a combobox. That combobox is filled up with all layers in a drawing. (see above)

Now I want to make the layer that I have selected (value) in the combobox the current layer in my drawing.

How can i make it current?

thanks gr. László

Re: How to make the selected value in a combobox the current layer in the drawin

Alfred.NESWADBA — Wed, 19 Dec 2012 17:26:17 GMT

Hi,

try

ThisDrawing.ActiveLayer = ThisDrawing.Layers.Item(Combobox1.Text)

-. alfred -

Re: How to make the selected value in a combobox the current layer in the drawin

Anonymous — Thu, 20 Dec 2012 09:53:58 GMT

Thank you Alfred!

It was the item...

I wish you a nice christmas!

László