XL 2019 Copier un onglet en valeur

[desmonts]

Bonjour à tous,

J'ai un onglet qui est un formulaire qui se nomme facture. Je vais chercher plein de valeur dans les autres onglets. Donc dans mes cellules j'ai plein de recherche V etc... Je voudrai enregistrer cet onglet dans un autre excel en valeur, mais il me l'enregistre avec toutes mes formules . Quelqu'un pourrait m'aider et modifier le code ci-dessous ?
par avance merci
cdt Yohann

ChDir "C:\Users\" & Right(Application.DefaultFilePath, 7) & "\Desktop\"
Fichier = Application.GetSaveAsFilename(Range("K11"), "Classeur Excel (*.xlsx), *.xlsx")
If Fichier <> False Then
Sheets("FACTURE").Copy

Sheets("FACTURE").Name = Range("K11")
Application.DisplayAlerts = False
ActiveSheet.SaveAs Fichier
Application.DisplayAlerts = True
ActiveWindow.Close
End If

End Sub

 

[vgendron]

Hello
avant de fermer ton nouveau classeur,
fais un "Ctrl A ==> vba cells.select
Ctrl C ==>.copy
et Ctrl V(special valeurs) ))> .pastespecial(xlvalues) ==> pas sur de la syntaxe