traverse until non integer

[evil baby]

here is the problem I have. I'm trying to condition format a few different lines. As it stands now it will go across the spreadsheet until a zero value is found, however I would like it to keep going until it reaches a non integer value.

for example:

Jan Feb Mar Apr Jun Jul Aug Sep Oct Nov Dec YTD Calctype
25 50 21 96 cumulative


so I would like the macro to check all the values until it reaches the word "cumulative"

[Tom Ogilvy]

rw = 1 ' set to row you want to traverse
i = 1
do while lcase(cells(rw,i) <> "cumulative"


i = i + 1
Loop


another possibility

set rng = cells(rw,"IV").End(xltoLeft)
lastcol = rng.column

--
Regards,
Tom Ogilvy




"evil baby" <[email protected]> wrote
in message news:[email protected]...
>
> here is the problem I have. I'm trying to condition format a few
> different lines. As it stands now it will go across the spreadsheet
> until a zero value is found, however I would like it to keep going
> until it reaches a non integer value.
>
> for example:
>
> Jan Feb Mar Apr Jun Jul Aug Sep Oct Nov Dec YTD Calctype
> 25 50 21
> 96 cumulative
>
>
> so I would like the macro to check all the values until it reaches the
> word "cumulative"
>
>
> --
> evil baby
> ------------------------------------------------------------------------
> evil baby's Profile:
http://www.excelforum.com/member.php...o&userid=31983
> View this thread: http://www.excelforum.com/showthread...hreadid=517844
>