close any app

'create a new text file in notepad called test.txt
'add a command button to a form

Private Sub Command1_Click()
AppActivate "test"
SendKeys "%{F4}"
End Sub

'Note:
'If you know the title of the app you can delete it
'just replace the test in the code above