Remplacer des résultats de fonctions par des valeurs

Bonjour à tous,

je cherche un moyen de remplacer des résultats de fonctions par leurs valeurs. Jusque-là j'utilisais le "coller valeurs", mais le problème c'est que si je sélectionne plusieurs plages de cellules, je ne peux pas faire cela. Je suis donc obligé de répéter l'opération pour chaque plage, et je perd beaucoup de temps..

Est-ce qu'il serait possible de sélectionner toutes les plages concernés, et de faire une fois la transformation une fois pour toutes?

Merci d'avance!!

Bonsoir,

qu'y a t il autour des plages discontinues ? des valeurs ou encore des formules ?

Sinon vous sélectionnez toute la feuille et copier/coller valeur une seule fois.

@ bientôt

LouReeD

Bonjour,

principalement des sommes (lignes de résultats)...

Donc pas trop possible de sélectionner toutes la page..

Je me disais que peut-être je pouvais faire une macro disant en gros:

  • sélectionner toutes les cellules dont la fonction comprend le mot "index",
  • transformer les résultats de fonction en la valeur du résultat.

et puis après je crée un raccourci (un bouton ou ctrl qqchose)

Mais je suis nul en vba.. Et je ne sais pas même pas si c'est possible :\

Merci de votre aide!

Bonsoir,

voici le code :

Sub Remplace_INDEX_par_Valeur()
    Dim Formule As String, Cel As Range ' définition des variables
    For Each Cel In ActiveSheet.UsedRange ' usedrange correspond à la plage de cellules utilisée sur la feuille, on boucle sur les cellules de usedrange
        Formule = Cel.FormulaR1C1Local ' ici on récupère le "texte" de la formule de la cellule testée
        If Formule Like "*INDEX*" Then ' si dans formule on trouve le mot INDEX
            Cel.Value = Cel.Value ' alors la cellule est égal à la valeur de la cellule
        End If
    Next
End Sub

Après pour le bouton :

insertion forme rectangle

puis clic droit : affecter une macro et sélectionnez Remplace_INDEX_par_Valeur

Faire une copie du fichier avant...

@ bientôt

LouReeD

Ca marche nickel!! Un grand merci LouReeD, grâce à toi je vais pouvoir gagner du temps sur le reporting!

A bientôt!

Bonsoir,

Ca marche nickel!!

Vous en doutiez ? !

Ca m'arrive de trouver des solutions, vous savez...

Un grand merci LouReeD

Merci à vous pour votre merci, à lire le message on sent une joie immense !!!!

@ (très) bientôt sur le forum

LouReeD

Rechercher des sujets similaires à "remplacer resultats fonctions valeurs"