afficher résultat d'une opération dans un textbox Résolu/Fermé

Question

Bonjour le forum,
Pour mon début je remplis des textbox mais voila quel code mettre dans ma Sub UserForm pour soustraire 2 plages  et afficher la valeur dans 1 textbox 
TextBox8.Value=Sheets("etat").Range("a1:a5").Value -sheets("etat").Range("b1:b5").Value

merci de votre aide
ivgu19

    EDIT : Ajout du LANGAGE dans les balises de code (la coloration syntaxique).
Explications disponibles ici : ICI 

Merci d'y penser dans tes prochains messages.

f894009 · Answer

Bonjour,

soustraire 2 plages et afficher la valeur dans 1 textbox Vous pouvez detailler la chose ?????

ivgu19 · Answer

Bonjour,
Sur ma feuille Excel, j'ai une plage 'NI' (nouvel index) par ex a1:a5 et une plage 'AI' (ancien index) par ex b1:b5
Sur  mon userform 1 textbox qui doit afficher la somme de: NI moins la somme de AI
Comment écrire le code dans la procédure
En espérant avoir été plus clair
A+

f894009 · Answer

Re,

With Sheets("etat")
        TextBox8 = Application.WorksheetFunction.Sum(.Range("A1:A5")) - Application.WorksheetFunction.Sum(.Range("B1:B5"))
    End With

ivgu19 · Answer

Re,
vous m'avez permis l'affichage de mon userform pour l'année en cours.
Private Sub UserForm_Click()
 With Sheets("etat")
        TextBox7.Value = Sheets("etat").Range("i1").Value 'date
        TextBox8 = Application.WorksheetFunction.Sum(.Range("i2")) - Application.WorksheetFunction.Sum(.Range("j2"))
        TextBox9 = Application.WorksheetFunction.Sum(.Range("i8:i51")) - Application.WorksheetFunction.Sum(.Range("j8:j51"))
        TextBox10 = Application.WorksheetFunction.Sum(.Range("i52:i97")) - Application.WorksheetFunction.Sum(.Range("j52:j97"))
        TextBox11 = Application.WorksheetFunction.Sum(.Range("i3:i7")) - Application.WorksheetFunction.Sum(.Range("j3:j7"))
        TextBox12 = Application.WorksheetFunction.Sum(.Range("i3:i7")) - Application.WorksheetFunction.Sum(.Range("j3:j7"))
    End With
TextBox13.Value = Val(TextBox8.Value) - Val(TextBox9.Value) - Val(TextBox10.Value) - Val(TextBox11.Value)
End Sub
Je pense qu'il doit falloir utiliser une boucle pour reproduire cet affichage pour 10 années.
Merci de me conseiller sur la boucle qui réponde à mon projet.
A+

ivgu19 · Answer

Bonjour,
Je n'ai pas de créée de plages.
A l'ouverture de l'userform les 10 années sont représentées (2014, 2013 ect) et en dessous les valeurs calculées par le code ci-dessus (genre tableau de bord).
Je peux copier/coller 9 fois ce code et l'adapter mais c'est lourd et pas très élégant.
D'où ma question, (je suis débutant) sur les boucles :while/wend, do until/loop, for next je ne sais laquelle utiliser?
Avec cette piste ma recherche sur internet pour le codage sera ciblée.

ivgu19 · Answer

re,
avec le fichier tout est plus clair .
je voudrai mettre les références en relatif pour que mes résultats suivent à la suite d'un tri
Merci beaucoup pour votre aide
A+
  https://www.cjoint.com/c/EHzqCoCwHxt

f894009 · Answer

Bonjour,

fichier modifie pour 10 annees glissantes:

https://www.cjoint.com/c/EHAhBEh70Bf

deux anomalies: vous avez deux fois le meme calcul (TextBox11 et 12) et la derniere annee vous avez les nombres sans operation puisque rien apres

ivgu19 · Answer

Bonjour,
Après correction tout fonctionne impeccablement grâce à vous.
Je vous remercie vraiment pour votre aide et vous souhaite une bonne journée.
Merci également au forum

Afficher résultat d'une opération dans un textbox

8 réponses

Discussions similaires