Boucle imbriquée pour collage plage multiple
Bonjour
voici un petit bout de code qui me permet de sélectionner et préparer à la copie
de plages multiples
je sèche après .copy
Ma question est : comment imbriquer une boucle qui permette de
coller le contenu de selectionAreas(i)
au même endroit F69:G74 de Sheets("HeuresHebdo") _boucle1
au même endroit K69:L74 de Sheets("HeuresHebdo") _boucle2
etc.
Merci par avance de votre aide
Sheets("H1606").Select
Range( _
"F69:G74,K69:L74,P69:Q74,U69:V74,Z69:AA74" & _
",F77:G82,K77:L82,P77:Q82,U77:V82,Z77:AA82" & _
",F93:G98,K93:L98,P93:Q98,U93:V98,Z93:AA98" & _
",F101:G106,K101:L106,P101:Q106,U101:V106,Z101:AA106" _
).Select
NbPlage = Selection.Areas.Count
For i = 1 To NbPlage
Sheets("H1606").Select
Selection.Areas(i).Copy
Sheets("HeuresHebdo").Select
?????????????????????????????????
???????????????????????????????
Next i
Salut Laucsap,
est-ce que je comprends bien? : tu veux copier les premières plages (F69:G74) -et suivantes -->Z- dans les suivantes (F77:G82) et la deuxième vague F93:G98 -et suivantes -->- dans F101:G106 ?
For x = 6 To 26 Step 5
For y = 1 To 2
Range(Cells(53 + (y * 24), x), Cells(58 + (y * 24), x + 1)).Value = Range(Cells(45 + (y * 24), x), Cells(50 + (y * 24), x + 1)).Value
Next
NextA+
bonsoir, curulis57
merci pour ta réponse rapide.
je crois que je me suis fait mal comprendre.
il s’agit de
copier la plage de cellules F69:G74 de la feuille H1606
vers la feuille HeuresHebdo en F69:G74
puis copier la plage de cellules K69:L74 de la feuille H1606
vers la feuille HeuresHebdo en K69:L74
et cela répété autant de fois qu'il y a de plage définies dans la sélection
Range( _
"F69:G74,K69:L74,P69:Q74,U69:V74,Z69:AA74" & _
",F77:G82,K77:L82,P77:Q82,U77:V82,Z77:AA82" & _
",F93:G98,K93:L98,P93:Q98,U93:V98,Z93:AA98" & _
",F101:G106,K101:L106,P101:Q106,U101:V106,Z101:AA106" _
de la feuille H1606
j'espère avoir été plus clair
Salut Laucsap,
voilà ton fichier corrigé.
J'ignore quelles sont les circonstances du choix des plages à copier mais, s'il s'agit de plages dynamiques et calculables, il y a alors sûrement moyen de créer une macro à 'géométrie variable'!
A+