Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres VBA Additionner valeur cellule

fouzyyy

XLDnaute Nouveau
Salut
je cherche un code vba pour additionner les valeur des cellule et insérer le totale en dernier ligne
sachant que les cllul en question sont en multiline

dans la photos joint vous le montre

merci
 

Pièces jointes

  • 01.jpg
    45.4 KB · Affichages: 39

fouzyyy

XLDnaute Nouveau
bonsoir sylvanu

Voici un fichier joint ( un test)
ce que je souhaiterais si

additionner A PARTIR de la cellule (C15). + la valeur cellule (D11) de la feuil nommé "CHARGE"

et la fin de la dernière ligne vide j 'insérer le totale

ainsi au passage j'aurai aimer filtre les listbox entre 02 mois ...j'arrive seulement a filtre sur un mois

si pour connaitre les frais et charge des véhicule entre 02 ou 3 mois


MERCI
 

Pièces jointes

  • TEST.xlsb
    139.3 KB · Affichages: 11

sylvanu

XLDnaute Barbatruc
Supporter XLD
Ca je ne sais pas faire simplement avec des formules.
Donc j'ai crée une colonne Prix Total avec une fonction perso dont la syntaxe est =Prix(Cellule), comme dans Atelier H6 :
VB:
Function Prix(N)
PrixT = Split(N, Chr(13) & Chr(10))
S = 0
For I = 0 To UBound(PrixT)
         S = S + PrixT(I)
Next I
If S = 0 Then Prix = "" Else Prix = S
End Function
Je ne sais pas si cette solution vous plaira. Mais on peut dire que ça donne la somme totale de l'opération sur le véhicule ! qu'on peut insérer dans Charge en D11 .
En fait on ne sait pas faire la somme de nombres comme inscrit en Atelier G6.
Evidemment j'ai invalidé le démarrage automatique.( à remettre )
 

Pièces jointes

  • Copie de TEST (2).xlsb
    126.3 KB · Affichages: 8
Dernière édition:

fouzyyy

XLDnaute Nouveau
bonjour eriiiic

ben je le paramétrer pour qu'au lancement je vois seulement l'userform..

tu peux accéder au feuils en cliquant sur l'icone en haut a gauche

ps .il ne ferme pas les classeur si juste il est cache tu peux les retrouver on cliquant sur l'icone.

merci
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…