1. PingCode智库首页
  2. 百科

excel表单控件的值怎么取得

Edit2 • • 百科

excel表单控件的值怎么取得

在Excel中获取表单控件的值的方法有：VBA代码、链接单元格、公式引用。其中，VBA代码是最为灵活和强大的方法。通过VBA代码，可以实现复杂的逻辑和操作，具体步骤如下：

首先，我们需要确保Excel开发工具选项卡已经启用。要启用开发工具选项卡，请按照以下步骤操作：

  1. 打开Excel并单击“文件”菜单。
  2. 选择“选项”，然后在弹出的窗口中选择“自定义功能区”。
  3. 在右侧的“主选项卡”列表中，勾选“开发工具”选项。
  4. 单击“确定”按钮。

一、VBA代码获取表单控件的值

在Excel中，使用VBA代码是获取表单控件值的最灵活、强大的方法。通过VBA代码，我们可以实现复杂的逻辑和操作，甚至可以跨工作表或工作簿操作。

1.1 创建和使用CommandButton控件

CommandButton控件是一个常用的表单控件，用于执行特定操作。以下是创建和使用CommandButton控件获取其他控件值的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“CommandButton”控件。
  3. 在工作表上绘制CommandButton控件。
  4. 右键单击CommandButton控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub CommandButton1_Click()


    Dim checkboxValue As Boolean


    Dim textboxValue As String


    Dim comboboxValue As String


    ' 获取CheckBox控件的值


    checkboxValue = Me.CheckBox1.Value


    ' 获取TextBox控件的值


    textboxValue = Me.TextBox1.Value


    ' 获取ComboBox控件的值


    comboboxValue = Me.ComboBox1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = checkboxValue


    Sheets("Sheet1").Range("A2").Value = textboxValue


    Sheets("Sheet1").Range("A3").Value = comboboxValue


End Sub

  1. 保存并关闭VBA编辑器。

1.2 使用CheckBox控件

CheckBox控件用于表示布尔值（是/否、真/假）。以下是创建和使用CheckBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“CheckBox”控件。
  3. 在工作表上绘制CheckBox控件。
  4. 右键单击CheckBox控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub CheckBox1_Click()


    Dim checkboxValue As Boolean


    ' 获取CheckBox控件的值


    checkboxValue = Me.CheckBox1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = checkboxValue


End Sub

  1. 保存并关闭VBA编辑器。

1.3 使用TextBox控件

TextBox控件用于输入和显示文本。以下是创建和使用TextBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“TextBox”控件。
  3. 在工作表上绘制TextBox控件。
  4. 右键单击TextBox控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub TextBox1_Change()


    Dim textboxValue As String


    ' 获取TextBox控件的值


    textboxValue = Me.TextBox1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = textboxValue


End Sub

  1. 保存并关闭VBA编辑器。

1.4 使用ComboBox控件

ComboBox控件用于创建下拉列表，用户可以从列表中选择一个值。以下是创建和使用ComboBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ComboBox”控件。
  3. 在工作表上绘制ComboBox控件。
  4. 右键单击ComboBox控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub ComboBox1_Change()


    Dim comboboxValue As String


    ' 获取ComboBox控件的值


    comboboxValue = Me.ComboBox1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = comboboxValue


End Sub

  1. 保存并关闭VBA编辑器。

1.5 使用OptionButton控件

OptionButton控件用于创建单选按钮，用户可以在一组选项中选择一个值。以下是创建和使用OptionButton控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“OptionButton”控件。
  3. 在工作表上绘制OptionButton控件。
  4. 右键单击OptionButton控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub OptionButton1_Click()


    Dim optionButtonValue As Boolean


    ' 获取OptionButton控件的值


    optionButtonValue = Me.OptionButton1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = optionButtonValue


End Sub

  1. 保存并关闭VBA编辑器。

1.6 使用ListBox控件

ListBox控件用于创建列表框，用户可以从列表中选择一个或多个值。以下是创建和使用ListBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ListBox”控件。
  3. 在工作表上绘制ListBox控件。
  4. 右键单击ListBox控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub ListBox1_Change()


    Dim i As Integer


    Dim selectedItems As String


    ' 获取ListBox控件的选中项


    For i = 0 To Me.ListBox1.ListCount - 1


        If Me.ListBox1.Selected(i) Then


            selectedItems = selectedItems & Me.ListBox1.List(i) & ", "


        End If


    Next i


    ' 将选中项输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = selectedItems


End Sub

  1. 保存并关闭VBA编辑器。

1.7 使用SpinButton控件

SpinButton控件用于创建旋转按钮，用户可以通过单击按钮来增加或减少数值。以下是创建和使用SpinButton控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“SpinButton”控件。
  3. 在工作表上绘制SpinButton控件。
  4. 右键单击SpinButton控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub SpinButton1_Change()


    Dim spinButtonValue As Integer


    ' 获取SpinButton控件的值


    spinButtonValue = Me.SpinButton1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = spinButtonValue


End Sub

  1. 保存并关闭VBA编辑器。

1.8 使用ScrollBar控件

ScrollBar控件用于创建滚动条，用户可以通过拖动滚动条来增加或减少数值。以下是创建和使用ScrollBar控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ScrollBar”控件。
  3. 在工作表上绘制ScrollBar控件。
  4. 右键单击ScrollBar控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub ScrollBar1_Change()


    Dim scrollBarValue As Integer


    ' 获取ScrollBar控件的值


    scrollBarValue = Me.ScrollBar1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = scrollBarValue


End Sub

  1. 保存并关闭VBA编辑器。

1.9 使用ToggleButton控件

ToggleButton控件用于创建开关按钮，用户可以单击按钮来切换其状态。以下是创建和使用ToggleButton控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ToggleButton”控件。
  3. 在工作表上绘制ToggleButton控件。
  4. 右键单击ToggleButton控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub ToggleButton1_Click()


    Dim toggleButtonValue As Boolean


    ' 获取ToggleButton控件的值


    toggleButtonValue = Me.ToggleButton1.Value


    ' 将值输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = toggleButtonValue


End Sub

  1. 保存并关闭VBA编辑器。

1.10 使用MultiPage控件

MultiPage控件用于创建多页面控件，用户可以在不同页面之间切换。以下是创建和使用MultiPage控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“MultiPage”控件。
  3. 在工作表上绘制MultiPage控件。
  4. 右键单击MultiPage控件，选择“查看代码”。
  5. 在打开的VBA编辑器中输入以下代码：

Private Sub MultiPage1_Change()


    Dim selectedPage As String


    ' 获取MultiPage控件的选中页面


    selectedPage = Me.MultiPage1.SelectedItem.Caption


    ' 将选中页面输出到工作表单元格中


    Sheets("Sheet1").Range("A1").Value = selectedPage


End Sub

  1. 保存并关闭VBA编辑器。

二、链接单元格获取表单控件的值

在Excel中，链接单元格是一种简单但功能强大的方法，用于获取表单控件的值。通过链接单元格，我们可以直接在工作表中引用控件的值，而无需使用VBA代码。

2.1 链接CheckBox控件

CheckBox控件用于表示布尔值（是/否、真/假）。以下是链接CheckBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“CheckBox”控件。
  3. 在工作表上绘制CheckBox控件。
  4. 右键单击CheckBox控件，选择“控件格式”。
  5. 在“控件格式”对话框中，选择“控制”选项卡。
  6. 在“单元格链接”框中，输入要链接的单元格地址（例如：A1）。
  7. 单击“确定”按钮。

现在，当您选中或取消选中CheckBox控件时，链接的单元格将显示TRUE或FALSE。

2.2 链接ComboBox控件

ComboBox控件用于创建下拉列表，用户可以从列表中选择一个值。以下是链接ComboBox控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ComboBox”控件。
  3. 在工作表上绘制ComboBox控件。
  4. 右键单击ComboBox控件，选择“控件格式”。
  5. 在“控件格式”对话框中，选择“控制”选项卡。
  6. 在“单元格链接”框中，输入要链接的单元格地址（例如：A1）。
  7. 在“输入范围”框中，输入包含下拉列表选项的单元格范围（例如：B1:B5）。
  8. 单击“确定”按钮。

现在，当您从ComboBox控件中选择一个值时，链接的单元格将显示选定值的索引。

2.3 链接SpinButton控件

SpinButton控件用于创建旋转按钮，用户可以通过单击按钮来增加或减少数值。以下是链接SpinButton控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“SpinButton”控件。
  3. 在工作表上绘制SpinButton控件。
  4. 右键单击SpinButton控件，选择“控件格式”。
  5. 在“控件格式”对话框中，选择“控制”选项卡。
  6. 在“单元格链接”框中，输入要链接的单元格地址（例如：A1）。
  7. 在“最小值”和“最大值”框中，输入允许的数值范围（例如：1和100）。
  8. 单击“确定”按钮。

现在，当您单击SpinButton控件时，链接的单元格将显示当前的数值。

2.4 链接ScrollBar控件

ScrollBar控件用于创建滚动条，用户可以通过拖动滚动条来增加或减少数值。以下是链接ScrollBar控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“ScrollBar”控件。
  3. 在工作表上绘制ScrollBar控件。
  4. 右键单击ScrollBar控件，选择“控件格式”。
  5. 在“控件格式”对话框中，选择“控制”选项卡。
  6. 在“单元格链接”框中，输入要链接的单元格地址（例如：A1）。
  7. 在“最小值”和“最大值”框中，输入允许的数值范围（例如：1和100）。
  8. 单击“确定”按钮。

现在，当您拖动ScrollBar控件时，链接的单元格将显示当前的数值。

2.5 链接OptionButton控件

OptionButton控件用于创建单选按钮，用户可以在一组选项中选择一个值。以下是链接OptionButton控件的示例：

  1. 在Excel中，打开开发工具选项卡。
  2. 单击“插入”按钮，然后选择“表单控件”下的“OptionButton”控件。
  3. 在工作表上绘制OptionButton控件。
  4. 右键单击OptionButton控件，选择“控件格式”。
  5. 在“控件格式”对话框中，选择“控制”选项卡。
  6. 在“单元格链接”框中，输入要链接的单元格地址（例如：A1）。
  7. 单击“确定”按钮。

现在，当您选择OptionButton控件时，链接的单元格将显示TRUE或FALSE。

三、公式引用获取表单控件的值

在Excel中，公式引用是一种直接且简单的方法，用于获取表单控件的值。通过公式引用，我们可以在工作表中使用控件的值进行计算和分析。

3.1 引用CheckBox控件的值

CheckBox控件用于表示布尔值（是/否、真/假）。以下是引用CheckBox控件值的示例：

  1. 在Excel中，链接CheckBox控件到一个单元格（例如：A1）。
  2. 在另一个单元格中，输入以下公式：

=IF(A1, "选中", "未选中")

现在，当您选中或取消选中CheckBox控件时，公式单元格将显示“选中”或“未选中”。

3.2 引用ComboBox控件的值

ComboBox控件用于创建下拉列表，用户可以从列表中选择一个值。以下是引用ComboBox控件值的示例：

  1. 在Excel中，链接ComboBox控件到一个单元格（例如：A1）。
  2. 在另一个单元格中，输入以下公式：

=INDEX(B1:B5, A1)

现在，当您从ComboBox控件中选择一个值时，公式单元格将显示选定值。

3.3 引用SpinButton控件的值

SpinButton控件用于创建旋转按钮，用户可以通过单击按钮来增加或减少数值。以下是引用SpinButton控件值的示例：

  1. 在Excel中，链接SpinButton控件到一个单元格（例如：A1）。

相关问答FAQs：

1. 如何在Excel中获取表单控件的值？
要获取Excel中表单控件的值，可以按照以下步骤进行操作：

  • 首先，选中所需的表单控件。
  • 然后，右键单击选中的控件，并选择“属性”选项。
  • 接着，在属性窗口中找到“值”或“文本”属性，并记录下该属性的值。
    通过以上步骤，您可以轻松地获取Excel表单控件的值。

2. 我怎样从Excel表单控件中提取数据？
若您需要从Excel表单控件中提取数据，可以采取以下方法：

  • 首先，选中所需的表单控件。
  • 其次，使用“Ctrl + C”组合键复制所选控件中的数据。
  • 最后，将复制的数据粘贴到您需要的位置（如单元格或文本框）中。
    通过以上步骤，您可以提取Excel表单控件中的数据并将其用于其他用途。

3. 如何在Excel VBA中获取表单控件的值？
若您使用Excel VBA编程，可以按照以下步骤获取表单控件的值：

  • 首先，使用ActiveSheet.Shapes("控件名称").ControlFormat.Value代码来获取表单控件的值。
  • 其次，将获取的值赋给一个变量，以便后续使用。
    通过以上步骤，您可以在Excel VBA中轻松地获取表单控件的值，并进行进一步的处理或计算。

文章包含AI辅助创作，作者：Edit2，如若转载，请注明出处：https://docs.pingcode.com/baike/4897067

赞 (0)
Edit2Edit2
免费注册
电话联系

4008001024

微信咨询
微信咨询
返回顶部