如何在公式栏中编辑时运行宏

时间:2018-05-26 22:28:55

标签: excel vba excel-vba

在编辑公式栏中的单元格时,有没有办法运行宏? 不幸的是,我没有在网上找到任何东西。

示例:
目前的公式:=4×5+4返回24
我想在5+4周围添加括号,因此公式更改为:=4×(5+4)返回36
而不是运行组合:
选择5+4►►CTRL + X►►按键(►►CTRL + V►►按键)
我想点击一个关键的组合,例如ALT + Q + E(我的头顶上的纯粹例子)。

有办法做到这一点吗?

1 个答案:

答案 0 :(得分:1)

您无法在编辑模式下运行宏,但您可以获得相同的结果:

在:

enter image description here

宏:

Sub EditFormula()
    With ActiveCell
        .Formula = Mid(.Formula, 1, 3) & "(" & Mid(.Formula, 4) & ")"
    End With
End Sub

结果:

enter image description here

(您也可以使用SendKeys进行一些简单的编辑)

Sub Try_SendKeys()
    With Application
        .SendKeys "{F2}"
        .SendKeys "{LEFT}"
        .SendKeys "{LEFT}"
        .SendKeys "{LEFT}"
        .SendKeys "+9"
        .SendKeys "{RIGHT}"
        .SendKeys "{RIGHT}"
        .SendKeys "{RIGHT}"
        .SendKeys "+0"
        .SendKeys "{ENTER}"
        DoEvents
    End With
End Sub