VBA Word97: bestaanbaarheid document opvragen

[ErikRo]

Sub AutoExec()
' open het laatste Word bestand
On Error Resume Next
RecentFiles(1).Open
ActiveWindow.ActivePane.View.Zoom.Percentage = 100
Selection.EndKey Unit:=wdStory
End Sub

Met dit blokje code haal ik bij het opstarten van Word97 het laatst bewerkte document op, ga naar het einde en zet op normale grootte.

Nu gebeurt het wel eens dat het eerste documnet niet meer aanwezig is.
Met een loopje zou ik eventueel de tweede kunnen checken, etc.

Maar hoe kan ik nou uitvragen of RecentFiles(x).Open wel bestaat?

[OZ-Gump]

Je wilt dus kijken of je de functie FileExists kunt implementeren? In VBA kun je waarschijnlijk al goed uit de voeten met de Dir() functie. Heb ik je in ieder geval 'n hele goede zoektip gegeven

[ Voor 3% gewijzigd door OZ-Gump op 19-02-2004 00:43 ]

[ErikRo]

We gaan eens even kijken thnks

Hij is gelukt
Meteen maar even de recentfiles.count gebruikt om het helemaal netjes te doen.

[ Voor 58% gewijzigd door ErikRo op 19-02-2004 18:58 ]