Excel:相对单元格的增量计数器按钮

时间:2013-10-23 09:55:13

标签: excel excel-vba vba

在Excel中,我想要一个单击按钮来增加单元格的值。

但是,我想增加一个绝对引用的单元格,而不是增加一个单元格相对于按钮位置的值。

这是我目前使用的代码类型,但是找到事件对象位置的关键问题很难......

Sub increment_value()
this.Offset(0, -2).Value = this.Offset(0, -2).Value + 1
End Sub

这就是我想要的(仅举例 - > D5中的按钮增加B5乘以1. 相对是关键!):

enter image description here

Sub think:是否有一个等同于Javascript关键字的Excel:this

1 个答案:

答案 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。所以,当你在表格中找到它时要准确。

尝试并测试过!

相关问题