使用VBA用户表单获取数值?

时间:2018-06-25 15:49:34

标签: excel-vba vba excel

我在VBA上还很陌生,但是我无法为自己创建的数据用户窗体获取数值输出。即使我将答案限制在数字列表中,数据也将以文本形式输入到组合中。我在this和其他表单上查看了许多不同的示例来纠正此问题,但是似乎没有任何效果(或者我没有正确使用它)。这是我的代码:

Private Sub CommandButton1_Click()
MsgBox "Submitted!", 0, "Message"
Unload ProjectCheckIn

Dim TargetRow As Integer

TargetRow = Sheets("Backend").Range("B3").Value + 1

Sheets("Data").Range("Name").Offset(TargetRow, 0).Value = ComboBox1
Sheets("Data").Range("Name").Offset(TargetRow, 1).Value = ComboBox22
Sheets("Data").Range("Name").Offset(TargetRow, 2).Value = TextBox3
Sheets("Data").Range("Name").Offset(TargetRow, 3).Value = ComboBox2
Sheets("Data").Range("Name").Offset(TargetRow, 4).Value = ComboBox7
Sheets("Data").Range("Name").Offset(TargetRow, 5).Value = ComboBox12
Sheets("Data").Range("Name").Offset(TargetRow, 6).Value = ComboBox17
Sheets("Data").Range("Name").Offset(TargetRow, 7).Value = TextBox1
Sheets("Data").Range("Name").Offset(TargetRow, 8).Value = TextBox2

End Sub


Private Sub CommandButton2_Click()
Unload ProjectCheckIn
End Sub

非常感谢您的帮助!

0 个答案:

没有答案