Mega Code Archive

 

Categories / VisualBasic Script / Application

 

Clearing the Recently Used Files List

Sub clear()     Dim myMax As Long     With Application.RecentFiles         myMax = .Maximum         .Maximum = 0         .Maximum = myMax     End With End Sub