Range Selecting With Activecell

[AT BABU]

Hi folks,

Thank you for my previous problem.
I have small problem for selecting total column form Active cell I writ blow Code but it working I get this error "Run time error '1004'

My Code

Range("ActiveCell", Range("ActiveCell" & Rows.Count)).End(xlDown).Copy

Please help me

 

[Fluff]

If you want the entire column use

ActiveCell.EntireColumn.Copy

 

[JoeMo]

Remove the quote marks - like this:

Range(activecell,activecell.End(xlDown)).Copy

 

[AT BABU]

Thank you ,
But i need form Active cell to at end of the Excel Down(cell 1048576)

 

[JoeMo]

Thank you ,
But i need form Active cell to at end of the Excel Down(cell 1048576)

Try:

Range(activecell,cells(rows.count,activecell.column)).Copy

 

[mikerickson]

Possibly

With ActiveCell
    Range(.Cells, .EntireColumn.Cells(Rows.Count, 1)).Copy
End With

Do you really need all those empty cells at the bottom of the column?

 

[AT BABU]

Hi Mikerickson,

Thank you for your answer.

Do you really need all those empty cells at the bottom of the column?

Just I need only 1000 cells form active cell

 

[mikerickson]

Then

ActiveCell.Resize(1000,1).Copy

should do it

 

[AT BABU]

Thank you Mikerickson it working