Ajouter la valeur d'une Textbox à la valeur d'une cellule d'une autre feuil

Bonjour à tous.

Je solicite un petit coup de main car après des heures de recherche, je ne trouve aucune solution.

Sur une Feuille "Gestion produits", j'ai mis en place un formulaire userform avec :

Sur une autre feuille nommée "Gestion ingrédients" un tableau avec :

Dans cette feuille "Gestion ingrédients je souhaite trouver l'ingrédient sélectionner dans le formulaire et ajouter dans la colonne K de cet ingrédient la quantité d'ingrédient utilisé indiquée dans la TexBox

J'ai mis en place ce code dans mon formulaire :

Private Sub BOUTON_AJOUT_BASE_Click()

Dim DOSAGE_1 As Double

DOSAGE_1 = CDbl(Me.TextDOSAGE_1.Value)

Dim c As Range

Sheets("Gestion Ingrédients").Activate

Set c = Sheets("Gestion Ingrédients").Range("B:B").Find(what:=ComboBoxingredient_1.Value, LookIn:=xlValues, lookat:=xlWhole)

c.Offset(0, 9).Value = c.Offset(0, 9).Value + DOSAGE_1

Et j'obtiens :

Si quelqu'un pouvait accepter de se pencher sur mon problème, ce serait super sympa.

Merci d'avance

Bonjour,

Ce serait plus facile avec un fichier en exemple.

Essaie Val au lieu de cdbl

Cdt