Trapping characters from the activeproject name

[Peter Rooney]

Good morning,

Can anyone advise me as to how I could trap the characters up to the first
space in the activeproject name? So, for example, if the project was called
FRAIMS 26-10-05, I'd trap "FRAIMS", if it was CSL 26-10-05, I'd trap "CSL"
and so on.
I've tried to use the following:

FirstPartLength = Find(ActiveProject.Name, " ")-1

but all this does is display the FIND dialog box.

Thanks in advance

Pete

 

[Jan De Messemaeker]

Good Morning,

Hope this is VBA? The method is Instr as follows
Instr(activeproject.name," ")

HTH

 

[Peter Rooney]

Jan,

That's spot on!

I should have remembered this, but I've had my Excel VBA head on for a few
weeks!

Thanks a lot

Pete

 

[Jan De Messemaeker]

You're welcome, Peter

And BTW... It is a VBA function it is also available in Excel VBA )

 

[Peter Rooney]

Jan,

As Homer would say "DOH!"

Every day in every way, I show my ignorance more and more! )))

Thanks again

Pete

 

[JackD]

You might want to trim() the name first in case of leading spaces. They are
uncommon, but it could happen and cause an error.