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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Macro pour copier le contenu d'un document excel vers un autre

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Macro pour copier le contenu d'un document excel vers un autre

n°2116802
soulbat2
Posté le 15-12-2011 à 16:07:03  profilanswer
 

Bonjour
j'ai un souci car n'ayant aucune connaissance en VB et Macro, je dois faire une macro qui me permettra de copier le contenu de toutes les feuilles d'un document excel vers un autre document excel. Que'lqu'un pourrait-il m'aider ou m'orienter vers des documents rapidement pris en main. Merci

mood
Publicité
Posté le 15-12-2011 à 16:07:03  profilanswer
 

n°2116971
kiki29
Posté le 16-12-2011 à 19:56:01  profilanswer
 

Salut, surement à adapter pour la plage à copier , les 3 propositions fonctionnent , donc à toi de poursuivre
 

Option Explicit
 
Sub CopieFeuilles()
Dim Ws As Worksheet
Dim Wkb As Workbook
    Application.ScreenUpdating = False
    Set Wkb = Workbooks.Add
    For Each Ws In ThisWorkbook.Worksheets
        'Ws.UsedRange.Copy Wkb.ActiveSheet.Range("A" & Rows.Count).End(xlUp)(2)
        'Ws.UsedRange.Copy Wkb.ActiveSheet.Range("A" & Rows.Count).End(xlUp).Offset(1)
        Ws.Range("4:" & Ws.Range("A" & Rows.Count).End(xlUp).Row).Copy _
                Wkb.ActiveSheet.Range("A" & Rows.Count).End(xlUp)(2)
    Next Ws
 
    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "Test Concatenation.xls", FileFormat:=xlNormal
    ActiveWindow.Close
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub


Message édité par kiki29 le 16-12-2011 à 23:21:39

---------------
Myanmar 90/91 : http://gadaud.gerard.free.fr/publi [...] index.html

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

  Macro pour copier le contenu d'un document excel vers un autre

 

Sujets relatifs
Script TELNET Unix vers WindowsMise a jour d'un site a partir d'un document .txt ?
fichier .csv vers la base de données[VBA Excel] Problème vlookup ne rappatriant que des zéros (RESOLU !)
Afficher du contenu HTML sous condition PHPcomment remplacer le contenu d'une div par celui d'un fichier?
Macro excel supprimer une ligne sous conditionsCalculs financiers avec vba excel
Calcul financiers avec VBA excel 
Plus de sujets relatifs à : Macro pour copier le contenu d'un document excel vers un autre


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