I'm not sure what your question is, but perhaps the following
will be useful.

Worksheets("Sheet6").Range("A1").Value = _
Worksheets("Sheet5").Range("A1").Value


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

"R Doornbosch" wrote in message
...
I can't seem to figure out how to calculate information from
"sheet5" and
place it on sheet6 starting with

A:1
A:2
A:3 and so on.

Any help with the VBA code I need?