Command doesn't get executed

[fakeru]

I'm trying to invoke a command execution, but without any success.

Dim oCopyControlDef As ControlDefinition
    Set oCopyControlDef = ThisApplication.CommandManager.ControlDefinitions.Item("PartMoveFaceCmd")
    oCopyControlDef.Execute

I run this code when I have a part open. I tried to select a face before running the conde, but still doesn't show up...

Any ideas why?

Thanks

Alexandru

[CadUser46 · Accepted solution]

Fakeru.  I never realised this until now but the move face command has been retired, at least in 2016.  Its still listed in the control definitions i guess as a legacy command but its been replaced with PartDirectCmd.

Public Sub MoveFace()

    Call ThisApplication.CommandManager.ControlDefinitions.Item("PartDirectCmd").Execute

End Sub

[fakeru]

thanks forhe info. I guess I will have to stick with DirectEdit, although I would prefer moveface command.