Hi,
i try to use a ribbon to enter a new activation key and replace the existing one.
Sub newkey(control As IRibbonControl)
Dim RetVal
RetVal = Shell(PathToFile("myapp.exe -enterkey"), 2)
Application.Quit
AppActivate ThisWorkbook.Windows(1).Caption
End Sub
my problem is the focus.
i want to...