Please help to copy in a range
 

I given the following command to copy in a range upto end of the column of
that cell in a macro. the error message is 'Autofill mathod range class
failed ' given by the system
But it is not working . Please help me with correct command

Selection.AutoFill Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)

Please help to copy in a range
 

Hi,

You must copy the range before filling. Try this

Selection.Copy Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)

Mike

"pol" wrote:


I given the following command to copy in a range upto end of the column of
that cell in a macro. the error message is 'Autofill mathod range class
failed ' given by the system
But it is not working . Please help me with correct command

Selection.AutoFill Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)

Please help to copy in a range
 

thanks a lot


"pol" wrote:


I given the following command to copy in a range upto end of the column of
that cell in a macro. the error message is 'Autofill mathod range class
failed ' given by the system
But it is not working . Please help me with correct command

Selection.AutoFill Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)

Please help to copy in a range
 

"Mike H" wrote:

Hi,

You must copy the range before filling. Try this

Selection.Copy Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)

Mike

"pol" wrote:


I given the following command to copy in a range upto end of the column of
that cell in a macro. the error message is 'Autofill mathod range class
failed ' given by the system
But it is not working . Please help me with correct command

Selection.AutoFill Destination:=Range("O2:O" & Cells(Rows.Count,
"O").End(xlUp).Row)