Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Copier valeurs par macro

thunder23

XLDnaute Occasionnel
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
 

Pièces jointes

  • testcopie.xlsx
    303.8 KB · Affichages: 13

sylvanu

XLDnaute Barbatruc
Supporter XLD
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.
VB:
Sub CopieValeur()
    NoMois = Month([A7])
    For i = 1 To 10
        [Matrice].Cells(i, NoMois) = [Mesures].Cells(3 * i - 1, 1)
    Next i
End Sub
 

Pièces jointes

  • testcopie (V1).xlsm
    309.2 KB · Affichages: 2

herve62

XLDnaute Barbatruc
Supporter XLD
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
 

Pièces jointes

  • Copie de testcopie.xlsx
    304.1 KB · Affichages: 3

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…