Selectionset's Select vicSelectionSetAll fails
Posted: Mon Sep 18, 2006 1:19 am
hello all,
i am new to VBA in progeCAD. But have been working for 4 yrs in autocadb VBA.
i dont know what the prob is following snippet
Dim DXFNumber(0) As Integer
Dim DXFName(0) As Variant
' set the filter options
DXFNumber(0) = 0
DXFName(0) = "LINE"
' add the selection set name to the drawing database
Set objSS = ThisDocument.SelectionSets.Add("SetName")
' populate the selection set with all the drawing entity objects
objSS.Select vicSelectionSetAll , , , DXFNumber, DXFName
This does not work. Eror "Type mismatch occurs"
....so i tried just
objSS.Select vicSelectionSetAll
but that also pop ups an error
i am new to VBA in progeCAD. But have been working for 4 yrs in autocadb VBA.
i dont know what the prob is following snippet
Dim DXFNumber(0) As Integer
Dim DXFName(0) As Variant
' set the filter options
DXFNumber(0) = 0
DXFName(0) = "LINE"
' add the selection set name to the drawing database
Set objSS = ThisDocument.SelectionSets.Add("SetName")
' populate the selection set with all the drawing entity objects
objSS.Select vicSelectionSetAll , , , DXFNumber, DXFName
This does not work. Eror "Type mismatch occurs"
....so i tried just
objSS.Select vicSelectionSetAll
but that also pop ups an error