Community
First of all, my name is not Sanjay
I've tested it, and ActiveDesignViewRepresentation returns the name of the active design view. See example code below. It will let you select a view and then the name of the active design view is displayed in a messagebox.
Sub DesignViewRep() Dim oDoc As DrawingDocument Set oDoc = ThisApplication.ActiveDocument Dim oDrawingView As DrawingView Set oDrawingView = ThisApplication.CommandManager.Pick(kDrawingViewFilter, "Select a drawing view") MsgBox oDrawingView.ActiveDesignViewRepresentation End Sub
Hope this helps.
Daniël
P.S. Next time please start a new discussion instead of cracking open one from years ago.