Solved: VBA: Left & Find function Error

[f2e4]

Hi Guys,

I'm trying to use the following function in VBA:

[VBA]projman2 = left(projsect, find("","", projsect) - 1)[/VBA]

Everytime i run the code the "find" word is highlight with the error 'Invalid qualifier'.

Does anyone know what i'm doing wrong here

Thanks again.

F

[MaximS]

post sample for better understanding of your problem

[Bob Phillips]

You are trying to use Excel worksheet functions directly in VBA - oops, down she goes.

[Bob Phillips]

Try

[vba]

projman2 = left(projsect, Instr(",", projsect) - 1)
[/vba]

[f2e4]

Try

[vba]

projman2 = left(projsect, Instr(",", projsect) - 1)
[/vba]

Tried the above and i get a debug error 'Invalid Procedure call'

Example Text:

Smith, John

Result should be:

Smith


When the above code is run, during debug, the text

[VBA]
Instr(",", projsect) - 1
[/VBA]

equals zero '0'.

[Bob Phillips]

Oops, back to front

[vba]

projman2 = Left(projsect, InStr(projsect, ",") - 1)
[/vba]

[f2e4]

Bob,

As always....works perfectly.

thanks a lot