当按钮被激活时,VBA可以通过以下步骤将数据从多个ActiveX控件移动到Sheet2:
Private Sub CommandButton1_Click()
' 获取控件的值
Dim control1Value As String
Dim control2Value As String
control1Value = TextBox1.Value
control2Value = ComboBox1.Value
' 将值移动到Sheet2
Dim sheet2 As Worksheet
Set sheet2 = ThisWorkbook.Sheets("Sheet2")
sheet2.Range("A1").Value = control1Value
sheet2.Range("B1").Value = control2Value
End Sub
在上述示例代码中,假设有一个名为"TextBox1"的文本框控件和一个名为"ComboBox1"的组合框控件。代码将这两个控件的值分别存储到变量中,然后将这些值移动到Sheet2的A1和B1单元格。
现在,当按钮被激活时,VBA代码将会执行,将数据从多个ActiveX控件移动到Sheet2的指定单元格中。
领取专属 10元无门槛券
手把手带您无忧上云