<p>How can I put up a "File Open" dialog from some VBA running in Excel?  </p>

<p>I'm using Excel 2003.  </p>

Add a reference to ComDLG32.OCX and then something like...
```
```
Sub PromptForFile()
Dim d As New MSComDlg.CommonDialog

d.Filter = "xls"
d.Filename = "*.xls"
d.ShowOpen

Excel.Workbooks.Open d.Filename

Set d = Nothing
End Sub
```
```