DynPicture.SelElements

SelElements() As Elements

Remarks

Returns a list ("Elements" object) of selected "Element" objects within the picture.

Hint: Only available, if the lasso selection is activated within the project. MyWorkspace.ActiveDocument.DynProperties("RuntimeLasso") = True

Sample

Sub zenOn_DynPicture_ListSelection()
	'Declarations
	Dim zPic As DynPicture
	Dim i As Integer

	'Initialize zPic with the start picture
	Set zPic = thisProject.DynPictures.Item("START")

	'For every selected element in the start picture...
	For i = 0 To zPic.SelElements.Count - 1
		'...output the name
		Debug.Print i + 1 & ". item: " & zPic.SelElements.Item(i).Name
	Next i

	'Deselect all selected elements
	zPic.DeselectElements

End Sub

See Also

DynPicture, Elements