>Hi all,
> i write a export excel function, i want to exported the excel not call book1 , how can i do to change the excel file name ?
>i mean change the Workbooks.name thank you ~~~
>
>

>
>Dim XL As Excel.Application
>Dim WB As Excel.Workbook
>Dim Sheet As Excel.Worksheet
>
>
>
>                XL = CreateObject("Excel.Application")
>                XL.Visible = True
>
> 
>
>                WB = XL.Workbooks.Add
>                Sheet = WB.ActiveSheet
>
>
>XL.Visible = True
>
>                XL.UserControl = True
>
>                Sheet = Nothing
>
>                WB = Nothing
>
>                XL = Nothing
>

XL.ActiveWorkbook.SaveAs(path and name of the file, Format Of The File)