Hej!
Ganska ny på makron och skulle behöva ha lite hjälp med en sak.
I kolumn A har jag tusentals IDn och i kolumn B dess pris
Jag har ett formulär där användaren matar in ett ID i textbox1 och så letar den upp priset och lägger det i textbox2
All kod har jag i Textbox_change
Dim Res As Variant
Res = Application.Match(TextBox1.Value, Worksheets("Blad2").Range("A1:A100"), 0)
If Not IsError(Res) Then
TextBox2.Value = Worksheets("Blad2").Range("B" & Res).Value
Else
TextBox2.Value = "Analys eller pris saknas"
End If
Det jag vill få till är att i textbox1 ska man kunna ange flera värden, med en separator - och så ska den addera de priserna i textbox2.
Res = Application.Match(TextBox1.Value, Worksheets("Blad2").Range("A1:A100"), 0)
Är det möjligt att få in den funktionaliteten ovan?
Tack på förhand
/Henrik