VBA Editor: Browse dialog

Sub BrowseInternet()

    ActiveWorkbook.FollowHyperlink Address:= _
        "http://www.microsoft.com/isapi/redir.dll?prd=ie&ar=iesearch", NewWindow:= _
        False, AddHistory:=True

End Sub

Sorry, jeg mener en fil browser...

Sub FilÅbenDialogboks()
    Flt = "Excel mappe(*.xls),*.xls,"
    Flt = Flt & "Print-filer (*.prn),*.prn,"
    Flt = Flt & "Tekst-filer(*.txt),*.txt"
    Titel = "Min private åben-fil boks"
    fileToOpen = Application _
    .GetOpenFilename(Flt, , Titel)
  If fileToOpen <> False Then
Workbooks.Open Filename:=fileToOpen
    End If
     
End Sub

Takker :)