Skip to content

Instantly share code, notes, and snippets.

@albertzsigovits

albertzsigovits/excelfileformats.txt

Created September 20, 2023 11:32
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save albertzsigovits/bbfbdaa633fe5c9e73ae3947fadd87db to your computer and use it in GitHub Desktop.
Save albertzsigovits/bbfbdaa633fe5c9e73ae3947fadd87db to your computer and use it in GitHub Desktop.
Download ZIP
EnumExcelFormat
Raw
excelfileformats.txt
Sub x()
On Error Resume Next
For i = 0 To 100
If i < 10 Then f = "out\0" & i Else f = "out\" & i
ActiveWorkbook.SaveAs Filename:=f, FileFormat:=i
Next i
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment