Получение числовых значений с помощью пользовательской формы VBA? - PullRequest
0 голосов
/ 25 июня 2018

Я довольно новичок в VBA, и у меня возникают проблемы с получением числовых выходных данных для пользовательской формы данных, которую я создал. Данные вводятся в комбо, выходя в виде текста, хотя я ограничил ответы числовым списком. Я посмотрел на множество различных примеров этой и других форм, чтобы исправить это, но, похоже, ничего не работает (или я не использую это должным образом). Вот мой код:

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

Любая помощь очень ценится!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...