VBA code using Find to locate text and display the Cell Range.

I think I can answer part of your question. To get the row and column of
your active cell, you coud use:
iColumn = ActiveCell.Column
iRow = ActiveCell.Row

I don't know what you mean by "the cell 10 below plus 10 cells down", but if
you want to access the cell 10 rows below the active cell and the same
column, you could use:
ActiveCell.Offset(10, 0)

If you want to select the range from the active cell to the cell 10 rows
below, you could do:
Range(ActiveCell, ActiveCell.Offset(10, 0)).Select

Does that help?
--
Assigning guilt doesn't solve the problem


"slimla" wrote:

> Actually,
>
> What I'm trying to achieve is selecting the Range from a Activecell to a
> specfic number.
>
> Since my Activecell is not constant, that why I have to first use the Find
> Function then select the cell 10 below plus 10 cells down and copy and paste
> it somewhere else.

Thanks that's what I need.

"LabElf" wrote:

> I think I can answer part of your question. To get the row and column of
> your active cell, you coud use:
> iColumn = ActiveCell.Column
> iRow = ActiveCell.Row
>
> I don't know what you mean by "the cell 10 below plus 10 cells down", but if
> you want to access the cell 10 rows below the active cell and the same
> column, you could use:
> ActiveCell.Offset(10, 0)
>
> If you want to select the range from the active cell to the cell 10 rows
> below, you could do:
> Range(ActiveCell, ActiveCell.Offset(10, 0)).Select
>
> Does that help?
> --
> Assigning guilt doesn't solve the problem
>
>
> "slimla" wrote:
>
> > Actually,
> >
> > What I'm trying to achieve is selecting the Range from a Activecell to a
> > specfic number.
> >
> > Since my Activecell is not constant, that why I have to first use the Find
> > Function then select the cell 10 below plus 10 cells down and copy and paste
> > it somewhere else.
>