Discussion :

[doudoustephane]

Bonjour.
Je suis devant un problème que je ne comprends pas.
Je possède une formule valide lorsque je la mets directement dans une cellule excel.
Et lorsque je veux mettre cette même formule dans une cellule via vba, impossible, la cellule reste toujours vide. J'ai essayé avec Range("A1") =, Range("A1").Formula =, Range("A1").FormulaLocal =, Range("A1").FormulaR1C1 =, rien y fait, elle est toujours vide.
Si quelqu'un a une idée SVP...
Voici ma formule :

Code :

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

1
2
 
=CONCATENER(SI('Liste - Saisie'!BD3<10;0;"");'Liste - Saisie'!M3;" - ";'Liste - Saisie'!N3;" - ";'Liste - Saisie'!K3;" - ";'Liste - Saisie'!E3)

merci d'avance

[Peut-êtreUneRéponse]

En VBA les formule doivent être converties, ci-dessous la conversion adéquate de ta formule en étant positionné en cellule A3 :

Code vba :

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

1
2
 
ActiveCell.FormulaR1C1 = "=CONCATENATE(IF('Liste - Saisie'!RC[55]<10,0,""""),'Liste - Saisie'!RC[12],"" - "",'Liste - Saisie'!RC[13],"" - "",'Liste - Saisie'!RC[10],"" - "",'Liste - Saisie'!RC[4])"

Tu noteras que les fonctions sont en anglais (concatenate, if), la position des cellules est en mode relatif (R = row, C = column, RC[55] signifiant sur la même ligne 55 colonne à droite), que les doubles quotes sont protégées par des doubles quotes et que les virgules remplacent les point-virgules

.

[doudoustephane]

En VBA les formule doivent être converties, ci-dessous la conversion adéquate de ta formule en étant positionné en cellule A3 :

Code vba :

ActiveCell.FormulaR1C1 = "=CONCATENATE(IF('Liste - Saisie'!RC[55]<10,0,""""),'Liste - Saisie'!RC[12],"" - "",'Liste - Saisie'!RC[13],"" - "",'Liste - Saisie'!RC[10],"" - "",'Liste - Saisie'!RC[4])"


Tu noteras que les fonctions sont en anglais (concatenate, if), la position des cellules est en mode relatif (R = row, C = column, RC[55] signifiant sur la même ligne 55 colonne à droite), que les doubles quotes sont protégées par des doubles quotes et que les virgules remplacent les point-virgules

.

ok, merci, c'est bon avec cela.
En fait, c'était tout simple mais il faut le savoir...

[laloune]

et est-ce que tu as essayé avec l'enregistreur de macro ? tu lances l'enregistreur et tu tapes ta formule...

non ?

[doudoustephane]

et est-ce que tu as essayé avec l'enregistreur de macro ? tu lances l'enregistreur et tu tapes ta formule...

non ?

Non, c'est vrai que ce coup là, je n'y avais même pas penser...
Oups
Merci