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

Extraction de données sous VBA

joseph-53

XLDnaute Nouveau
Feuil1
qualité code Clé
A877 1310 P
A942 1310 P
A986 1290 P
A996 1310 X
A082 1290 X
A269 1467 P
etc… etc… etc…


Feuil2
qualité code Clé
A996 1310 X
A082 1290 X

Par action sur un bouton
La feuil1 est analysée ligne par ligne
Lorsque la clé X est rencontrée, la ligne est alors copiée vers feuil2
Son statut dans feuil1 passe alors de X à P

Bonjour le forum,
Quelqu'un pourrait-il me dépanner sur ce petit problème VBA s'il vous plait ?

Merci beaucoup de votre aide
Cordialement
 

Catrice

XLDnaute Barbatruc
Re : Extraction de données sous VBA

Bonsoir,

ci-joint une version qui fontionne dans les 2 sens
 

Pièces jointes

  • test col-ligne.zip
    17.7 KB · Affichages: 44
  • test col-ligne.zip
    17.7 KB · Affichages: 42
  • test col-ligne.zip
    17.7 KB · Affichages: 46

joseph-53

XLDnaute Nouveau
Re : Extraction de données sous VBA

Bravo Catrice, c'est EXACTEMENT ce que je recherchais......
Bravo et bien merci....

Juste entre deux, pour le prog qui permet la réciproque..... mais rien ne presse....

Bien cordialement et encore Bravo !
 

joseph-53

XLDnaute Nouveau
Re : Extraction de données sous VBA

Bonjour,

Voir dans le fichier joint, Feuil2 la macro parametrable qui devrait faire ce que tu souhaites.
Pour la methode inverse, à suivre ...

Bonsoir Catrice,

Après cette version 'magique' permettant de basculer une présentation de colonnes (feuil2) en lignes (résultat2), je voudrais savoir si tu avais pu trouver une solution permettant l'inverse.... partir d'une présentation comme résultat2 et obetnir Feuil2.

Bien cordialement et merci de ton aide

ps : fichier joint
 

Pièces jointes

  • test col-ligne.xls
    47 KB · Affichages: 40
  • test col-ligne.xls
    47 KB · Affichages: 38
  • test col-ligne.xls
    47 KB · Affichages: 39
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…