SwitchApps.ahk 1.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. #Requires AutoHotkey v2.0
  2. ; 快捷键 Alt+E 切换到 Edge 浏览器
  3. !e::
  4. {
  5. ; 检查 Edge 是否正在运行
  6. if WinExist("ahk_exe msedge.exe")
  7. {
  8. ; 如果 Edge 不是活动窗口,则激活它
  9. if !WinActive("ahk_exe msedge.exe")
  10. {
  11. WinRestore("ahk_exe msedge.exe") ; 如果最小化,则恢复窗口
  12. WinActivate("ahk_exe msedge.exe") ; 激活窗口
  13. WinMaximize("ahk_exe msedge.exe") ; 最大化窗口
  14. }
  15. ; 可选:如果已经是活动窗口,则最小化(可删除 else 部分)
  16. else
  17. {
  18. WinMinimize("ahk_exe msedge.exe")
  19. }
  20. }
  21. ; 如果 Edge 未运行,则启动它
  22. else
  23. {
  24. Run("msedge.exe")
  25. }
  26. }
  27. ; 快捷键 Alt+E 切换到 Edge 浏览器
  28. !x::
  29. {
  30. ; 检查 Excel 是否正在运行
  31. if WinExist("ahk_exe EXCEL.EXE")
  32. {
  33. ; 如果 Excel 不是活动窗口,则激活它
  34. if !WinActive("ahk_exe EXCEL.EXE")
  35. {
  36. WinRestore("ahk_exe EXCEL.EXE") ; 如果最小化,则恢复窗口
  37. WinActivate("ahk_exe EXCEL.EXE") ; 激活窗口
  38. WinMaximize("ahk_exe EXCEL.EXE") ; 最大化窗口
  39. }
  40. ; 可选:如果已经是活动窗口,则最小化(可删除 else 部分)
  41. else
  42. {
  43. WinMinimize("ahk_exe EXCEL.EXE")
  44. }
  45. }
  46. ; 如果 EXCEL 未运行,则启动它
  47. else
  48. {
  49. Run("EXCEL.EXE")
  50. }
  51. }