SaveWorkBook

Syntax

XLS.SaveWorkBook [wbName], filename[, FileFormat][, Password][, MakeBackup]

Description

Saves the selected workbook.

Parameter	Description
wbName	String, optional. Holds the name of the workbook to be stored in file. If omitted or when zero-length string, the active workbook will be stored.
filename	String, required. The full path and name of the file that the selected workbook is stored in.
FileFormat	Enumerated, optional. Can be one of the following values: xlSaveDefault (this is the default value when omitted) xlSaveDIF xlSaveExcel9795 xlSaveHTML xlSaveWindowsCSV
Password	String, optional. When the file needs to be password protected, this parameter must hold the valid password for the file.
MakeBackup	Boolean, Optional. When True, the save operation in Excel automatically created a backup file of the previous version.

See Also

AddWorkBook, OpenWorkBook

Example

Sub Main
 
Dim mySheets() As String
Dim x As Integer
 
   If Not XLS.AppInit() Then Exit Sub
 
   XLS.AppVisible = True
 
   XLS.AddWorkBook
   XLS.AddWorkSheet "Test1"
   XLS.AddWorkSheet "Test2"
   XLS.AddWorkSheet "Test3"
   XLS.AddWorkSheet "Test4"
 
   XLS.SaveWorkBook , "o:\AdminSQL\Scripts\mijntest.xlsx"
 
   XLS.CloseWorkBook , False
 
   XLS.OpenWorkBook "o:\AdminSQL\Scripts\mijntest.xlsx"
 
   XLS.ListWorkSheets mySheets()
 
   For x = 1 To UBound(mySheets)
      Debug.Print mySheets(x)
   Next x
 
   XLS.AppClose
 
End Sub