This should access the address of the first entry in recent files
Dim regstring as String
regstring = CreateObject("WScript.Shell").RegRead _
("HKCU\Software\Microsoft\Office\11.0\Powerpoint\Recent File List\File1")
This is for 2003 (v.11) change the 11 for other versions and file number for
other entries