Affichage de la valeur du résultats pas la formule

[zbig]

Bonjour

J'ai fait une procédure d'une somme (banal)
Quand j'appuie sur le bouton, la procédure s'active et le résultat s'affiche
mais en me positionnant dans la cellule, je voie la formule
Or je voudrais que la valeur s'affiche uniquement.
Existe t il une solution?

merci
Zbig

 

[Excel-lent]

Re : Affichage de la valeur du résultats pas la formule

Bonjour Zbig,

une procédure d'une somme

Tu veux parler d'une macro?

Si oui il y a une solution et elle est simple.

Bonne après midi

 

[zbig]

Re : Affichage de la valeur du résultats pas la formule

Bonjour

oui une macro

Zbig

 

[Robert]

Re : Affichage de la valeur du résultats pas la formule

Bonjour le fil, bonjour le forum,

Zbig, si tu nous donnais le code de ta macro on pourrais peut-être mieux comprendre ton problème et t'aider à le résoudre non ?

 

[zbig]

Re : Affichage de la valeur du résultats pas la formule

Bonjour

c'est mieux avec un fichier.
problème

comment eviter que les formules s'affichent en colonne F mais uniquement les valeurs


Zbig

 

[Robert]

Re : Affichage de la valeur du résultats pas la formule

Bonjour le fil, bonjour le forum,

Oui c'est beaucoup mieux avec un petit fichier ! Essaie comme ça :

Sub additionne()
For a = 2 To 100
    If Cells(a, 1).Value <> "" Then Range("F" & a) = Application.WorksheetFunction.Sum(Range(Cells(a, 3), Cells(a, 5)))
Next a
End Sub

 

[zbig]

Re : Affichage de la valeur du résultats pas la formule

Bonjour

oui ça marche bien .
Sauf que la condition si b="" alors "" n'y est plus.
en fait c'est un ou

IF(or(RC[-5]="""",rc[-4]="""")

Zbig

 

[Robert]

Re : Affichage de la valeur du résultats pas la formule

Bonsoir le fil, bonsoir le forum,

Vite fait sans avoir testé :

Sub additionne()
For a = 2 To 100
    If Cells(a, 1).Value <> "" Or Cells(a, 2).Value <> "" Then Range("F" & a) = Application.WorksheetFunction.Sum(Range(Cells(a, 3), Cells(a, 5)))
Next a
End Sub

 

[Staple1600]

Re : Affichage de la valeur du résultats pas la formule

Bonsoir


Voici un moyen simple pour ne pas voir les formules

Sub MasquerAfficheBFormules()
Application.DisplayFormulaBar = Not Application.DisplayFormulaBar
End Sub

Tu lances une première fois la macro, plus de formules
Tu lances une seconde fois la macro, les revoilou.

 

[Staple1600]

Re : Affichage de la valeur du résultats pas la formule

RE

Sinon une autre façon de faire (sans avoir besoin de faire une boucle)

Sub additionne()
With Range("F2:F100")
.FormulaR1C1 = "=IF(COUNTA(RC[-5]:RC[-4])=2,SUM(RC[-3]:RC[-1]),"""")"
.Value = .Value ' pour n'avoir que les valeurs
End With
End Sub

 

[zbig]

Re : Affichage de la valeur du résultats pas la formule

Bonsoir

merci pour ces réponses.
ZBig