Bonjour à tous,
A partir d'un classeur avec une dizaine de feuilles (onglets) géré par de nombreuses formules et macros, je souhaiterais copier dans un second classeur (avec un autre nom) seulement quelques feuilles bien définies, avec l'ensemble de leurs contenus mais sans aucune formule.
Je ne sais pas ci cela est bien clair, mais pour résumer, je souhaiterais copier et coller uniquement les valeurs. J'ai bien trouvé dans un post de Papou-net une macro (ci-dessous) qui fait ce genre de travail mais les copies crées un fichier nouveau par feuille, hors je souhaite garder toutes les feuilles dans le même fichier.
Etant nul en VBA, je ne suis pas capable d'adapter son code ou en créer un autre....!
Merci de votre aide
Code de Papou-net:
Sub CopieFeuilles()
For Each sh In ActiveWorkbook.Sheets
sh.Copy
ActiveWorkbook.SaveAs "F:\" & sh.Name
ActiveWorkbook.Close
Next
End Sub
A partir d'un classeur avec une dizaine de feuilles (onglets) géré par de nombreuses formules et macros, je souhaiterais copier dans un second classeur (avec un autre nom) seulement quelques feuilles bien définies, avec l'ensemble de leurs contenus mais sans aucune formule.
Je ne sais pas ci cela est bien clair, mais pour résumer, je souhaiterais copier et coller uniquement les valeurs. J'ai bien trouvé dans un post de Papou-net une macro (ci-dessous) qui fait ce genre de travail mais les copies crées un fichier nouveau par feuille, hors je souhaite garder toutes les feuilles dans le même fichier.
Etant nul en VBA, je ne suis pas capable d'adapter son code ou en créer un autre....!
Merci de votre aide
Code de Papou-net:
Sub CopieFeuilles()
For Each sh In ActiveWorkbook.Sheets
sh.Copy
ActiveWorkbook.SaveAs "F:\" & sh.Name
ActiveWorkbook.Close
Next
End Sub