主题：无法导出到指定文件夹，求教

Dim Book As New XLS.Book("E:\onedrive\Doosung\G3K\G3K模板.xlsx")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xlsx" '设置筛选器
dlg.FileName = "G3K" & format(Date.today, "M-d") & ".xlsx"
If dlg.ShowDialog = DialogResult.Ok Then
    book.Build
    Book.Save(dlg.FileName)
    Dim Proc As New Process
    Proc.File = dlg.FileName
    Proc.Start()
End If

刚测试了，还是要手动选择文件夹，我想将生成的表格保存到固定文件夹，比如E:\OneDrive\Doosung\G3K\，请大神多多指教

Dim Book As New XLS.Book("E:\onedrive\Doosung\G3K\G3K模板.xlsx")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
dim file as string = "E:\OneDrive\Doosung\G3K\G3K" & format(Date.today, "M-d") & ".xlsx"
Book.save(file)
Dim Proc As New Process
Proc.File = file
Proc.Start()

谢谢指教，我试下

试试看
    Book.Save("E:\onedrive\Doosung\G3K\G3K模板.xlsx")