Discussion :

[Fidubel]

bonjour,
J'ai une feuille Excel contenant en colonne E des soldes de comptes (je suis comptable...)
Je veux mettre ne colonne C le montant de la colonne E s'il est positif, en D le montant de la colonne E s'il est négatif (et en inversant son signe pour qu'il devienne positif).

Facile avec Excel :
Il suffit de mettre en C2 la formule =SI(E2>0;E2;0) et en D2 la formule =SI(E2<0;E2*-1;0) et de recopier vers le bas (voir onglet "Résultat attendu" sur le fichier joint)
mais comme j'ai à faire régulièrement et sur des fichiers différents, une macro s'impose.

j'ai cherché et ai donc fait une macro avec la commande

Code :

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

ActiveCell.FormulaR1C1 = "=if(RC[+2]>0;=sum(RC[+2]:RC[+3];0)"

mon souci : VBA me restitue cela comme du texte et ne l'interprète pas comme une formule (voir onglet "Résultat obtenu")
j'ai essayé avec FormulaLocal , j'ai essayé de causer français ou anglais, je sèche !

merci de votre aide
Fidubel

[Invité]

Bonjour,

Actuellement vos cellules des colonnes C et D sont typées Texte. Pour mettre en place vos formules, il faut effacer totalement les cellules.
En vous positionnant successivement sur les cellules C2 et D2 et en tapant la ligne suivante dans la fenêtre exécution (Ctrl-G) :

Code :

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

1
2
 
? activecell.Formula2R1C1

et si vous avez mis vos formules en place, vous obtiendrez :

Code :

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

1
2
3
 
=IF(RC[1]>0,RC[1],"") ' Pour D2
=IF(RC[2]<0,-RC[2],"") ' Pour C2