VBA File Browser

[HerveM1234]

Hi,

Why the syntax :

fileToOpen = Application _
    .GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen  False Then
    MsgBox "Open " & fileToOpen
End If

returns “error 438” ?

How to browse directories using FlexPro VBA ?
Thanks

[HerveM1234]

Hi,

Why the syntax :

fileToOpen = Application _
    .GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen <> False Then
    MsgBox "Open " & fileToOpen
End If

returns “error 438” ?

How to browse directories using FlexPro VBA ?
Thanks

[Bernhard Kantz]

GetOpenFilename() is (as the error 438 states) no part of the FlexPro object model. It is a function from the Win32 API (and also mimicked by MS Office applications).
You may use the FileDialog property to display a file chooser. An example can be found in the online help (Index: FpFileDialog (object), follow Example link).

[Author]

Posts