以前の回答に基づいて、さらにいくつかのショートカット(以前の回答に追加することができます):
^a::
^f::
^s::
^w::
^n::
^u::
^d::
^r::
^b::
^i::
^k::
^g::
WinGet, Process, ProcessName, A
if(RegExMatch(Process, "^(EXCEL)\.EXE$"))
{
if(A_ThisHotKey = "^a") ;seleccionar rango
SendPlay, ^e
if(A_ThisHotKey = "^f") ;buscar
SendPlay, ^b
if(A_ThisHotKey = "^s") ;guardar
SendPlay, ^g
if(A_ThisHotKey = "^w") ;cerrar
SendPlay, ^r
if(A_ThisHotKey = "^n") ;nuevo libro
SendPlay, ^u
if(A_ThisHotKey = "^u") ;subrayar
SendPlay, ^s
if(A_ThisHotKey = "^b") ;negrita
SendPlay, ^n
if(A_ThisHotKey = "^i") ;cursiva
SendPlay, ^k
if(A_ThisHotKey = "^d") ;filldown
SendPlay, ^j
if(A_ThisHotKey = "^r") ;fill right
SendPlay, ^d
if(A_ThisHotKey = "^k") ;hyperlink
SendPlay, ^!k
if(A_ThisHotKey = "^g") ;goto
SendPlay, ^i
}
else
SendPlay, %A_ThisHotKey%
return