fonction Excel SI en vba

[guillaume07]

Hello,
Pourquoi ce code provoque une erreur à l'éxécution :
Cells(i + 1, j).Formula = '=IF(C10=0;''-'';C14/C10)'
sachant que les indices i , j sont > 1 ex: i=2 , j=3
Merci

 

[Dan]

Bonjour,

C'est logique car ton code ne correspond à rien de lisible en VBA.

- Remplace Formula par --> FormulaR1C1
- Remplace '=IF(C10=0;''-'';C14/C10)' par --> '=IF(R[9]C[2]='0','''',R[13]C[2]/R[9]C[2])'



Message édité par: Dan, à: 05/01/2006 13:44

 

[guillaume07]

ça marche pas non plus :/

 

[guillaume07]

ahhhhhhhhh si c bon ouf!
merci trés beaucoup

 

[DomLyon]

Bonjour,
ton code ne correspond à rien en VBA. en effet la fonction SI devient une structure
If...... Then
Else
End If

dans cette procédure il convient de déclarer les variables, les cellules.

Une autre solution selon la recherche peut être utiliser la boucle:
For..... Next

et Calculate.

bon amusement
D

 

[Fernandez67]

Dans le meme ordre d'idée, est il possible d'utiliser la fonction RechercheV dans un code VB ?

Sur le CD de Formation de Gaëtan Mourmant
(www.polykromy.com), il signale que la procédure à suivre est par ex :

Application.WorksheetFunction.Min(myRange)

Cette formule est interessante dans le sens ou elle laisse les cellules libres.

Cordialement