R
Rene Muench
Hi there,
I am running AccessXp and want to make use to the new filedialog object.
the references are set to: VBA, MS Access 10.0 Object Library, Ole
Automation, Microsoft Office 10.0 Object library,
Ms Dao 2.5/3.5 compatible library.
Public Function GetXXXfilePath() as String
Dim objDlg as Office.Filedialog
Const Open_button = -1
Set objDlg = Application.Filedialog( _
FileDialogType:=msoFileDialogOpen)
'Now access complains that it can't find the named Argument "FileDialog"
(Error448)!!!???
' what am I missing or could I do differently???
'........and further more
End Function
Kind regards
Norman
I am running AccessXp and want to make use to the new filedialog object.
the references are set to: VBA, MS Access 10.0 Object Library, Ole
Automation, Microsoft Office 10.0 Object library,
Ms Dao 2.5/3.5 compatible library.
Public Function GetXXXfilePath() as String
Dim objDlg as Office.Filedialog
Const Open_button = -1
Set objDlg = Application.Filedialog( _
FileDialogType:=msoFileDialogOpen)
'Now access complains that it can't find the named Argument "FileDialog"
(Error448)!!!???
' what am I missing or could I do differently???
'........and further more
End Function
Kind regards
Norman