Я вижу.
Не можете вы как раз добавить значение перед посылкой его к вашему вопросу:
sSQL3 = «уточнение [Inventaire] установило [Quantité_distribuée] =» & val (txtQté.Text) + val _ (txtQté2.Text)
& «ГДЕ Période = «» & ComDateDisponible.Text & «» «_
& «И Description_du_produit = «» & Des_prod.Text & «» «