faire un récap d'onglets

K

kyky

Guest
Bonjour,

Ca faisait longtemps que j'étais venue, sympa l'interface...

J'ai un fichier avec des infos par onglets ; tous les onglets contiennent des infos avec les mêmes colonnes. Je voudrais donc faire un nouvel onglet de récap reprenant bout à bout toutes ces infos.

Ex :

Code/Produit/qté/prix pour onglet 'type produit 1' et idem pour l'onglet 'type produit 2' etc
Je veux un récap avec tous les Codes /Produit/qté/Prix de tous les onglets

Merci de votre aide !

ps : j'ai mis l'exemple car on est parfois tellement dans son truc qu'on ne voit pas que c'est pas clair
 

Hervé

XLDnaute Barbatruc
BOnjour kyky, le forum

on a pas vu la pièce jointe, sinon voici le type de code que j'utilise pour faire ceci :


Sub Bouton1_QuandClic()
Dim ws As Worksheet
Dim plage As Range
Dim derligne As Integer

For Each ws In Worksheets
If Not ws.Name = 'RECAP' Then 'a adapter suivant le nom de ta feuille recap
Set plage = ws.Range('a1').CurrentRegion
vala = plage.Rows.Count
Set plage = plage.Offset(1, 0).Resize(plage.Rows.Count - 1, plage.Columns.Count)
With Sheets('RECAP')
derligne = .Range('a65536').End(xlUp).Row + 1
.Cells(derligne, 1).Resize(plage.Rows.Count, plage.Columns.Count).Value = plage.Value
End With
End If
Next ws


End Sub


salut

edition :

la ligne : vala = plage.Rows.Count est un résidu de test à supprimer.

Message édité par: hervé, à: 20/02/2006 16:05
 

Hervé

XLDnaute Barbatruc
Bonsoir kyky, le forum

non non, personne ici ne soupire devant quelqu'un de débutant, je te rassure, on n'est tous passé par là.

en pièce jointe une démo de la macro que je t'ai donnée, avec des commentaires.

une solution par formules est possible me semble-t'il, je crois avoir déjà vu les ténors du forum le faire (enfin je crois)

sinon, si tu as une autre question n'hésites pas.

et accroche toi, tu va voir c'est super simple.

salut [file name=Classeur1_20060220214537.zip size=9235]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060220214537.zip[/file]
 

Pièces jointes

  • Classeur1_20060220214537.zip
    9 KB · Affichages: 30

Discussions similaires

Statistiques des forums

Discussions
312 332
Messages
2 087 362
Membres
103 530
dernier inscrit
Chess01