copy forecast months data in a year period (variable range)

hi Gti182, option

Please Login or Register  to view this content.

that works really well Watersev, only issue is i would like to paste the forecast columns into the same columns in sheet 2, code above pastes it into column A

this is my actual code. The red highlighted part is what i'm struggling with, any help?

[code]
Set ds = Sheets("Data Sheet")
Set du = Sheets("Data Uploader")

LastRow = ds.Range("B" & Rows.Count).End(xlUp).Row

ds.Range(ds.Range("A5:S5").Find("Forecast", , xlValues, xlWhole).Offset(2), ds.Cells(LastRow, 19)).Copy

du.Range("Column?:Row14").PasteSpecial xlPasteValues

Application.CutCopyMode = 0

managed to get this code to work

[code]
Set ds = Sheets("Data Sheet")
Set du = Sheets("Data Uploader")

LastRow = ds.Range("B" & Rows.Count).End(xlUp).Row

cn = ds.Range("A5:S5").Find("Forecast", , xlValues, xlWhole).Column - 1

ds.Range(ds.Range("A7").Offset(0, cn), ds.Cells(LastRow, 19)).Copy

du.Range("A14").Offset(0, cn).PasteSpecial xlPasteValues

[code]