Xojo Plugin

XLSX Get Sheet Names

Open an Excel spreadsheet (.xlsx) and get the names of the sheets. Xojo Plugin

Dim success As Boolean
success = False

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

// .xlsx files are Zip archives
Dim zip As New Chilkat.Zip
success = zip.OpenZip("qa_data/excel/fakeCompanies.xlsx")
If (success = False) Then
    System.DebugLog(zip.LastErrorText)
    Return
End If

Dim csv As New Chilkat.Csv
Dim sheetNames As New Chilkat.StringTable
success = csv.XlsxGetSheets(zip,sheetNames)
If (success = False) Then
    System.DebugLog(csv.LastErrorText)
    Return
End If

Dim i As Int32
i = 0
While i < sheetNames.Count
    System.DebugLog(sheetNames.StringAt(i))
    i = i + 1
Wend