Compatibility Mode : Excel XML « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. Excel XML

Compatibility Mode

 
Sub wkbkSave()
    Dim xlVersion As String
    Dim myxlOpenXMLWorkbook As String
    
    myxlOpenXMLWorkbook = "51"
    
    xlVersion = Application.Version
    
    Select Case xlVersion
        Case Is = "9.0", "10.0", "11.0"
            ActiveWorkbook.SaveAs FileName:="LegacyVersionExcel.xls"
        Case Is = "12.0"
            ActiveWorkbook.SaveAs FileName:="Excel2007Version", _
            FileFormat:=myxlOpenXMLWorkbook
    End Select
End Sub








Related examples in the same category

1.Get Schema
2.returns a workbook object with the XML data mapped to your spreadsheet:
3.Programmatically Changing XML Map Properties
4.Refresh Your XML Data
5.Creating Your Own XSD
6.Importing Data into an Existing XML Map
7.Exporting to an XML File
8.Leveraging DOM and XPath to Manipulate XML Files
9.Using DOM with ADO to Convert Excel Data to XML
10.XML transform
11.Export to XML file