Discussion :

[Kiera]

Bonjour,
Mon problème est Comment faire des multiplications et additions pour que le résultat du calcul soit dans une seule cellule en vba
Je sais faire les additions, soustractions et multiplications individuellement en vba
Du genre A*B=C, A+B= C etc…
Mais je ne sais pas, j’ai passé des journées entières là-dessus pour essayer avoir un résultat pour avoir quelque chose (un résultat) qui provient d’une formule du type : A* (B+C)*D=E

Je vous remercie par avance de votre aide car je bloque complètement

[joe.levrai]

Bonjour,

peux-tu nous donner un exemple précis de ce calcul ?

E c'est le résultat de ton opération, qu'il faut mettre dans une cellule ?

[Kiera]

Bonjour ,
oui E c'est le résultat qui devrait s'afficher dans la cellule (mais je n'y arrive pas)
je vais créer un tableau "fictif "afin que ce soit plus explicite.

Dans l'exemple ci dessous c'est un peu plus simple mas je veux pouvoir utiliser à la fois les additions et multiplications pour obtenir mon résultat.(sachant que les données changent en fonction des lignes)

A	            B	                 C                         D	                                          E	
produits 	quantité	         prix 	frais d'emballage/ transport                  	Résultat	
café	           12	               1,35	                      5	                                      21,2	ici la formule  utilisée  est  
                                                                                                             12*1,35)+5 t                                                                                   
jus de fruit	1   8	                2,52	                     8	                                       53,36	

Est ce un peu plus explicite?

Je vous remercie pour votre aide

[joe.levrai]

Bonjour,

du coup, je me demande qu'est ce qui t'a bloqué ? c'est aussi simple qu'une vulgaire addition

exemple détaillé, qu'il te suffit d'adapter à ton contexte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Calcul()
Dim QT As Long 'Quantite
Dim PU As Double ' Prix Unitaire
Dim FE As Long 'Frais Emballage
Dim PT As Double 'Prix Total
 
' je déclare les valeurs en dur
' mais on peut les récupérer depuis une feuille Excel
QT = 12   ' QT = Range("A2")
PU = 1.35
FE = 5
PT = QT * PU + FE   ' Range("A5") = QT * PU + FE
MsgBox PT
 
End Sub

[Marc-L]

Bonjour, bonjour !

Un code semble inutile, pourquoi ne pas utiliser directement les fonctions de feuille de calculs ?!

Et s'il faut vraiment en passer par un code, comme les données sont dans une feuille de calculs,
mieux vaut quand même utiliser une fonction d'Excel soit via Application.Sum soit via Evaluate …

_____________________________________________________________________________________________________
Je suis Charlie, Bardo, Sousse

[Kiera]

non, je ne peux pas
on m'a demandé de la faire sous vba
le fichier étant "lourd", je ne peux pas recopier 10 000 cellules fixes. sinon j'aurai fais une formule excel, et le tour serait joué.
D'où le fait qu'on doit "automatiser", et après il faudrait que par la suite que j'insère des conditions par rapport à une variable.
Ce que je dois faire est un peu plus complexe d'où le fait que je sois réellement bloquée.
je vais tout de même tester vos conseils.
Je vous remercie énormément de m'être venue en aide .
en espérant que cela fonctionne