can't get filedialog to work for save as

[associates]

Hi,

I was wondering if anyone might be able to help me with this. I was trying to get a filedialog popup windows to show up so that user can enter a filename for saving purpose.

The following is the code i got from Access help but didn't work.
Private Sub CM_openfiledialog_Click()
Dim dlgSaveAs As FileDialog

Set dlgSaveAs = Application.FileDialog( _
FileDialogType:=msoFileDialogSaveAs)

dlgSaveAs.Show

End Sub

I got a compiler error saying "user-defined type not defined". it seems not being able to identify the Filedialog.

Any ideas?

Thank you in advance

 

[Oldsoftboss]

Do you have a module that defines the dialog properties?

 

[Oldsoftboss]

http://www.mvps.org/access/api/api0001.htm