copie conditionnelle vers autre feuille

[ivan27]

Bonsoir à tous,

Je n'arrive pas à résoudre un problème de "copie conditionnelle" vers une autre feuille.
J'ai bien trouvé quelques exemples sur le forum mais je ne parviens pas à les adapter.

En pièce jointe un exemple de ce que je cherche à faire.

Une feuille BD dans laquelle se trouve une liste de données.
Une cellule de référence "C2" dans laquelle je note un numéro de la colonne "C".
Lorsque je clique sur le bouton copier, je souhaite que certaines cellules de la liste de données soient copiées à un emplacement précis de la feuille "FICHE".

Merci d'avance pour votre aide.

Cordialement,

Ivan

 

[Fred0o]

Re : copie conditionnelle vers autre feuille

Bonsoir ivan27,

Voici une macro à affecter au bouton "Copier" :

Sub Bouton1_Cliquer()
    Dim sh As Worksheet
    Set sh = Sheets("FICHE")
    sh.[E3] = [C12]
    sh.[E4] = [D12]
    sh.[E5] = [F12]
    sh.[E6] = [H12]
    sh.[E7] = [I12]
    sh.[E8] = [J12]
    sh.[E9] = [L12]
End Sub

A+

 

[ivan27]

Re : copie conditionnelle vers autre feuille

Bonsoir Fred0o et Merci.

Je me suis peut-être mal expliqué.

Si je change la valeur de la cellule de référence "C2", les cellule copiées doivent changer...

Ivan

 

[Fred0o]

Re : copie conditionnelle vers autre feuille

Re-bonsoir,

Je pense donc ne pas avoir compris ce que tu voulais, ou du moins, d'après ton 2° post je ne vois pas à quoi sert le bouton copier.
Je te fais une proposition par formule dans le fichier ci-joint.

A+

 

[ivan27]

Re : copie conditionnelle vers autre feuille

Effectivement, ça fonctionne par formule,

J'avais envisager une solution par macro car la feuille "FICHE" doit être soumise à d'autres calculs et je ne souhaitais pas que les cellules soient "polluées" par des formules. Je jugerai quand mon projet sera finalisé; les formules vont peut-être convenir.

Je t'avoue également que ce type de copie est un besoin qui revient souvent, parfois sur des milliers de lignes et qu'en général les solutions par macro sont plus rapides.

Quoi qu'il en soit, je te remercie et à défaut d'une autre solution, je vais utiliser ta proposition.

@+
Ivan

 

[Fred0o]

Re : copie conditionnelle vers autre feuille

Re-bonsoir,

Voici l'équivalent par macro.

A+

 

[ivan27]

Re : copie conditionnelle vers autre feuille

Merci Beaucoup Fred0o pour cette nouvelle version.
Je m'empresse de l'adapter sur mon fichier original.
@+
Ivan