2013-10-23 482 views
1

在Excel中,我想要一個單擊按鈕來增加單元格的值。Excel:相對單元格的增量計數器按鈕

但是,我想增加一個單元格的值相對於按鈕的位置,而不是增加一個絕對引用的單元格。

這是代碼,我用至今的工作類型,但發現事件對象位置的關鍵問題是證明很難...

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

這就是我想做的事情(例如只有 - >在D5增量B5按鈕由1 相對是關鍵雖然):

enter image description here

子的想法:是否有一個Excel相當於給Javascript關鍵字:!?

+0

你使用'ActiveX'或標準窗體的按鈕嗎? –

+0

我在Excel中使用VBA /宏 – Paul

+0

這就是我所知道的。有兩種類型的按鈕可放置在工作表上。你使用哪種類型?如果這是ActiveX,那麼你會在下面找到答案。 –

回答

1

如果您的按鈕是一個ActiveX一個你可以在下面的代碼添加到它:

Private Sub CommandButton1_Click() 
    Me.CommandButton1.TopLeftCell.Offset(0, -2) = _ 
      Me.CommandButton1.TopLeftCell.Offset(0, -2) + 1 
End Sub 

其中:

Me.指的按鈕位於表。

.CommandButton1.指本身

.TopLeftCell是財產,返回的位於左上的鍵角細胞Range object。所以,當你在工作表中找到它時,確切無誤。

已經過測試!

+0

太棒了!這工作!謝謝你的幫助 :) – Paul