gibt es in Excel 2003 die folgende Syntax?
IsExportable
SaveAsXMLData
mfg Hubert
Sub ExportAsXMLData()
Dim objMapToExport As XmlMap
Set objMapToExport = ActiveWorkbook.XmlMaps("Customer")
If objMapToExport.IsExportable Then
ActiveWorkbook.SaveAsXMLData "Customer Data.xml", objMapToExport
Else
MsgBox "Cannot use " & objMapToExport.Name & _
"to export the contents of the worksheet to XML data."
End If
End Sub