Récapitulatif - es ce que c'est réalisable ?

Bonjour a tous,

Voila j'ai réalisé un fichier pour effectuer des commandes de vêtements (fichier joint).

j'ai fais un mixe entre formule et macro (pas super douée en macro, vraiment que le Basic).

Donc je voulais savoir si c'est possible de faire un récapitulatif de tout les onglets dans un nouveau onglet a la suite (il peut avoir 5 onglet comme l'exemple comme 50).

le but de cela serait qu'il me reporte les informations qui on été remplie (uniquement remplie). Si je voudrais que le récapitulatif l'un en dessous des autres, c'est pour pouvoir imprimer les éléments des commandes qui servirai de bon de préparation et au lieu d'avoir une page par personne la on pourrai en avoir 2 (c'est une question d’économie de papier).

Cela sera plus simple en voyant le fichier modelè que j'ai fais.

Sinon j'avais une autres idées a savoir si on pouvait combiner 2 onglets pour quelle soit imprimer sur la même page.

A savoir si c'est réalisable ou si c'est une usine a gaz

Merci pour vos avis et votre aide si possible.

Usine à gaz mais parfaitement réalisable

Boucler sur les feuilles, boucler sur les lignes, si lignes remplies alors copier coller dans nouvel onglet à la dernière ligne. Fin.

Je suis sur mon tlf je n'ai pas pu ouvrir tln fichier.

Sub toto()

For each ws in thisworkbook.worksheets

If ws.name <> "nomdetafeuillequetuveuxewclure" and ws.name<>"autrenom" then

For i= 2 to ws.range("a" & ws.rows.count).end(xlup).row

If 'icies critères qui font que la ligne soit remplie then

Ws.range("a" & i).entirerow.copy destination:=sheets("nomfeuillerecap").range("a" &sheets("nomferuillerecap").rows.count).end(xlup).row+1

End if

Next i

End if

Next ws

End sub

Quand tu pourra voir le fichier modelé, ça sera peu être plus simple pour m'aider.

après j'ai dis que je connaissais que le Basic, alors la je suis vraiment perdu.

Mais merci pour l’élément apporté, je vais voir ce que je peu faire avec.