property manager title

[mp3-250]

is it possible to get the title (feature name or entity name) of the currently open property manager?
3d sketch editing is active.

[mp3-250]

this works (from api help deleted redundant code)

Code: Select all

Dim swApp As SldWorks.SldWorks
Dim commandID As Long
Dim pmpTitle As String
Dim isUIActive As Boolean

Sub main()

Set swApp = Application.SldWorks

' Get the command ID if the command is a fillet,
' get the PropertyManager page title if one is active,
' and get whether the user interface is active

swApp.GetRunningCommandInfo commandID, pmpTitle, isUIActive

If pmpTitle <> "" Then 
Debug.Print "Title of PropertyManager page: " & pmpTitle

End If
    
End Sub