Deleting workbook in Office EXCEL 2007

  • Thread starter Thread starter Jerry D
  • Start date Start date
J

Jerry D

Good evening ~ I have a problem that is driving me nuts. When I click on the
office button in EXCEL, all of my workbooks appear. There are 3 of the 10 I
no longer use and don't need. I can delete the file thru Open, right ckick
and "delete." However, the name of the file remains in my list when I click
on the Office button. The file is gone but the name remains. How do I get rid
of this??? Please help before I go crazy. Thank you.
 
This works ok for me in xl2003--but I've never tested it in xl2007.

Option Explicit
Sub testme()

Dim iCtr As Long
Dim MRUMax As Long
Dim TestStr As String

With Application.RecentFiles
MRUMax = .Maximum
For iCtr = .Count To 1 Step -1
TestStr = ""
On Error Resume Next
TestStr = Dir(.Item(iCtr).Path)
On Error GoTo 0
If TestStr = "" Then
.Item(iCtr).Delete
End If
Next iCtr
.Maximum = MRUMax
End With

End Sub


If you're new to macros:

Debra Dalgleish has some notes how to implement macros here:
http://www.contextures.com/xlvba01.html

David McRitchie has an intro to macros:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Ron de Bruin's intro to macros:
http://www.rondebruin.nl/code.htm

(General, Regular and Standard modules all describe the same thing.)
 
Back
Top