VBA kode til at overføre data fra et ark til et andet

Godaften Excel hjælpere

Jeg har en udfordring med et kosttilmelding program.

Jeg har to ark, kaldt Tid og Tilmelding. Tilmelding er et ark med indtaastningsceller i kolonne C, E og G. I kolonne B, D F og H er der formler. I celle A2 kan der, via en drop down vælges mellem 25 personer (initialer). I B4 til B10 fremgår datoerne for en bestemt uge. Ugenummer fremgår, via drop down, af celle G2. Indtastningscellerne er altså i

C4:C10
E4:E10
G4:G10

Det er altså de tre områder, og ikke andet, der ønskes kopieret til ark Tid (via en knap) for hver ny person/uge der vælges i A2/G2.

Ark Tid er bygget op på følgende måde:

Kolonne A indeholder datoer (dd-mmmm-åååå) for et helt år og kolonne B indeholder ugenummer for datoen i kolonne A.
Fra kolonne G og ud til kolonne EZ (150 i alt) er der plads til data for de 25 personer. For hver person er der afsat seks kolonner – første person fra kolonne G:L, næste person fra kolonne M:R og så videre, seks kolonner for hver person. Første persons initialer er i G1, næste persons initialer i M1 og så videre. Det der er indtastet i ark Tilmelding for en given person og en given dato skal nu kopieres til ark Tid i de korrekte celler, det vil sige G:I for første person, M:O for anden person, S:U for treje person og så videre. De tre sidste kolonner for hver person, altså J:L for første person, P:R for anden person og så videre skal indeholde formler, men den del behøver VBA koden ikke at omfatte.

https://www.dropbox.com/sh/f0bhsmlpzfwqhi6/AAAPKhKIa7jev2AfqUX49dhAa?dl=0

Al hjælp vil blive værsat.

Hilsen Klaus W