Paste as Value

[Marcke]

Hi,

I'd like to move some columns and use paste as value. Can I do this with vba?

Thanks in advance,

Wannes

[VBA]'Paste as value should be used
shCalculations.Select
Range("getFirstCalculationColumn:getFirstCalculationColumn+getNumberOfDaysA rchived-1").Copy
Range("getFirstCalculationColumn+1:getFirstCalculationColumn+getNumberOfDay sArchived").Paste
[/VBA]

[Bob Phillips]

[vba]

shCalculations.Select
Columns(getFirstCalculationColumn).Resize(, getNumberOfDaysArchived).Copy
Columns(getFirstCalculationColumn + 1).Resize(, getNumberOfDaysArchived).PasteSpecial Paste:=xlPasteValues
[/vba]

[Marcke]

Hi xld,

Thanks for the help.

It does not work perfect yet though (it copies one column too much), and would like to learn as well. Could you explain what the resize function does?

[Bob Phillips]

Resize does exactly what it says, it resizes the range being processedby the number of rows and/or columns identified.

Columns(getFirstCalculationColumn) is one column, so Resize makes more affected columns.