У меня есть пользовательская форма с CombBox1 через ComboBox5, и я пытаюсь определить код, чтобы проверить, все ли они пустые или все они заполнены. Оба эти варианта подходят для моего кода. Но я хочу, чтобы либо отображался MsgBox и End Sub, либо не вставлялись поля, в которых есть данные, в случае, если все поля не содержат данных. Приведенный ниже код проверяет первые два поля, но это кажется громоздким.
If ComboBox1 = vbNullString And ComboBox2 <> vbNullString Then
ComboBox1.SetFocus
MsgBox ("Either insert Name, or clear all boxes on row.")
Exit Sub
Else
Sheet1.Range("A6") = ComboBox1.Text
Sheet1.Range("B6") = ComboBox2.Text
Sheet1.Range("C6") = ComboBox3.Text
Sheet1.Range("D6") = ComboBox4.Text
Sheet1.Range("E6") = ComboBox5.Text
End If
Я на самом деле больше, чем это на пользовательской форме, но если кто-то может начать меня, я могу выяснить остальное.