Sub runDFCmdLine() ' Run these command lines ' "C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe" -closeall ' "C:\Program Files (x86)\DisplayFusion\DisplayFusion.exe" Dim strProgramName As String Dim strArgument As String strProgramName = "C:\Program Files (x86)\DisplayFusion\DisplayFusionCommand.exe" strArgument = "-closeall" Call Shell("""" & strProgramName & """ " & strArgument, vbNormalFocus) MsgBox "DisplayFusion has been exited" ' Perform task without DF running strProgramName = "C:\Program Files (x86)\DisplayFusion\DisplayFusion.exe" Call Shell("""" & strProgramName & """", vbNormalFocus) MsgBox "DisplayFusion has been restarted" End Sub