Copier valeur d'une feuille et mise en page vers une autre

Bonjour.

J'ai un fichier excel avec 2 pages(voir piéce jointe)

Une page "récapitulatif" dans laquelle je crée les références pour établir mon devis (avec des articles (P1) ou je peux effectuer des remises et des articles "P2" ou il n'y aura pas de remise

Et une page "devis"avec une mise en page que je souhaite conserver.

Je souhaite que toutes les lignes faisant partie des articles P1 de la page récapitulatif soit intégrées dans la premiere partie de ma feuille devis et idem pour les articles P2.

Je souhaite également que les lignes vide (P1 et P2) dans l'onglet devis soit supprimées afin d'avoir un devis clair sans trou

La liste dans l'onglet récapitulatif est non exhaustive et peut comportée des centaines de références; je souhaite par l'intermédiaire d'un bouton que les références dans "Récapitulatif" soit mise en page dans la feuille devis automatiquement

J'espère avoir été assez clair.

Merci d'avance pour votre aide.

PS: je travaille avec Excel 2003.

Cordialement

74devis.zip (38.77 Ko)

Bonjour

A vérifier : Les lignes ne sont pas supprimées, elles sont masquées

Bonjour Banzai.

C'est presque ça, mais il y a un bug lorsque l'on exécute la macro:

Erreur d'éxécution "1004" La méthode "Autofilter" de l'objet "Range" a échoué.

Range("A1:G" & NbLg).AutoFilter

Je souhaite que les lignes soit masquées uniquement dans la feuille devis et pas dans Récapitulatif.

Mais je pense qu'on est pas loin du but

Edit: c'est bon j'ai trouvé, il manquait : Field:=1 après AutoFilter.

Merci en tout cas Banzai, ça me convient parfaitement

Bonsoir

C'est bizarre ce que tu marques

C'est bien avec le fichier que j'ai posté ?

Je viens de faire plusieurs tests ( appuie plusieurs fois sur le bouton recopie) et pas de bug

Rechercher des sujets similaires à "copier valeur feuille mise page"