Bonjour,

je souhaite dupliquer une feuille d'un classeur.
Mon code y parvient MAIS les formules sont aussi recopiées.
Je ne voudrais QUE les valeurs.

merci d'avance


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Dim pathSourceName As String, fichierSource As String
pathSourceName = "c:\temp\"
'Nom du fichierSource à ouvrir
fichierSource = "test.xlsx" 
 
'Empêche le raffraichissement de l'écran
Application.ScreenUpdating = False
 
'Ouverture du fichierSource
Workbooks.Open pathSourceName & fichierSource
 
 
 
Worksheets("Ma feuille").Copy After:=Sheets(Worksheets.Count)
Set MySheet = ActiveSheet
With MySheet
   .Name = "ma nouvelle feuille"
End With