åbne en txt fil via dialogboks i office2k

Jeg skal bruge en stump kode til at åbne en tekstfil fra harddisken via en "open dialogboks". jeg har lavet en til office XP der lyder:

Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog( _
    FileDialogType:=msoFileDialogOpen)
With dlgOpen
    .AllowMultiSelect = False
    .Title = "Vælg Datainput"
    .InitialFileName = ActiveDocument.Path & "\*.txt"
    If .Show = True Then ' dialogboksen åben vises
        filnavn = .SelectedItems(1) 'valgt sti og filnavn lægges i variablen filnavn
        var = 1
    Else
        MsgBox "Import Annulleret"
        var = 0
    End If
End With

nu er det bare sådan at det ikke virker med office200 (application.filedialog eksisterer ikke).

så jev ville høre om der er nogle andre der har en ide til hvordan man kan klare det i office2000 :)