Discussion :

[drakkar_agfa]

Bonjour forum!

J'utilise ce code:

Code :

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

sh.Cells(lCompteur, 38).FormulaLocal = "=SI(NBVAL(AM4:IV4)<>0;""X"";"""")"

Tout fonctionne parfaitement...
Mais j'ai le problè de la machine anglaise non? À moins que je ne me trompe, je dois utiliser un

Code :

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

1
2
 
.Formula = "=IF(........)"

Mais... comment traduire NBVAL pour un excel en anglais...
Ma difficulté ici n'est pas le codage, mais la traduction!

Merci de me donner un petit coup de main (et si vous connaissez un table de conversion ou quelque chose du genre ^^ )

[pgz]

Bonsoir.

Ca doit être Count?
Suggestion : tu écris la formule en .FormulaLocal et tu la relis en .Formula.

Code :

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

Msgbox ActiveCell.Formula

PGZ

[ucfoutu]

Bondoir,

Au hasard (doigt salivé et au vent) : CountA

[drakkar_agfa]

Un gros merci!

En passant, NBVAL devient COUNTA
Tu étais proche! (mais je l'avais déja essayé )

Edit : Merci, mais j'ai découvert par moi-même ^^

[drakkar_agfa]

Rebonjour,

J'ai un deuxième problème...
Ceci fonctionne:

Code :

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

Worksheets("Feuil1").Cells(1, 1).FormulaLocal = "=SI(B1=""a"";""C'est a"";""Ce n'est pas a"")"

Mais ceci non:

Code :

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

Worksheets("Feuil1").Cells(1, 1).Formula = "=IF(B1=""a"";""C'est a"";""Ce n'est pas a"")"

J'ai l'erreur 1004...
Est-ce que FormulaLocal peut s'appliquer sur une cellule mais que Formula peut seulement s'appliquer sur un Range?

[drakkar_agfa]

Non, cela fonctionne avec les cellules.
Testé avec ceci (directement de l'aide)

Code :

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

    Worksheets("Feuil1").Cells(2, 1).Formula = "=$A$4+$A$10"

Alors c'est la formule...
Quelqu'un pourrait m'aider à trouver mon erreur?

[drakkar_agfa]

ReReReBonjour,

Tout est arrangé.
Probablement un erreur de copié/collé de formule...

Merci!