Me VBA UserForm

Bonjour à toutes et tous,

Dans le cadre de mon travail, j'amerai au départ d'un Userform qui contient 4 TexBox renvoyer sur une feuille excel les valeur encodées dans les 3 Premières TexBox

Genre: A1 = TextBox1, A2 = TextBox2, A3 = TexBox3 et enfin que cela affiche dans la TextBox4 la valeur calculée en A4 (A4= A1+A2*2+A3*3)

D'avance merci pour vos retours ;)

Bonjour,

Il n'est pas nécessaire de passer par la feuille pour ça :

private sub Textbox1_change()
Call Calcul
end sub

private sub Textbox2_change()
Call Calcul
end sub

private sub Textbox3_change()
Call Calcul
end sub

Sub Calcul()
with Userform1
    for each ctrl in .controls
        if typename(ctrl) = "TextBox" then
            if ctrl.value = "" then ctrl.value = 0
        end if
    next ctrl
    .textbox4.value = textbox1.value + textbox2.value * 2 + textbox3.value * 3
end with
end sub

Cdlt,

Super ça marche, un tout grand merci