Type Info:
Filename As String
Dim Wiz As New ExportWizard ' initialize wizard [...] Wiz.Filename = "C:\ExportFile.xls"