Macro copier/coller conditionelle

Résolu
kaiser4 Messages postés 109 Date d'inscription   Statut Membre Dernière intervention   -  
kaiser4 Messages postés 109 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je sollicite votre aide pour la création d'une macro.

Voici les conditions:

Je souhaiterais copier Feuille1!D5:F39 en Feuille2!C7:E41 seulement si la case Feuille3!B3="Décembre".

Je m'arrngerais ensuite pour étendre la macro à toute l'année.


Merci pour votre aide.

Cordialement.
A voir également:

3 réponses

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Sub Copier()
If Worksheets("Feuille3").Range("B3") = "Décembre" Then _
Worksheets("Feuille1").Range("D5:F39").Copy Destination:=Worksheets("Feuille2").Range("C7:E41")
End Sub

A+
0
kaiser4 Messages postés 109 Date d'inscription   Statut Membre Dernière intervention   2
 
Merci beaucoup,

J'ai juste oublier de dire que je ne voulais copier/coller que la valeur de la cellule.

Merci !
0
kaiser4 Messages postés 109 Date d'inscription   Statut Membre Dernière intervention   2
 
C'est bon, j'ai modifié la macro pour qu'elle réalise le copier coller spécial valeur.

Merci pour votre aide.

A+
0