在Excel中,我想要一个单击按钮来增加单元格的值。
但是,我想增加一个绝对引用的单元格,而不是增加一个单元格相对于按钮位置的值。
这是我目前使用的代码类型,但是找到事件对象位置的关键问题很难......
Sub increment_value()
this.Offset(0, -2).Value = this.Offset(0, -2).Value + 1
End Sub
这就是我想要的(仅举例 - > D5中的按钮增加B5乘以1. 相对是关键!):
Sub think:是否有一个等同于Javascript关键字的Excel:this
?
答案 0 :(得分:2)
如果您的按钮是ActiveX按钮,则可以向其添加以下代码:
Private Sub CommandButton1_Click()
Me.CommandButton1.TopLeftCell.Offset(0, -2) = _
Me.CommandButton1.TopLeftCell.Offset(0, -2) + 1
End Sub
其中:
Me.
是指按钮所在的工作表。
.CommandButton1.
指的是
.TopLeftCell
是一个属性,它返回位于按钮TopLeft角落的单元格的Range object
。所以,当你在表格中找到它时要准确。
尝试并测试过!