macro wegschrijven ander tabblad

[Norbert1964]

Hoi allemaal,

ik wil een macro maken om de gegevens uit cellen b29 t/m b31
weg te schrijven naar tabblad TOTAAL. Ik wil dat ze in de juiste rij komen volgens het weeknummer
als ik een macro opneem krijg ik de verwijzing #REF!

Waar ga ik de fout in? Heeft iemand een goede oplossing?

NorbertBekijk bijlage CURSUS.xls

 

[VenA]

Je moet de gegevens als waarde plakken. Dat kan met pastespecial xlpastevalues

als alternatief

Sub weg()
  Sheets("TOTAAL").Cells(2, 2).Resize(, 3) = Application.Transpose(Sheets("INGAVE").Cells(29, 2).Resize(3).Value)
End Sub

 

[Norbert1964]

Ja dat werkt goed, maar hoe houd ik rekening met de inkomsten per weeknummer?

 

[VenA]

Dat is afhankelijk van hoe het bestand eruit ziet als je meerdere weken ingevoerd hebt.

 

[Norbert1964]

wegschrijven ander tabblad

Hoi VenA
Ik heb in dit voorbeeld in cellen A1722 de week gegevens staan van een week.
in cel A17 staat het weeknummer.

Ik wil de gegevens onder elkaar hebben in tabblad totaal.
Als ik het weeknummer aanpas in cel A17 van b.v. 1 naar 2
zouden de gegevens bij het tabblad totaal op die manier bij het goede weeknummer terecht komen?
Norbert

 

[VenA]

In cel A17 staat geen weeknummer maar er staat Week en een spaties en dan vervolgens een nummer. Details zijn belangrijk voor het maken van VBA.

Sub weg()
  Sheets("TOTAAL").Cells(1, 2).Offset(Val(Split(Sheets("INGAVE").[A17])(1))).Resize(, 3) = Application.Transpose(Sheets("INGAVE").Cells(29, 2).Resize(3).Value)
End Sub

 

[Norbert1964]

VenA sorry voor de onduidelijkheid mijnerzijde.
Bedankt voor de oplossing. Het is wat ik zocht.

Norbert