Hey Leo,
Dikke merci alvast, op die manier werkt het inderdaad ook. Deze oplossing had ik gedeeltelijk als eens gezien.
Mijn bedoeling was echt als je een keuze maakt in de combobox, je ook de rest blijft zien in het Userform.
Weet niet of je dat kan aanpassen in het gene ik al had voorbereid?
Trouwens, als ik één ComboBox apart doe werkt het wel.
Maar met deze 2 onder elkaar gaat iets fout, en wordt de 1ste regel van Sub ComboBox1_Change() geel:
Private Sub ComboBox1_Change()
Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False)
Me.TextBox2.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 3, False)
Me.TextBox3.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 4, False)
End Sub
Private Sub ComboBox2_Change()
Me.TextBox4.Text = Application.WorksheetFunction.VLookup(Me.ComboBox2.Value, xRg, 2, False)
Me.TextBox5.Text = Application.WorksheetFunction.VLookup(Me.ComboBox2.Value, xRg, 3, False)
Me.TextBox6.Text = Application.WorksheetFunction.VLookup(Me.ComboBox2.Value, xRg, 4, False)
End Sub
Jempie