XL 2010 Copier valeurs par macro

[thunder23]

Bonjour le forum,

Je souhaite copier des valeurs d'une feuille à une autre en fonction du mois par macro mais pour le coup je n'ai pas de piste
J'ai mis un fichier en pièce jointe comme exemple.

Merci

 

[sylvanu]

Bonjour Thunder,
En PJ un essai à vérifier.
Je me suis permis de réagencer les mesures, de cette façon le transfert devient simplissime.

Sub CopieValeur()
    NoMois = Month([A7])
    For i = 1 To 10
        [Matrice].Cells(i, NoMois) = [Mesures].Cells(3 * i - 1, 1)
    Next i
End Sub

 

[herve62]

Bonjour
Ici la piste est VAste !!! vas tu recopier :

Température Minimale Extrême (Tnn)
-0,7°	le 15 févr

Ou et Comment ?
Pour faciliter le VBA , il faudrait aussi être plus structuré , à savoir faire un tableau mieux hiérarchisé ou l'on peut trouver des itérations à 1 variable , j'explique : pour chaque type de température on saute d'UNE seule colonne ou d'Une seule ligne donc un tableau regroupé sur 2 lignes ou 2 colonnes
exemple pour Tn Tx soit : G10 , G11 ou en ligne G10 H10 etc ......
L'idéal serait d'adapter en colonnes démarrant Idem sur les 2 feuilles > Tn (recap ) en 11 comme dans mon exemple du fichier
A toi de revoir la structure , ensuite ce sera facile

 

[fanfan38]

Bonjour, salut Hervé62 et Sylvanu
Ma solution par macro...

A+ François

 

[thunder23]

Bonjour, salut Hervé62 et Sylvanu
Ma solution par macro...

A+ François

Bonjour fanfan38, bonjour le forum,

Nickel c'est exactement ça !

Merci et merci à tous pour vos commentaires