Could someone please tell me how to determine the data type of each char of
a string?

I have worksheets named 'October07'. I need to extract just the month name
first and then
the year number.

I would like to loop thru the string until I find an integer character.

Thanks,
M. Miller

=LEFT(A1,MIN(SEARCH({0,1,2,3,4,5,6,7,8,9},A1&"0123456789"))-1)

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"news.epix.net" <(E-Mail Removed)> wrote in message
news:006BDD4E-20AD-4C95-92C7-(E-Mail Removed)...
> Could someone please tell me how to determine the data type of each char
> of a string?
>
> I have worksheets named 'October07'. I need to extract just the month
> name first and then
> the year number.
>
> I would like to loop thru the string until I find an integer character.
>
> Thanks,
> M. Miller
>
>

You can use isnumeric.

dim lCtr as long
dim myWord as string
dim myStr as string
myWord = "October07"
myStr = ""
for lctr = 1 to len(myword)
if isnumeric(mid(myword, lctr, 1)) then
'get out, we're done
exit for
else
myStr = mystr & mid(myword, lctr, 1)
end if
next lctr
msgbox mystr

(Watch for typos!)

"news.epix.net" wrote:
>
> Could someone please tell me how to determine the data type of each char of
> a string?
>
> I have worksheets named 'October07'. I need to extract just the month name
> first and then
> the year number.
>
> I would like to loop thru the string until I find an integer character.
>
> Thanks,
> M. Miller
>

--

Dave Peterson

Use the =ISNUMERIC() function
--
Gary''s Student - gsnu200752

Missed year number

=MID(A1,MIN(SEARCH({0,1,2,3,4,5,6,7,8,9},A1&"0123456789")),99)

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Bob Phillips" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> =LEFT(A1,MIN(SEARCH({0,1,2,3,4,5,6,7,8,9},A1&"0123456789"))-1)
>
> --
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my
> addy)
>
> "news.epix.net" <(E-Mail Removed)> wrote in message
> news:006BDD4E-20AD-4C95-92C7-(E-Mail Removed)...
>> Could someone please tell me how to determine the data type of each char
>> of a string?
>>
>> I have worksheets named 'October07'. I need to extract just the month
>> name first and then
>> the year number.
>>
>> I would like to loop thru the string until I find an integer character.
>>
>> Thanks,
>> M. Miller
>>
>>
>
>

On Wed, 31 Oct 2007 08:53:26 -0400, "news.epix.net" <(E-Mail Removed)> wrote:

>Could someone please tell me how to determine the data type of each char of
>a string?
>
>I have worksheets named 'October07'. I need to extract just the month name
>first and then
>the year number.
>
>I would like to loop thru the string until I find an integer character.
>
>Thanks,
>M. Miller
>

If your worksheets are all named with the last two characters being numeric,
then

Month = left(ws.name,len(ws.name)-2)
Year = right(ws.name,2) + 2000


--ron