Message 1 of 1
Layer Filter List

Not applicable
03-29-2013
01:26 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi all,
I am trying to iterate the layers in a property filter I have made. Can anyone help with some code? Code I have so far:
Public Sub subList()
Dim oDict As AcadDictionary
Dim Layflt As Object
Dim tmp As String
Set oDict = ThisDrawing.Layers.GetExtensionDictionary
Set Layflt = oDict.item("ACAD_LAYERFILTERS")
I can get to the dictionary and the list but no further. Please help, it will be much appreciated.
Brett