XL 2016 Macro VBA pour copier coller une colonne dans une feuille à un endroit spécifique dans une autre

Ben180683

XLDnaute Nouveau
Bonjour à tous,

Ne maîtrisant pas du tout VBA, je me permets vous demandez votre aide pour établir une macro VBA visant à :
1) Copier la colonne d'une feuille
2) Coller cette colonne dans une autre feuille à un endroit précis en fonction de l'année et de la semaine renseignées dans la première feuille.

Pour que ce soit plus parlant, je vous joins un fichier exemple qui traduit ma demande.
(=> L'onglet "Suivi hebdomadaire" correspond à la feuille de départ et "Récap" correspond à la feuille d'arrivée. L'objectif étant que l'onglet "Récap" serve de "sauvegarde")

Merci d'avance!
 

Pièces jointes

  • exemple type.xlsm
    22.5 KB · Affichages: 17

Jacky67

XLDnaute Barbatruc
Bonjour,
Une proposition en PJ
VB:
Sub MAJ()
Dim Col&
 Col = [MATCH('Suivi hebdommadaire'!b3&'Suivi hebdommadaire'!b2,Récap!1:1&Récap!2:2,0)]
 Range(Sheets("Récap").Cells(4, Col), Sheets("Récap").Cells(Rows.Count, Col + 1)).ClearContents
    With Sheets("Suivi hebdommadaire")
        .Range("b6:c" & .Cells.Find("*", , , , xlByRows, xlPrevious).Row).Copy
        Sheets("Récap").Cells(4, Col).PasteSpecial Paste:=xlPasteValues
    End With
    Application.CutCopyMode = False
End Sub
 

Pièces jointes

  • exemple type V1.xlsm
    28.7 KB · Affichages: 76

Discussions similaires

Statistiques des forums

Discussions
312 104
Messages
2 085 349
Membres
102 870
dernier inscrit
Armisa