× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Copier 1 feuille xls dans un autre fichierSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Obelix73
  Posté le 27/01/2006 @ 09:13 
Aller en bas de la page 
Petit astucien
Bonjour, Je suis a la recherche d'une macro. Pour copier "Feuil1" du fichier toto dans le fichier titi en dernière position puis enregistrer ce fichier titi avant de le refermer (les 2 fichiers toto et titi sont dans le même dossier. Bonne journée à tous @+ Obelix73

Modifié par Obelix73 le 27/01/2006 09:24
Publicité
galopin01
 Posté le 27/01/2006 à 09:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien
bonjour, [code]Sub Test() Workbooks.Open Filename:="titi.xls" k = Sheets.Count With Workbooks("titi.xls") Workbooks("toto.xls").Sheets("Feuil1").Copy After:=.Sheets(k) .Save .Close End With End Sub[/code] A+
Obelix73
 Posté le 27/01/2006 à 13:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Bonjour, Merci Galopin01 pour cette macro. Dans le déroulement de cette macro, peut-on demander que la "Feuil1" issue du premier fichier soit renommée en "zaza". @+ Obelix73
Bérylion
 Posté le 27/01/2006 à 18:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

'soir à tous !
peut-on demander que la "Feuil1" issue du premier fichier soit renommée en "zaza"
Yaka ! [bigsmile] tu peux ajouter la ligne en rouge : Sub Test() Workbooks.Open Filename:="titi.xls" k = Sheets.Count With Workbooks("titi.xls") Workbooks("toto.xls").Sheets("Feuil1").Copy After:=.Sheets(k) .Sheets(k + 1).Name = "zaza" .Save .Close End With End Sub
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
199,99 €Ecran PC 27 pouces Dell S2721DS (QHD, IPS, 75 Hz) à 199,99 €
Valable jusqu'au 28 Novembre

Fnac fait une promotion sur l'écran PC 27 pouces Dell S2721DS qui passe à 199,99 € au lieu de plus de 250 € ailleurs. L'écran à cadre fin dispose d'une dalle IPS QHD (2560x1440 pixels) à 75 Hz. Il est compatible Freesync et dispose de 2 prises HDMI et 1 prise DP. Il dispose de haut-parleurs intégrés (2x3W) et son pied est réglable en hauteur.


> Voir l'offre
3,46 €Boîtier externe Orico USB 3.0 pour disque dur ou SSD à 3,46 €
Valable jusqu'au 27 Novembre

Gearbest fait une promotion sur le boîtier disque dur Orico qui passe à 3,46 €.  Ce boîtier va vous permettre de transformer un disque dur 2.5 pouces ou un SSD interne en disque dur externe portable (voir notre dossier pratique Fabriquer un disque dur externe portable). Compatible USB 3.0, ce boitier vous permettra de profiter de transferts rapides. Un câble USB 3.0 est fourni. Disponible en noir ou en blanc.

Ce marchand sérieux se trouvant en Chine, la livraison peut prendre une vingtaine de jours. Vous pouvez payer par carte bancaire ou par Paypal (conseillé pour bénéficier de la garantie Paypal).


> Voir l'offre
59,95 €SSD Samsung 860 EVO 500 Go à 59,95 € avec le code REDSOCK
Valable jusqu'au 27 Novembre

LDLC fait une promotion sur le SSD Samsung 860 EVO 500 Go qui passe à 59,95 € avec le code promo REDSOCK alors qu'on le trouve ailleurs à partir de 80 €. Ce SSD offre des vitesses de 560 Mo/s en lecture et 520 Mo/s en écriture. Il est garanti 5 ans. Une bonne affaire.


> Voir l'offre

Sujets relatifs
Excel 2007 Copier/Coller d’une feuille à l’autre Dans un même classeur.
Garder la forme d'un texte répété dans une autre feuille
Copier plage de celules vers autre feuille sous condition
Copier tableaux vers autre feuille sous condition
Macro Copier ligne vers un autre fichier
(Macro) Copier onglet sur autre fichier Excel (2007)
Windows xp copier fichier répertoire dans excel 2007
Copier feuille 1 dans feuilles 2 et 3 avec mise à jour
copier une cellule dans un autre classeur
Excel 2007 extraction dans un autre fichier
Plus de sujets relatifs à Copier 1 feuille xls dans un autre fichier
 > Tous les forums > Forum Bureautique