Hello -
I recorded a macro to copy the format of a range of cells on sheet2 to an
equal range of cells on sheet 1. When I run the macro it copies the data
from sheet 2, but then it runs into a problem on the
"Range("D3449").Select" step and gives me the following error.

select method of range class failed

Sheets("Sheet2").Select
Range("D924").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet1").Select
Range("D3449").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Thanks for any info you can give me on this.

I found the problem. I had the code attached to a command button in sheet 2.
I moved the macro to module in the workbook and it works fine now.

"ksh" wrote:

> Hello -
> I recorded a macro to copy the format of a range of cells on sheet2 to an
> equal range of cells on sheet 1. When I run the macro it copies the data
> from sheet 2, but then it runs into a problem on the
> "Range("D3449").Select" step and gives me the following error.
>
> select method of range class failed
>
> Sheets("Sheet2").Select
> Range("D924").Select
> Application.CutCopyMode = False
> Selection.Copy
> Sheets("Sheet1").Select
> Range("D3449").Select
> Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
> SkipBlanks:=False, Transpose:=False
>
> Thanks for any info you can give me on this.