Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Possible ou pas de faire ce genre de macro??

megansport

XLDnaute Junior
Bonjour

Ayant plusieurs fichiers avec comprenant plusieurs onglets,j'ai besoin d'automatiser la manipulation si cela est possible, j'ai mis en piéce jointe un fichier afin de representer ce que je veux.

Merci de votre aide
 

Pièces jointes

  • essaie3.xlsx
    13.3 KB · Affichages: 66

tototiti2008

XLDnaute Barbatruc
Re : Possible ou pas de faire ce genre de macro??

Bonjour megansport,

un essai

Ceci dit, si la question suivante pouvait être agrémentée d'une phrase expliquant un peu plus clairement le besoin, je ne dis pas non...
 

Pièces jointes

  • test.xls
    43 KB · Affichages: 45
  • test.xls
    43 KB · Affichages: 44
  • test.xls
    43 KB · Affichages: 41

david84

XLDnaute Barbatruc
Re : Possible ou pas de faire ce genre de macro??

Bonjour,
à tester :
Code:
Sub test()
Dim i As Byte, DerLig As Long
Sheets(1).[A2].CurrentRegion.ClearContents
For i = 2 To Sheets.Count
    DerLig = Sheets(1).Range("A" & Sheets(1).Rows.Count).End(xlUp).Row
    Sheets(Sheets(i).Name).[A2].CurrentRegion.Copy Destination:=Sheets(1).Cells(DerLig + 1, 1)
Next i
End Sub
A+
Edit : salut Marc !
 

JNP

XLDnaute Barbatruc
Re : Possible ou pas de faire ce genre de macro??

Bonsoir MeganSport, Marc, David ,
Une solution par formule ...
Bonne suite
 

Pièces jointes

  • essaie3(1).xlsx
    15.1 KB · Affichages: 56

Discussions similaires

Réponses
1
Affichages
266
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…