transfert de feuilles

belyazid

XLDnaute Nouveau
bon week-end tout le monde
dans le fichier N_inscrit j'ai plusieurs feuilles.
et je voudrais transférer la feuille tot1 dans un nouveau fichier appelle "besoins"
dans la racine C:
même chose pour la feuille tot2 et tot3 et tot4
et merci
 

Robert

XLDnaute Barbatruc
Repose en paix
Re : transfert de feuilles

Bonjour le fil, bonjour le forum,

En pièce jointe ton fichier modifié. Pour que la macro fonctionne correctement tu n'ouvres que ce fichier et aucun autre. Puis tu lances la macro. Tu te retrouveras avec (dans la racine C : ) 4 fichiers : besoins1, besoins2, besoins3 et besoins4 contenant respectivement l'onglet concerné. J'espère que cela répond bien à ta question.

Édition:

Bonjour Stape on s'est croisé...
 

Pièces jointes

  • Belyazid_v01.xls
    152 KB · Affichages: 52

kikouyou

XLDnaute Junior
Re : transfert de feuilles

bonjour tout le monde,

Belyazid regarde ce code, il a pour fonction de copier la feuille tot4 du fichier N_inscrits dans le fichier Nouveau Feuille de calcul Microsoft Excel.xls qui doit etre creer et ouvert au prealable.

Windows("N_inscrits.xls").Activate
Sheets("tot4").Activate
Sheets("tot4").Select
Sheets("tot4").Copy Before:=Workbooks( _
"Nouveau Feuille de calcul Microsoft Excel.xls").Sheets(1)


apres pour ce qui est de la placer dans le fichier besoin :


Workbooks.Open Filename:= _
"C:\besoin.xls"

Normalement si tu travailles sur ces 2 codes tu dois t'en sortir....


bonne journee
 

Discussions similaires

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 823
dernier inscrit
ben talha redouane