XL 2013 VBA effectuer des opérations de multiplication et division entre textbox

donpopo

XLDnaute Occasionnel
Bonsoir le forum,

Je m'escrime depuis deux heures à effectuer des opérations avec des textbox.

Je souhaite qu'une textbox reçoive le résultat d'une division et d'une multiplication avec 2 autre textbox.
J'ai créé une boucle pour effectuer cette opération six fois avec incrémentation de certains textbox.

VB:
For lig = 1 To 6
    If Controls("TextBox" & lig) <> "" Then
        ("TextBox" & lig * 10 + 3) = (CDbl(TextBox202) / CDbl(TextBox200)) * CDbl("Textbox" & lig * 10)
    End If
    lig = lig + 1
Next

Lorsque je fait des opérations entre des textbox numérotées manuellement (comme les deux premières), cela fonctionne.
Mais lorsque j'insère une textbox dont le numéro est défini par la boucle, cela me met une erreur
"Erreur de compilation - Erreur de syntaxe"

Je ne vois pas comment je peux procéder.

De plus, je cherche également à ce que le résultat ait maximum 2 décimales.

Merci pour votre aide,
Donpopo
 

Discussions similaires

Statistiques des forums

Discussions
315 106
Messages
2 116 268
Membres
112 706
dernier inscrit
Pierre_98