Enregistrer feuille avec valeurs sans formule

Bonjour,

Après plusieurs recherche sur le forum, en essayant avec l'enregistreur de macro j'essaye en vain d'enregistrer une feuille sans les formules avec seulement leurs valeurs avec une macro VBA.

C'est pour archiver dans un dossier le planning de la semaine.

Je vous joint le fichier de base qui contient les macros, les formules. Et le fichier que j'aimerais obtenir sans des formules juste les résultats des formules.

Merci pour votre aide.

Fichier avec macro :

Fichier final :

Bonjour,

Simple, potentiellement optimisable en limitant la range à copier, mais efficace.

Sub COPIER()
Worksheets("IDE AS LOG ACC JOUR").Cells.Copy
Workbooks.Add
ActiveSheet.Cells.PasteSpecial xlPasteAllUsingSourceTheme
ActiveSheet.Cells.Copy
ActiveSheet.Cells.PasteSpecial xlPasteValues
End Sub

Bonne journée.

Bonjour, j'ai un bug sur le titre de la page :

#NOM?

Un peu difficile a comprendre ce qui ne va pas :/

Merci pour l'aide apportée :)

Bonjour,

Tu peux me faire une capture d'écran ? C'est sur le classeur initial ou le classeur de copie ? Chez moi ça fonctionnait avec l'exemple donné, est-ce le cas chez toi ?

Bonne journée.

C'est sur la copie quand je lance la macro a l'aide un bouton pour l'avoir testé.

Sur fichier de base RAS tout marche nickel avec ma fonction... :/

En effet je n'avais pas vu la fonctions personnalisée désolé ..

Voilà qui devrait répondre à ton besoin

Sub COPIER()
Worksheets("IDE AS LOG ACC JOUR").Cells.Copy
Workbooks.Add
ActiveSheet.Cells.PasteSpecial xlPasteAllUsingSourceTheme
ActiveSheet.Cells.PasteSpecial xlPasteValuesAndNumberFormats
End Sub

Bonne soirée.

Merci beaucoup Ergotamine.

Ca marche nickel plus qu'a l'adapté avec les ranges :)

En faisant l'enregistrement de macro je n'arrivais pas a obtenir ce résultat surement une des cases que je n'avais pas coché !