excel编程 自动判断收入或者支出，然后支出的话数字自动加负号

以下代码能满足要求，注意代码不是放在模块里的，截图给你看位置：

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
   Application.EnableEvents = False
   If Target.Offset(, -1) = "支出" Then Target = "-" & Target
   Application.EnableEvents = True
End If
End Sub

追问

为什么我代码输进去点了run之后都没提示成功呢，我是哪个步骤出错了吗

追答

这是事件代码，按Run运行，仔在支出的右边单元格输入数字试试。

追问

run起来的时候，一直弹出需要输入macro name，输入了点create后，又调到modules去，代码都跑不起来，没招啊

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/vxf37f2efxj232rvj27.html