vba//division avec condition Fermé

Question

Bonjour, 
Je dois coder une macro dont l'une des fonctions consiste à calculer des ratios.
Seulement voilà, j'ai 18 ratio à calculer, et ce, pour tous les mois de l'année (je ne peux pas le faire directement sur excel)
Par ailleurs, il arrive que mon quotient soit nul, je dois donc faire vérifier la valeur de celui-ci avant de faire le calcul.

J'ai essayé de faire ça avec des boucle if (ce qui est très très long et lourd à faire). Je me demandais si l'on pouvait définir des divisions avec conditions autrement sous vba.

Autre chose: avec mes boucles, un msg d'erreur apparait disant qu'il y a dépassement de capacité!!

Ex pour un ratio (sachant que pour un ratio ça marche parfaitement)

If Cells(4, Col) <> 0 Then
   Worksheets("synthese").Cells(12, Col) = 1 - Cells(6, Col) / Cells(4, Col)
Else
   Worksheets("synthese").Cells(12, Col) = 0
End If


Configuration: Windows XP / Internet Explorer 7.0

Paf · Answer

bonsoir

pas simple de comprendre le besoin, les problèmes ... :

j'ai 18 ratio à calculer, et .... (je ne peux pas le faire directement sur excel)pourquoi une formule ne pourrait pas convenir ?

J'ai essayé de faire ça avec des boucle if (ce qui est très très long et lourd à faire)on ne peut pas juger, le bout de code fourni est limité(a priori)

Je me demandais si l'on pouvait définir des divisions avec conditions autrement sous vba.autrement que quoi ? que la façon décrite dans le code fourni ?

avec mes boucles, un msg d'erreur apparait disant qu'il y a dépassement de capacité!!avec le code complet ce serait plus simple de voir pourquoi il y a dépassement!

A lire vos précisions sur votre besoin et le code en anomalie ....

bonne soirée

Vba//division avec condition

1 réponse

Discussions similaires