formule par macro , avoir que le resultat dans la cellule

  • Initiateur de la discussion Initiateur de la discussion GHISLAIN
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

GHISLAIN

XLDnaute Impliqué
bonjour a tous ,


j'utilise une boucle pour mettre une formule dans des cellules :

Dim X As Integer
Sheets("toto").Range("n3:n500").ClearContents
Application.ScreenUpdating = 0
For X = 3 To 500
With Sheets("toto")
.Range("n" & X).Formula = "=IF(RC[-1]="""","""",IF(SUMPRODUCT((ListeB=RC[-1])*ISTEXT(Plage1))=0,"""",SUMPRODUCT((ListeB=RC[-1])*ISTEXT(Plage1))))"
End With
Next X


cela fonctionne , mais je souhaiterai ne garder que le resultat et pas la fomrule dans les cellules

j'ai testé avec
.Range("n" & X).Formularray =

mais ca me rajoute les acolades pour formule matricielle

si quelqu un a une idee pour que seul le resultat s'inscrive sans la formule suis preneur

merci a tous
cordialement

ghislain
 
Re : formule par macro , avoir que le resultat dans la cellule

bonjour bignou77,

j y ai pensé mais comme tu dit c est barbare
PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

merci de ton aide

cordialement

ghislain
 
Re : formule par macro , avoir que le resultat dans la cellule

Bonjour,

essaye peut être la méthode "evaluate" :
Code:
With Sheets("toto")
    .Range("n" & X).Value = Evaluate("=IF(RC[-1]="""","""",IF(SUMPRODUCT((ListeB=RC[-1])*ISTEXT(Plage1))=0,"""",SUMPRODUCT((ListeB=RC[-1])*ISTEXT(Plage1))))")
End With
bonne journée
@+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
953
Réponses
1
Affichages
1 K
Réponses
22
Affichages
3 K
Réponses
6
Affichages
932
Retour