XL 2013 Macro-> Copier => Coller selon Conditions

[Raziel abel]

Bonjour les XldNautes, les Formulistes et Vbistes 🙂

J'ai besoin de vos compétences en VbA.

Ci-dessous, les instructions en espérant que vous puissiez m'aider.


1 – Macro pour le fichier Analyse Induction.

Copier-Coller les nouvelles données du fichier Induction en fonction de la date (colonne K) sur une nouvelle ligne

=> règle Si K Non Vide et >= Aujourdhui() – 30 jours

Exemple : Si K15 = 07/01/2020 on ne prend pas car inférieur à Aujourdhui() – 30

Si K720 = 29/06/2020, on copie les cellules



Cellules sources à copier du fichier Induction : D, E, F, G, K, O,Q



Cellules cibles à coller du fichier Analyse Induction B, C, D, E, F, G, H

! Attention, coller en bas la première cellule vide de la colonne B afin de ne pas écraser les précédentes données.





2 – Macro pour le fichier Induction.

Là, on copie colle les informations en fonction de la date (colonne F) et du numéro d’équipement (colonne E)

=> règle Si F Non Vide et >= Aujourdhui() – 30 jours

En fonction du numéro d’équipement (colonne E du fichier Analyse Induction et colonne G du fichier Induction)

Un espèce de RECHERCHEV en fonction du numéro d’équipement avec condition de date dans le futur à aujourd’hui – 30 jours.



Cellules sources à copier du fichier Analyse Induction : AH, AI, AJ


Cellules cibles à coller du fichier Analyse Induction R, S, T

En vous remerciant par avance,

Cordialement,

Raziel Abel

 

[_Thierry]

Bonjour @Raziel abel , le Forum

Vu que tu n'as pas eu beaucoup de succès avec ta demande, pourtant bien formulée, j'ai mis la main à la patte... En fait j'attendais de voir une solution miracle "PowerQuery" 😉

Par contre je n'ai fait que la première partie 1, dans Macro pour le fichier Analyse Induction.

J'ai géré le fait qu'Induction.xlsx soit déjà ouvert ou pas, pour éviter un bug... Il faut dézipper les deux fichier dans le même folder pour que ça fonctionne.

Je pense que tu pourras t'en inspirer pour faire la partie 2 inverse.

Cependant vu la quatité de données à traiter et que je travaille sur des Object Range directement, ca prend un certain temps, mais ca fonctionne, enfin je te laisse vérifier !

Bonne découverte
@+Thierry

 

[Raziel abel]

Bonjour @Raziel abel , le Forum

Vu que tu n'as pas eu beaucoup de succès avec ta demande, pourtant bien formulée, j'ai mis la main à la patte... En fait j'attendais de voir une solution miracle "PowerQuery" 😉

Par contre je n'ai fait que la première partie 1, dans Macro pour le fichier Analyse Induction.

J'ai géré le fait qu'Induction.xlsx soit déjà ouvert ou pas, pour éviter un bug... Il faut dézipper les deux fichier dans le même folder pour que ça fonctionne.

Je pense que tu pourras t'en inspirer pour faire la partie 2 inverse.

Cependant vu la quatité de données à traiter et que je travaille sur des Object Range directement, ca prend un certain temps, mais ca fonctionne, enfin je te laisse vérifier !


Regarde la pièce jointe 1072097

Bonne découverte
@+Thierry

Ohhhh!!!!!!!!!!!!!!

Je n'avais pas vu ta réponse!!!
Eh bien, cela fonctionne bien.

Je teste et reviens vers toi dès que possible 🙂.

Très Cordialement 🙂