Here is how you can get the current view rep and loop through all view reps. Not sure what else you're trying to do.
Dim RepManager As RepresentationsManager = ThisApplication.ActiveDocument.ComponentDefinition.RepresentationsManager
Dim viewReps As DesignViewRepresentations = RepManager.DesignViewRepresentations
Dim currentView As DesignViewRepresentation = RepManager.ActiveDesignViewRepresentation
'Loop through all
Dim viewFrame As DesignViewRepresentation
For Each viewFrame In viewReps
'Test for what you are looking for
If UCase(Left(viewFrame.Name, 5)) = "FRAME"
viewFrame.Activate
'Do what you want
Else
'Go to next
End If
Next
'Return to Master View as active: viewReps.Item(1).Activate
Just redefine RepManager for documents in question