ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   refering to filename in VB (https://www.excelbanter.com/excel-programming/367694-refering-filename-vbulletin.html)

BrownTing[_3_]

refering to filename in VB
 

Hi Guys,

From time to time, people rename files. I want to read the file name of
an open workbook and store it as a variable. Essentially, avoiding the
whole hardcoding the actual file name.


Any Ideas guys?


--
BrownTing
------------------------------------------------------------------------
BrownTing's Profile: http://www.excelforum.com/member.php...o&userid=34919
View this thread: http://www.excelforum.com/showthread...hreadid=562913


NickHK[_3_]

refering to filename in VB
 
You will still need to know the file name (or ask the user to supply it) in
order to open the workbook. Once there can set a refernce to it and use that
through out your code. e.g.
Dim WB As Workbook
Private sub cmdOpenFile()
Dim RetVal As Variant
RetVal=Application.GetopenFileName()
If RetVal<False Then
Set WB=Workbooks.Open(RetVal)
End If
End Sub

Is that what you mean ?

NickHK

"BrownTing" ¼¶¼g©ó¶l¥ó·s»D:BrownTing.2b78t5_1153324012.5459@ex celforum-nospam.com...

Hi Guys,

From time to time, people rename files. I want to read the file name of
an open workbook and store it as a variable. Essentially, avoiding the
whole hardcoding the actual file name.


Any Ideas guys?


--
BrownTing
------------------------------------------------------------------------
BrownTing's Profile:
http://www.excelforum.com/member.php...o&userid=34919
View this thread: http://www.excelforum.com/showthread...hreadid=562913




RB Smissaert

refering to filename in VB
 
ActiveWorkbook.FullName
or
ThisWorkbook.FullName

RBS


"BrownTing" wrote
in message ...

Hi Guys,

From time to time, people rename files. I want to read the file name of
an open workbook and store it as a variable. Essentially, avoiding the
whole hardcoding the actual file name.


Any Ideas guys?


--
BrownTing
------------------------------------------------------------------------
BrownTing's Profile:
http://www.excelforum.com/member.php...o&userid=34919
View this thread: http://www.excelforum.com/showthread...hreadid=562913



BrownTing[_4_]

refering to filename in VB
 

thanks,

i'll give it a shot...

i'm going to trying and use ActiveWorkbook.Name and see what happens


--
BrownTing
------------------------------------------------------------------------
BrownTing's Profile: http://www.excelforum.com/member.php...o&userid=34919
View this thread: http://www.excelforum.com/showthread...hreadid=562913


BrownTing[_5_]

refering to filename in VB
 

I used the following;

Dim BLABLA
BLABLA = ActiveWorkbook.Name 'records the file name if it ever
changed.
MsgBox "sdfsags " & BLABLA
Workbooks(BLABLA).Activate

I have a problem with putting a variable as the particular workboo
name.
I'm just wondering if this is the right syntax.

Workbooks(BLABLA).Activat

--
BrownTin
-----------------------------------------------------------------------
BrownTing's Profile: http://www.excelforum.com/member.php...fo&userid=3491
View this thread: http://www.excelforum.com/showthread.php?threadid=56291


NickHK

refering to filename in VB
 
But the filename cannot not change whilst the WB is open.

dim WB as workbook
set wb=activeworkbook

msgbox wb.name
wb.activate

NickHK

"BrownTing" wrote
in message ...

I used the following;

Dim BLABLA
BLABLA = ActiveWorkbook.Name 'records the file name if it every
changed.
MsgBox "sdfsags " & BLABLA
Workbooks(BLABLA).Activate

I have a problem with putting a variable as the particular workbook
name.
I'm just wondering if this is the right syntax.

Workbooks(BLABLA).Activate


--
BrownTing
------------------------------------------------------------------------
BrownTing's Profile:

http://www.excelforum.com/member.php...o&userid=34919
View this thread: http://www.excelforum.com/showthread...hreadid=562913





All times are GMT +1. The time now is 11:23 AM.

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