Bonjour ou bonsoir chers tous en fonction de votre position et de l'heure !
Je vous soumets un problème dont je fais face actuellement. En effet, je voulais faire apparaitre le cumul des prises carburant dans une textbox (en occurrence la textbox8).
Merci de votre aimable collaboration !
Bonjour,
Apparemment ce n'est pas la Textbox8 mais la Textbox4.
En textbox8 j'ai aussi rajouté le km total qui, je pense est la somme de la colonne "ECART KMS"
VB:
'----------------------------
'Affiche littrage et kms total
UserForm.TextBox4.Value = Application.Sum(Range("Tableau1[PRISE JOUR]"))
UserForm.TextBox8.Value = Application.Sum(Range("Tableau1[ECART KMS]"))
'----------------------------
Bonjour,
Apparemment ce n'est pas la Textbox8 mais la Textbox4.
En textbox8 j'ai aussi rajouté le km total qui, je pense est la somme de la colonne "ECART KMS"
VB:
'----------------------------
'Affiche littrage et kms total
UserForm.TextBox4.Value = Application.Sum(Range("Tableau1[PRISE JOUR]"))
UserForm.TextBox8.Value = Application.Sum(Range("Tableau1[ECART KMS]"))
'----------------------------
On joue aux devinettes ?
On ne connait pas votre outil, alors donnez tout en même temps, on gagnera du temps.
D'autant que vous auriez pu faire la modif vous même, ce n'est qu'une recopie du litrage en rajoutant :
VB:
If i = 19 Then Cumulk = Cumulk + d.Cells(, i)
et à la fin
.TextBox8.Value = Format(Replace(Cumulk, ".", ","), "0 kms")