2017-07-01 22 views

答えて

0

あなたはこのようRecentFilesコレクションから、ブックのエントリを削除することができます

Dim r As RecentFile 
Dim wb As Workbook 

' Change this to point to the workbook to be removed from the jump list 
Set wb = ThisWorkbook 

For Each r In Application.RecentFiles 
    If r.Path = wb.FullName Then 
     r.Delete 
     Exit For 
    End If 
Next r 
関連する問題