在单元格中输入数据并按Enter键会激活表单上的按钮

Question

我有一个带有Button_Click事件宏的按钮，代码如下：

Sub Button1_Click()
'
' Button1_Click Macro

    Range("B1").Select
    ActiveCell.FormulaR1C1 = "=INT(RAND()*25+1)"        
End Sub

如果我将数据输入电子表格中的任何单元格，一旦我按下输入按钮激活。我认为它是直接读取鼠标左键点击而不是按下按钮。

Answer 1

实际上您正在使用Random函数，因此如果您更改或更改工作表中的任何单元格，它将会更改。所以它与鼠标点击无关，我猜想并输入excel中的事件往往会改变数据，在你的情况下是随机函数公式应用于特定的excel单元格它会随着其他单元格值的改变或改变而改变。 所以为了您的目的使用下面的代码::

Sub 

  Button1_Click()
  Sheet2.Activate
  Sheet2.Select

  Range ("B1") = Rnd()*(25+1)

End Sub

回复!!!!

由于