Excel Recent File menu listing

H

HappyGuy

Hi,

In ExcelXP or 2003, is there a way to list the files that
you want to open in the File menu? So, no matter what
other excel files that you opened. The files that you want
is always listed in the File Menu.

Any help would be appreciated.

HappyGuy
 
A

Andy Brown

In ExcelXP or 2003, is there a way to list the files that
you want to open in the File menu?
Click to expand...

Not AFAIK. What I tend to do is record macros in personal.xls to open the
files, e.g.

Sub Home()
Workbooks.Open Filename:= _
"C:\Documents and Settings\Andy\My Documents\home.xls"
End Sub

, then assign the macros to a custom menu (Tools -- Customize -- Commands ;
drag the "New Menu" category to your menu bar, then drag custom menu items
(under Macros) to the new menu).

HTH,
Andy
 
F

Frank Kabel

HI
not possible with build-in functionality as far as I know
you could create a macro/add-in which adds these entries
to your menu (including a userform to change the entries)

Frank
 
R

RagDyer

This is not exactly what you're asking for, but you could look up
"WorkSpace" in the help files and see if that might not be good enough for
you.
A saved workspace file, containing a number of wookbook locations, can be
saved and then easily accessed from your tool bar.
--

HTH,

RD
==============================================
Please keep all correspondence within the Group, so all may benefit!
==============================================

Hi,

In ExcelXP or 2003, is there a way to list the files that
you want to open in the File menu? So, no matter what
other excel files that you opened. The files that you want
is always listed in the File Menu.

Any help would be appreciated.

HappyGuy
 
D

Dave Peterson

Another option:

Create an Index workbook. Just put a bunch of hyperlinks to those files:

=hyperlink("C:\my documents\excel\book1.xls")

You can load this workbook whenever you want and just click to open.
 
D

David

I have the following in a general module in Personal.xls:

Private Sub OpenTheFile()
With Application.CommandBars.ActionControl
Workbooks.Open "C:\DATA\EXCEL\" & .Caption
End With
End Sub

Private Sub AddMenu()
Dim vFile, vFiles
vFiles = Array("MyCheckBook", "foodcost", "Who_Ate", "Attendance Stats",
"TimeSheet", "Sysco Inventory")
With Application.CommandBars("Worksheet Menu Bar")
With .Controls.Add(msoControlPopup, before:=2, temporary:=False)
..Caption = "D&aily Files"
For Each vFile In vFiles
With .Controls.Add(msoControlButton)
..Caption = vFile
..OnAction = "OpenTheFile"
End With
Next
End With
End With
End Sub

I ran AddMenu once so menu was generated and stored in Excel.xlb

I could have then deleted it, but I left AddMenu to facilitate filename
changes as future needs warrant

I wish I could credit those who helped me come up with this, but I forgot
who they were :(
 
Top