convertir formule en valeur

[phil]

bonjour,

J'ai réalisé un classeur contenant une soixantaine de feuilles, et tout un tas de formules pour arriver à des résultats.
J'ai un second classeur, copie du 1ier avec quelques info en moins (mais dépendant directement du 1ier classeur).
Je voudrais convertir les formules de ce second classeur, afin qu'il ne contienne plus que les résultats (en quelque sorte, "couper le cordon" avec le 1er ...).
Est-ce possible? Si oui, comment faire ...

Merci d'avance

 

[yeahou]

Bonjour

cette macro exécutée fera dans le classeur actif ce que tu désires. Elle effectue un copier/coller valeurs sur l'ensemble des cellules de l'ensemble des feuilles du classeur actif.

A+

Sub Formules_Valeurs()
Application.ScreenUpdating = False
Dim Feuil_Val As Worksheet
For Each Feuil_Val In ActiveWorkbook.Worksheets
Feuil_Val.Select
Cells.Copy
Cells.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("A1").Select
Next Feuil_Val
ActiveWorkbook.Sheets(1).Select
End Sub

 

[phil]

Impeccable, un tout grand merci, elle fonctionne à merveille ...

à bientôt