Reading a string for the end

[Anonymous]

I need to read a string from the last character forward to find the first (actually the last in the string) time a character appears. VB has the InStrRev function but VBA doesn't seem to understand that. I am using the thisdrawing.fullname to read the current drawing name and path and I want to read the file name without the path. Is there an easy way to do this?

[Ed__Jobe]

Why do you say it is not recognized? Works for me. Perhaps you just have a syntax error? You could also try the GetBaseName method of the FileSystemObject. -Ed

[Anonymous]

I am using ACAD 2000 and it not only doesn't have instrrev it does not have the getbasename. Any other ideas?

[Anonymous]

Use thisdrawing.name instead of
fullname.

Bud

style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">

"gocaps" <
href="mailto:stephen_hay@hgsi.com">stephen_hay@hgsi.com> wrote in
message
href="news:f10ecc9.-1@WebX.maYIadrTaRb">news:f10ecc9.-1@WebX.maYIadrTaRb...

I
need to read a string from the last character forward to find the first
(actually the last in the string) time a character appears. VB has the
InStrRev function but VBA doesn't seem to understand that. I am using the
thisdrawing.fullname to read the current drawing name and path and I want to
read the file name without the path. Is there an easy way to do
this?

[Ed__Jobe]

I can't remember when acad went from vba 5.0 to 6.0, but its possible that InStrRev was not in 5.0. Try typing the function in lowercase and see if Intellisense corrects it. If you have a reference to a missing file, it can cause vba to break on a regular vba function. It usually likes to stop on the MID function. But, the FileSystemObject is in the scripting runtime. Set a reference to "Microsoft Scripting Runtime". For more help, look at MSDN.microsoft.com.