copy cell format

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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("D34:D49").Select" step and gives me the following error.

select method of range class failed

Sheets("Sheet2").Select
Range("D9:D24").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet1").Select
Range("D34:D49").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.
 
Back
Top