Toch nog even terugkomend op mijn foutmelding, genoemd in #13..
Doordat ook ik redelijk lui ben aangelegen tik ik liever in de combobox een letter om zo het juiste resultaat te verkrijgen, echter type ik een verkeerde letter dan komt die fout weer terug... is er een soort van error afvang mogelijk dat deze wel aangeeft dat ik iets verkeerd type maar dat niet gelijk de gehele routine blokkeert?
ik trachte iets te creeren als
Private Sub C_001_Change()
On Error Goto eind
If C_001.Value <> "" Then TxtCode_1.Value = C_001.Column(1)
If C_001.Value = "" Then TxtCode_1.Value = ""
eind:
MsgBox "Er gaat iets mis"
exit sub
End Sub
Maar dat geeft bij iedere actie op deze combobox de melding dat er iets mis gaat en nog steeds de critical foutmelding wanneer ik bijvoorbeeld een "y" type ipv de "t"
voor de volledigheid hier mijn bestand nogmaals