Formule non apparente dans la barre de formule

Version imprimable

Bonsoir le Forum,

Ce code fonctionne mais quand je suis dans ma cellule de résultat je peux lire la formule entière s'afficher dans la barre de formule. Est-ce possible de voir apparaitre que le résultat comme dans ma cellule?.

Code:

1
2
3
Sub Somme_dans_récap()
ActiveCell.FormulaR1C1 = "='01'!R[63]C[9]+'01'!R[64]C[9]+'02'!R[63]C[9]+'02'!R[64]C[9]+'03'!R[63]C[9]+'03'!R[64]C[9]+'04'!R[63]C[9]+'04'!R[64]C[9]+'05'!R[63]C[9]+'05'!R[64]C[9]+'06'!R[63]C[9]+'06'!R[64]C[9]+'07'!R[63]C[9]+'07'!R[64]C[9]+'08'!R[63]C[9]+'08'!R[64]C[9]+'09'!R[63]C[9]+'09'!R[64]C[9]+'10'!R[63]C[9]+'10'!R[64]C[9]+'11'!R[63]C[9]+'11'!R[64]C[9]+'12'!R[63]C[9]+'12'!R[64]C[9]+'13'!R[63]C[9]+'13'!R[64]C[9]+'14'!R[63]C[9]+'14'!R[64]C[9]+'15'!R[63]C[9]+'15'!R[64]C[9]+'16'!R[63]C[9]+'16'!R[64]C[9]+'17'!R[63]C[9]+'17'!R[64]C[9]+'18'!R[63]C[9]+'18'!R[64]C[9]+'19'!R[63]C[9]+'19'!R[64]C[9]+'20'!R[63]C[9]+'20'!R[64]C[9]+'21'!R[63]C[9]+'21'!R[64]C[9]+'22'!R[63]C[9]+'22'!R[64]C[9]+'23'!R[63]C[9]+'23'!R[64]C[9]+'24'!R[63]C[9]+'24'!R[64]C[9]+'25'!R[63]C[9]+'25'!R[64]C[9]+'26'!R[63]C[9]+'26'!R[64]C[9]+'27'!R[63]C[9]+'27'!R[64]C[9]+'28'!R[63]C[9]+'28'!R[64]C[9]+'29'!R[63]C[9]+'29'!R[64]C[9]+'30'!R[63]C[9]+'30'!R[64]C[9]+'31'!R[63]C[9]+'31'!R[64]C[9]"
    Range("C6").Select

En vous remerciant.

07/09/2010, 18h08
tototiti2008

Bonjour macat,

Par exemple, tu colles sa valeur sur la cellule, ça n'est donc plus une formule mais une valeur fixe, et elle ne se met plus à jour si une des cellules sur lesquelles elle se basait change

un simple :

Code:

ActiveCell.Value = ActiveCell.Value

juste après avoir écrit la formule devrait faire l'affaire
08/09/2010, 01h33
Gorfael

Salut macat et le forum
Moi y en a pas comprendre ce que toi vouloir dire :mrgreen:
Tu veux que la formule soit remplacée par sa valeur ?
Ou tu ne veux plus que la formule apparraisse ?
Format de cellule>>onglet Protection
Cocher masqué => À la protection de la feuille, la formule disparaîtra de la barre de formule.
A+
08/09/2010, 09h18
macat

Bonjour,
Oui, c'est cela. Je ne voulais plus que la formule apparaisse dans la barre des formules.
Donc j'ai appliqué comme suit.

Format de cellule>>onglet Protection
Cocher masqué => À la protection de la feuille, la formule disparaîtra de la barre de formule.

C'était si simple :ccool: alors que je cherchais bêtement quelque chose à mettre dans le code, autant pour moi :mrgreen:
Merci bien
A+