d'un fichier en faire plein :)

jackfred

XLDnaute Junior
bonjour,

J'ai un fichier avec x onglets...

"a", "b", "c", "d", "e", ...

Je souhaite créer un fichier pour chaque onglet avec le contenu de cet onglet uniquement.

pour avoir
a.xls, b.xls, c.xls...


Merci bcp lol

fred
 

dixit

XLDnaute Impliqué
Re : d'un fichier en faire plein :)

bonjour,
s'agit-il d'une opération ponctuelle ou répétitive.
si ponctuelle et si pas trop d'onglets, il suffit de faire une copie de la feuille dans un nouveau classeur puis de faire une sauvegarde. Menu Edition / déplacer ou copier une feuille.
si répétitive, il faut envisager le VBA.
bye
 
Dernière édition:

pierrejean

XLDnaute Barbatruc
Re : d'un fichier en faire plein :)

bonjour jackfred

salut dixit

une solution

Code:
Sub test()
For n = 1 To ThisWorkbook.Sheets.Count
ThisWorkbook.Sheets(n).Cells.Copy
LeNom = ThisWorkbook.Sheets(n).Name
Workbooks.Add (xlWBATWorksheet)
ActiveSheet.Paste
ActiveWorkbook.SaveAs LeNom
Next n
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 466
Messages
2 088 663
Membres
103 910
dernier inscrit
amor57