Enregistrement d'un fichier avec les valeurs en dur

Bonjour,

J'aimerais enregistrer ma feuille Excel avec toutes les valeurs en dur, ce qui revient à faire un collage spécial, "valeur" sur toutes les feuilles. Est ce que vous savez si c'est possible de le faire directement, c'est à dire sans passer par le collage spécial ni par une macro? Merci pour vos réponses.

hello

je ne pense pas

solutions :

• faire un pdf (Cutepdf est gratuit)
• enregistrer la macro collage spécial (ça reste une macro, mais si tu l'affectes à un bouton, c'est rapide ensuite pour l'utilisateur)

qui aurait d'autres idées ?

Bonjour,

comme te le dit jmd, le plus simple reste la macro

regarde le fichier joint, toutes les cellules à fond jaune comprennent des formules

Appuie sur le bouton rouge, toutes les formules sont remplacées par leurs valeurs

le code :

Sub formules_valeurs()
Dim sh As Worksheet
For Each sh In Sheets
    With sh.Cells.SpecialCells(xlCellTypeFormulas, 23)
        x = .Areas.Count
        For i = 1 To x
            .Areas(i).Value = .Areas(i).Value
        Next i
    End With
Next sh
End Sub

Nota, la boucle For i = 1 To x est nécessaire, car en mettant directement ce code :

Sub formules_valeurs()
Dim sh As Worksheet
For Each sh In Sheets
    With sh.Cells.SpecialCells(xlCellTypeFormulas, 23)
           .Value = .Value
    End With
Next sh
End Sub

cela génère des erreurs de collage spécial des valeurs, certaines valeurs sont erronées, notamment si les zones comprenant des formules ne sont pas adjacentes

le fichier :

https://www.excel-pratique.com/~files/doc/valeurs.xls