Community
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ó
Solved! Go to Solution.
Hi,
try
ThisDrawing.ActiveLayer = ThisDrawing.Layers.Item(Combobox1.Text)
-. alfred -
Can't find what you're looking for? Ask the community or share your knowledge.