Hi,
I would like to Name the Excel WorkBook that i create so that by the time i say "Save File"..the file name appears in the File Name Text Box.

Dim ExObj As Excel.Application
Dim WbObj As Excel.Workbook
Dim WsObj As Excel.Worksheet

Private Sub Command1_Click()
Set ExObj = CreateObject("Excel.Application")
Set WbObj = ExObj.Workbooks.Add
Set WsObj = WbObj.Worksheets.Add
....

If you haven't already worked this out, try using the following as the next line in your code -

ExObj.ActiveWorkbook.SaveAs Filename:="myFile.xls"

Thanks for the reply. I have used the following statement based on the return code i get from a confirmation box.

xlApp.Dialogs(xlDialogSaveAs).Show("MyFile.xls")