Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
867 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Onglet Excel -> découpe pls files

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Onglet Excel -> découpe pls files

n°1503671
TheFreeMar​mote
Posté le 16-01-2007 à 15:14:15  profilanswer
 

Bonjour, voici mon problème,  
 
Je voudrais savoir s'il existe un code VBS permettant de créer plusieurs fichiers à partir d'un fichier excel à plusieurs onglets...
 
Je m'explique... ex : fichier1.xls (onglets : feuil1, feuil2, feuil3)
 
A la sortie du VBS je voudrais avoir ça : feuil1.xls, feuil2.xls, feuil3.xls...
 
Possible ça ???
 
merci

mood
Publicité
Posté le 16-01-2007 à 15:14:15  profilanswer
 

n°1503714
TheFreeMar​mote
Posté le 16-01-2007 à 15:50:53  profilanswer
 

Petit up, c'est assez urgent ^^

n°1503758
TheFreeMar​mote
Posté le 16-01-2007 à 16:42:47  profilanswer
 

up

n°1503842
seniorpapo​u
Posté le 16-01-2007 à 19:00:10  profilanswer
 

Bonsoir,
à tester: (pas VBS)
 
Windows("fichier1.xls" ).Activate
Set wb = ActiveWorkbook
For Each ss In wb.Sheets
    Application.CutCopyMode = False
   ss.Copy
   ActiveWorkbook.SaveAs Filename:= _
        "Mettre ici le chemin" & ss.Name & ".xls", _
        FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
   
    Windows("fichier1.xls" ).Activate
Next
End Sub
Cordialement


Message édité par seniorpapou le 16-01-2007 à 21:35:23
n°1506374
TheFreeMar​mote
Posté le 23-01-2007 à 15:17:41  profilanswer
 

Parfait, ça fonctionne... il faut juste rajouter subxxxx au début... je suis d'accord normalement c'est instinctif :D
 
Merci bcp pour ce code...


Message édité par TheFreeMarmote le 23-01-2007 à 15:18:19

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Onglet Excel -> découpe pls files

 

Sujets relatifs
[VBS]Ouverture d'un classeur excel[Macro Excel] Comment récupérer le nom du fichier?
[résolu] passage d'excel 2003 à excel 2000Comment avoir un timer sous le VBA d'Excel ?
Créer un fichier excel avec des checkbox en php(PHP/PEAR)[VBA][Excel] Barre de formulaires, case d'option : définir la fonte ?
[VBA] piloter word depuis une macro excel -- Chercher remplacer(VBA excel) lire les données d'une macro complementaire
Fonction ALEA() et fonction de répartition sous ExcelAlternative au générateur de nombres aléatoires Excel
Plus de sujets relatifs à : Onglet Excel -> découpe pls files


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR