XL 2019 Copier range d'une feuille dans une autre avec condition

[WIsh_]

Bonjour à tous,

Je n'arrive pas à transposer le problème suivant en vba.

J'ai une formule dans la colonne J, feuille "source" de mon fichier qui donne une valeur, qui correspond au nombre de ligne à copier à partir de la ligne ou est reprise la valeur vers la feuille "Desti"

Le raisonnement est plus ou moins :
Si J <> 0; récupérer la ligne de J, copier le Union (Range ("A(ligne de J): F(valeur de J)"), Range ("H(ligne de J): I(valeur de J)")) dans la feuille("desti").range(A(première ligne vide))

Lorsque la valeur de la colonne C est "32", le principe est le même mais les cellules à copier, et les cellules de destination, changent.

Mon fichier ci-joint vous apparaitra probablement plus explicite.

Merci d'avance pour votre aide,
Bien cordialement,

Wish

 

[Phil69970]

Bonjour @WIsh_

*Que fait on des données transférées ? On les supprime de la source car autrement à chaque fois on va les recopier ? 🤔

*Tu ne parles pas de la colonne montant2 sauf si colonne C = 32 alors que je vois dans ton exemple que les données (les 0) sont transférées.

@Phil69970

 

[WIsh_]

Bonjour Phil69970,

*le but est d'exécuter la macro une seule fois.
Une fois les données de la feuille source copiées, la feuille source ne sera plus utilisée. Je souhaitais cependant conserver ces données pour en retrouver la trace dans le tableau d'origine si nécessaire.

*La colonne montant2 affiche par défaut 0 si colonne C <> 32.

Bien cordialement,
Wish

 

[Phil69970]

@WIsh_

Non la question ne concerne pas

*La colonne montant2 affiche par défaut 0 si colonne C <> 32.

mais les autres lignes car dans ton exemple les 0 sont reportés voir image

@Phil69970

 

[WIsh_]

Re @Phil69970,

Les 0 peuvent être reportés.
Si ils ne le sont pas c'est ok aussi.
La colonne servira a fournir un total donc cela n'a pas d'impact.

 

[Phil69970]

Re

Voici ton fichier conforme à ta demande

Merci de ton retour.

@Phil69970

 

[WIsh_]

Re Phil,

Merci beaucoup déjà.

Est-ce possible de copier la 1ère ligne en A2 quoiqu'il arrive ?

bàt,
Wish

 

[Phil69970]

Re

Et on la copie avec quelle règle ?

Car si je résume actuellement tu as :

1) Colonne J <> 0
2) Colonne J <> 0 et Colonne C = 32

donc on rajoute
3) 1ere ligne avec règle XXX ?

@Phil69970

 

[WIsh_]

@Phil69970

Ce que je veux dire c'est la 1ère ligne parmi les lignes copiées est collée en A2 dans la feuille desti.

Ici ça se colle en A3.

bàt
Wish

 

[Phil69970]

Re

Voila le fichier la copie démarre à la 1ere ligne...

@Phil69970

 

[WIsh_]

Merci