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

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 294
Messages
2 086 895
Membres
103 404
dernier inscrit
sultan87