ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Extract Workbook name from pathname ? (https://www.excelbanter.com/excel-programming/278306-extract-workbook-name-pathname.html)

Don Wiss

Extract Workbook name from pathname ?
 
Using Application.GetOpenFilename I can find what file the user would like
to open. But before opening I want to be sure the file isn't already open.
Having the filename I can loop through the set of Application.Workbooks and
check. Problem is the GetOpenFilename returns the full pathname, and
Workbooks is a list of filenames only. So how do I easily extract the
filename from the pathname? I looked around and could not find a function.
If I have to I can loop through the name, find the slash (or colon), and do
a Right. But I would think that there is an easier way.

Thanks, Don <donwiss at panix.com.

Bill Li

Extract Workbook name from pathname ?
 
Don,

Try ActiveWorkbook.Path

Best Regards

Bill
-----Original Message-----
Using Application.GetOpenFilename I can find what file

the user would like
to open. But before opening I want to be sure the file

isn't already open.
Having the filename I can loop through the set of

Application.Workbooks and
check. Problem is the GetOpenFilename returns the full

pathname, and
Workbooks is a list of filenames only. So how do I easily

extract the
filename from the pathname? I looked around and could not

find a function.
If I have to I can loop through the name, find the slash

(or colon), and do
a Right. But I would think that there is an easier way.

Thanks, Don <donwiss at panix.com.
.


Don Wiss

Extract Workbook name from pathname ?
 
On Mon, 29 Sep 2003 16:54:00 -0700, Bill Li wrote:

On Mon, 29 Sep 2003 19:25:58 -0400, Don Wiss wrote:

Using Application.GetOpenFilename I can find what file the user would like
to open. But before opening I want to be sure the file isn't already open.
Having the filename I can loop through the set of Application.Workbooks and
check. Problem is the GetOpenFilename returns the full pathname, and
Workbooks is a list of filenames only. So how do I easily extract the
filename from the pathname? I looked around and could not find a function.
If I have to I can loop through the name, find the slash (or colon), and do
a Right. But I would think that there is an easier way.


Try ActiveWorkbook.Path


Uh, how does that help me? I have a pathname in a string variable. (A
pathname in a string variable is the result of GetOpenFilename.) What
ActiveWorkbook I have open, and is running the macro, is irrelevant to the
problem.

Don <donwiss at panix.com.

Bill Li

Extract Workbook name from pathname ?
 
Try
s = Application.GetOpenFilename()

s1 = Dir(s)

s2 = Mid(s, 1, Len(s) - Len(s1))

s1 is the filename
s2 is the pathname

-----Original Message-----
On Mon, 29 Sep 2003 16:54:00 -0700, Bill Li

wrote:

On Mon, 29 Sep 2003 19:25:58 -0400, Don Wiss wrote:

Using Application.GetOpenFilename I can find what file

the user would like
to open. But before opening I want to be sure the file

isn't already open.
Having the filename I can loop through the set of

Application.Workbooks and
check. Problem is the GetOpenFilename returns the full

pathname, and
Workbooks is a list of filenames only. So how do I

easily extract the
filename from the pathname? I looked around and could

not find a function.
If I have to I can loop through the name, find the

slash (or colon), and do
a Right. But I would think that there is an easier way.


Try ActiveWorkbook.Path


Uh, how does that help me? I have a pathname in a string

variable. (A
pathname in a string variable is the result of

GetOpenFilename.) What
ActiveWorkbook I have open, and is running the macro, is

irrelevant to the
problem.

Don <donwiss at panix.com.
.


Tom Ogilvy

Extract Workbook name from pathname ?
 
fName = Application.GetOpenFileName()
for each bk in Workbooks
if ucase(bk.fullname) = ucase(fName) then
' workbook is open
end if
Next

--
Regards,
Tom Ogilvy

"Don Wiss" wrote in message
...
On Mon, 29 Sep 2003 16:54:00 -0700, Bill Li wrote:

On Mon, 29 Sep 2003 19:25:58 -0400, Don Wiss wrote:

Using Application.GetOpenFilename I can find what file the user would

like
to open. But before opening I want to be sure the file isn't already

open.
Having the filename I can loop through the set of Application.Workbooks

and
check. Problem is the GetOpenFilename returns the full pathname, and
Workbooks is a list of filenames only. So how do I easily extract the
filename from the pathname? I looked around and could not find a

function.
If I have to I can loop through the name, find the slash (or colon), and

do
a Right. But I would think that there is an easier way.


Try ActiveWorkbook.Path


Uh, how does that help me? I have a pathname in a string variable. (A
pathname in a string variable is the result of GetOpenFilename.) What
ActiveWorkbook I have open, and is running the macro, is irrelevant to the
problem.

Don <donwiss at panix.com.





All times are GMT +1. The time now is 06:22 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com