Discussion :

[ahcorad]

Bonjour,

J'aimerais améliorer un bon de commande Excel.
J'ai plusieurs feuilles dans le même classeur et je voudrais regrouper les feuilles avec les cellules non vides (pour la colonne quantité) dans une feuille global.
Pour le moment, je ne vois pas de tutoriel ou d'exemple déjà présent pour m'aider à voir plus clair.

Merci d'avance.

[spaiku]

Bonjour,

les données du problème ne sont pas très claires, mais je crois avoir compris. Ce qui suit correspond-il ?

- Parcourir chaque feuille du classeur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim Wst As Worksheet
For Each Wst In ActiveWorkbook.Worksheets
 
Next Wst

- A l'intérieur de cette boucle, parcourir les lignes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim Lne As Range
For Each Lne In Wst.UsedRange.Rows
 
Next Lne

- Pour chaque ligne parcourue, si la condition qui t'intéresse est remplie (colonne quantité renseignée), tu copies la ligne et tu la colles sur ta feuille de consolidation :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
If Lne.Cells(,x) <> "" Then
    Lne.Select
    Lne.Copy
    With ActiveWorkbook.Worksheets("MaFeuilleDeConso")
        .Activate
        .Cells(.UsedRange.Rows.Count + 1, 1).Select
        .Paste
    End With
End If

Je n'ai pas testé, mais pour te donner des pistes, ça devrait suffire.

[rjamin]

Bonjour,
Vous écrivez

pour m'aider à voir plus clair.

Il faudrait pour cela nous éclairer un peu plus car ce que vous donnez comme renseignements ne permet pas d'avoir une idée précise de ce que vous avez comme structure de feuilles, ni ce que vous voulez obtenir. Vous avez votre classeur sous les yeux vous, nous nous n'avons rien.

Edit : Préciser aussi la version d'Excel utilisée, c'est parfois nécessaire car ce n'est pas toujours les mêmes marche à suivre pour faire les opérations.

[ahcorad]

La version d'Excel utilisée est 2003.
Mon fichier se compose de 4feuilles sur Excel (une feuille par gamme de produits).
Dans ces feuilles, il y a la dénomination des produits + une colonne quantité.

Je voudrais regrouper sur une feuille supplémentaire dans le même fichier, toutes les colonnes (dénomination + quantité) de manière automatique tous les produits dont il y a une quantité.
Derrière ça me laisse une seule page à imprimer au lieu de 4.