getopenfilename in access

  • Thread starter Thread starter solo_razor
  • Start date Start date
S

solo_razor

Hello,

I have a problem with access. I have used a subroutine from excel tha
uses the getopenfilename control. In acces it won't work. Does anybod
have a solution.

Regards,
Nie
 
to a form, add a Common Dialog Control. Then add a
button. Use the click event on the button to show the
controls "Open" method or "SaveAs" method ...

Private Sub Command0_Click()
Dim fn As String
On Error GoTo trap
With CommonDialog1
.CancelError = True
.ShowOpen
fn = ""
fn = .FileName

End With
Exit Sub

trap:
' cancel clicked

End Sub



Patrick Molloy
Microsoft Excel MVP
 
Back
Top