Doe berekening wanneer er verschillende waarden worden ingegeven in comboboxen

[brucezwarts]

Hallo allemaal
Ik zou graag een stuk vba script schrijven om 1 item van stock te halen in mijn winkel wanneer er een bepaalde waarde word gegeven in 2 van mijn comboboxen op een form.

Ik probeer in principe dit te doen:

    Private Sub ...?_afterupdate
    IF Me.combobox1.value = "yellow" AND Me.combobox2.value = "tshirt" THEN
    -1 FROM table [stock] field [yellowshirts]
    End IF
    End Sub

Ik ben aardig in de buurt volgens mij maar de 2de regel klopt niet natuurlijk.
Ook weet ik niet wat ik als event op moet even aangezien ik 2 comboboxen heb.
Alsjeblieft graag een beetje hulp zou fijn zijn Thanks!

 

[OctaFish]

Allereerst welkom bij HelpMij! Een voorbeeldje erbij is altijd makkelijker, maar wellicht niet nodig. Dat hangt van de reactie af die je zo gaat geven.
Om te beginnen: je kunt alleen tabellen bijwerken als je een query uitvoert. Dat doe je nu dus niet. In jouw geval is dat een Update (Bijwerk) query. Dat ziet er dan ongeveer zo uit:

strSQL = "UPDATE Stock Set [Aantal] = [Aantal] - 1 WHERE [YellowShirts] = """ & Me.Combobox2 & """"
CurrentDatabase.RunSQL = strSQL

Maar dit voorbeeldje kun je vast zo niet overnemen, want ik kan mij niet voorstellen dan de velden zo kloppen. Het is ook meer om je een idee te geven.