remplacement automatique de formules

[merinos-BernardEtang]

Bonjour a tous,

Comme lorsqu'on copie des cellules d'un fichier a l'autre on copie en fait les formules aussi, avec le lien aux formules d'orgine, je cherche a CASSER ce lien en remettant des formules que j'aurai mises en reserve.

Mais la question est: VBA peut 'il lire les formules et non les contenus des cellules?

En fait je dois pouvoir dire celulle par celulle si ce qu'on voit est une formule (a ecraser) ou une valeur (a conserver)

Merinos

 

[fanfan38]

Re : remplacement automatique de formules

Bonjour
Avec collage special tu devrais trouver ton bonheur

A+ François

 

[merinos-BernardEtang]

Re : remplacement automatique de formules

Francois,

Non ca marche pas: j'ai un tableau de 20 colonnes et 300 lignes ... 😀

je veux voir pour les 6.000 cellules les quelles sont des formules et les remplacer. 😱

 

[fanfan38]

Re : remplacement automatique de formules

Dans ce cas tu clic en haut à gauche (au dessus du 1) pour selectionner toutes les cellules (ou tu selectionnes les cellules que tu souhaites voir...)
Tu clic sur Outils/Options tu selectinnnes l'onglet affichage et tu coches Formules
Les formules s'affichent...

A+ François

 

[Tibo]

Re : remplacement automatique de formules

Bonjour,

Au clavier, tu peux faire :

- F5
- cliquer sur Cellules
- Sélectionner Formules - OK
- S'il s'agit de supprimer les formules, taper SUPPR

Tu peux reproduire la même chose en VBA via l'enregistreur de macros.

Si pas ça, reviens avec plus de détails

@+

 

[merinos-BernardEtang]

solutionné : remplacement automatique de formules

et voila j'y suis....

La macro suivante va suprimer toutes les formultes pour ne montrer que les données saisies. 😀



Sub kill_formula()
For Each ma_cell In Selection
If Left(ma_cell.Formula, 1) = "=" Then ma_cell.Value = ""
' si la formule dans la cellule commence par "=" alors on l'efface.
Next ma_cell

End Sub


C'etait pas plus difficile que ca 😱😱😱