Cacher is the code snippet organizer for pro developers

' For complete examples and data files, please go to https://github.com/groupdocs-metadata/GroupDocs.Metadata-for-.NET
' path to the out dir
Dim outputDir As String = directoryPath

' get mp3 files only
Dim files As String() = Directory.GetFiles(directoryPath, "*.mp3")

For Each path__1 As String In files
    ' get excel file as byte array
    Dim bytes As Byte() = ExportFacade.ExportToExcel(path__1)

    ' prepare excel file name
    Dim resultFileName As String = String.Format("{0}\{1}.xlsx", outputDir, Path.GetFileNameWithoutExtension(path__1))

    ' remove output file if exist
    If File.Exists(resultFileName) Then
        File.Delete(resultFileName)
    End If

    ' write file to the file system
    File.WriteAllBytes(resultFileName, bytes)
Next