Type mismatch

[mmaule]

What am I doing Wrong?
With:
Public strWorkbookName As String
Public strObjName As String
Where:
strWorkbookName = "GO_GLS_OPS_Agent - SGE Complex Manager"
This:
strObjName = Mid(strWorkbookName, "-" + 2)
Causes:
Run-time error '13':


Type mismatch
Also:
Debug.Print Mid(strWorkbookName, "-" + 2)
Causes:
Run-time error '13':
Type mismatch

[rpeare]

your mid function is not going to work at all, mid function follows the format

mid(STRING, STARTPOSITION, ENDPOSITION)

If you are trying to get a string for everything after the - it would be something more like

trim(right(strWorkbookName, len(strworkbookname) - (instr(strworkbookname, "-") + 1)))

assuming there is only one hyphen in the workbook name. If not and you want to pick up from the last hyphen you'd have to use instrrev instead of instr.

[June7]

Mid function would work with:

Mid(strWorkbookName, InStr(strWorkbookName,"-") + 2)

The EndPosition argument is optional.

[rpeare]

I didn't know it would work without an endpoint! learn something new every day.

[mmaule]

Thanks to all.
The Moderator nailed my omission.
Thank you.