从命令按钮获取值 VBA

Question

我创建了一个只有几个命令按钮的用户窗体。

我似乎不知道如何从他们那里获取信息。

我想从另一个用户表单打开此用户表单，然后我希望用户从其中一个按钮中选择一个选项，这将更改 table 本身

中的特定单元格

the userform I created

我没有在这个用户表单上写任何东西，因此没有代码只显示设计。

如何从要写入特定工作表上特定单元格的按钮中获取信息？

Answer 1

双击其中一个按钮，在代码菜单中应该会出现一个新的子项。这看起来像：

Sub CommandButton1_onClick()
End sub

除了这个事件方法，它还有一些属性。这里有用的是 CommandButton1.Value，它代表按钮的状态（真或假 iirc）。

所以为每个按钮构建（我强烈建议给它们自定义名称以防止在麻烦中迷路）像这样：

Sub CommandButton1_onClick()
   if CommandButton1.Value then
      ThisWorkBook.WorkSheets("WorksheetName").Range("YourRange").Value = "Some value"
   else
      ThisWorkBook.WorkSheets("WorksheetName").Range("YourRange").Value = ""
   end if
End sub

从命令按钮获取值 VBA

Get value from command button VBA

vba

userform

commandbutton