thanks , Seem Work. ....

Mario


"Jim Rech" escribió en el mensaje
...
Perhaps...

MsgBox Cells(65536, ActiveCell.Column).End(xlUp).Address

--
Jim Rech
Excel MVP
"Mario Reiley" wrote in message
...
| Thank for respond me but there is a little problem
|
| this way : Application.CountA(ActiveCell.EntireColumn) leave the empty
cells
| without count.
|
| I need to find the last cell in the entire column with data..
|
| You know another way ?
|
| Best regard
| Mario
|
|
| "Jim Rech" escribió en el mensaje
| ...
| MsgBox Application.CountA(ActiveCell.EntireColumn)
|
| --
| Jim Rech
| Excel MVP
| "Mario Reiley" wrote in message
| ...
| | Hi, Group
| |
| |
| |
| | How can I find the how many cells fill in entire column are?
| |
| |
| |
| | a.k In the cell A1 how many cells to have data.
| |
| |
| |
| |
| |
| | Best regard
| |
| | Mario
| |
| |
|
|
|
|