Writing data from one column and writing it to another

There are many ways you could do this...

Here's one way I would probably do it...

Please Login or Register  to view this content.

Multiple problems.

Range("R1").CurrentRegion will not give you a range in column R, it will give you the region that contains R1. A region may include any number of rows and columns. A region is defined as the area containing the specified range bounded by blank rows and blank columns.

Range("A27:A") is not a valid range expression. That gives you a runtime error.

If you want to copy all of the data in column R starting in row 1 to column A starting in row 27, here is one way:

Please Login or Register  to view this content.

Note that will copy cells, not values. There are other ways to do this as well, depending on exactly what result you want.

ETA: jeffrey's solution will copy just the values, which is maybe what you really want to do.

A way to copy values is

Please Login or Register  to view this content.

Not better or worse, just another method.