2017-06-27 5 views
0

Ich habe ein Problem in meinem userform. Ich habe eine Nummer comboboxes, die ihre rowsource aus den jeweiligen genannten Bereichen zeichnet.Ungültiger Eigenschaftswert für Combobox

Wenn ich in das Benutzerformular gehe und auf "Absenden" klicke, ohne diese Combobox auszuwählen, habe ich keine Probleme und alles geht hervorragend durch. Wenn der benannte Bereich ausgewählt ist, aber leer gelassen wurde, erhalte ich beim Klicken auf "Senden" den Fehler "Ungültiger Eigenschaftswert". Ich weiß bereits, dass dies mit "Match Required" = True verknüpft ist. Meine Frage jedoch. Gibt es eine Möglichkeit, wie ich diesen Fehler anzeigen und das Formular abschicken kann, wenn eine Combobox ausgewählt, aber leer gelassen wird?

Danke,

+0

Vielleicht aber nicht verstehen, Ihre Frage –

+0

Ich glaube, er will nur Überspringe den Fehler – Luuklag

Antwort

0

Sie könnten für Ihre Bevölkerung so etwas wie so tun, einen Nullwert etwas Zugabe bin ich abhanden

Dim a() As Variant 

Me.ComboBox1.RowSource = "" 

a = Application.Transpose(Worksheets("testing").Range("testrng").Value) 

Me.ComboBox1.List = Split(vbNullString & "," & Join(a, ","), ",") 
Verwandte Themen