I'm trying to change the color of a layer I just created and I can't.
This is how I'm creating the layer:
Dim lay As AcadLayer
Dim found As Boolean
found = False
For Each lay In dw.Layers
If UCase(lay.Name) = UCase(lname) Then
found = True
If Not found Then
Set lay = dw.Layers.Add(lname)
'change color here
Can you help me with this? I tried with truecolor property but I have no idea how to do it.