Views in DWG

[GosponZ]

Every time i made dwg's i have to create all ort. views but i also need place label for each view. Is it possible with rule to pick view and then choose from list which view label it is. For ex. plan,side lt, side rt isometric etc..

Thank you

[Vladimir.Ananyev · Accepted solution]

Try this rule. Not very convenient but works.

Dim oList As String() = {"AAA","BBB","CCC"}
Dim LabelName As String = InputListBox( _
		"Select Label Name and then Pick Drawing View", _
		oList, "", Title := "Label Names")
If LabelName <> "" Then		
	' Get a drawing view selection from the user
	Dim oObject As Object
	oObject = ThisApplication.CommandManager.Pick( _
		SelectionFilterEnum.kDrawingViewFilter, "Pick a feature")
	
	Dim oView As DrawingView = oObject
	oView.ShowLabel = True
	oView.Label.FormattedText = LabelName
End If
Beep

 cheers,

[GosponZ]

Yes, it works thanks alot Mr. Vladimir