ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Getting the workbook number via VBA code (https://www.excelbanter.com/excel-programming/343933-getting-workbook-number-via-vba-code.html)

EAB1977

Getting the workbook number via VBA code
 
Hello ladies and gentleman,

I am stuck with a problem and wondering if someome could help me to
figure it out.

What I want to do is to be able to grab the workbook number from a user
that may have multiple workbooks open at one time.

For example, lets say that a user has workbook1, workbook2 workbook3,
workbook4, and workbook5 open. If you go to the Window Menu, you will
see that it looks like:

1 - workbook1
2 - workbook2
etc...

What I need to grab is the workbook number and place it in my code so I
can call it:

strWorkbookName = Workbooks(Workbooks.Count).Name

I thought that this would bring up the latest workbook that was opened,
but this doesn't seem to be the case.

Any ideas?


Tim Williams

Getting the workbook number via VBA code
 
Do you have any hidden workbooks open (eg. personal.xls) ?

Tim

--
Tim Williams
Palo Alto, CA


"EAB1977" wrote in message
ups.com...
Hello ladies and gentleman,

I am stuck with a problem and wondering if someome could help me to
figure it out.

What I want to do is to be able to grab the workbook number from a user
that may have multiple workbooks open at one time.

For example, lets say that a user has workbook1, workbook2 workbook3,
workbook4, and workbook5 open. If you go to the Window Menu, you will
see that it looks like:

1 - workbook1
2 - workbook2
etc...

What I need to grab is the workbook number and place it in my code so I
can call it:

strWorkbookName = Workbooks(Workbooks.Count).Name

I thought that this would bring up the latest workbook that was opened,
but this doesn't seem to be the case.

Any ideas?




Leith Ross[_126_]

Getting the workbook number via VBA code
 

Hello EAB1977,

You were close. To get all the Workbooks the user has open and stor
them in an array...


Dim strWorkbookName()

ReDim strWorkbooName(Workbooks.Count)

For I = 1 To Workbooks.Count
strWorkbookName(I) = Workbooks(I).Name
Next I

Use ActiveWorkbook.Name to return the current Workbook that the use
is in.

Sincerely,
Leith Ros

--
Leith Ros
-----------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...fo&userid=1846
View this thread: http://www.excelforum.com/showthread.php?threadid=47961



All times are GMT +1. The time now is 05:24 PM.

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