EXCEL，通过vba代码从表中的数据创建XML文件

Question

EXCEL

luxom2xlm文件位于https://www.dropbox.com/sh/f3dd2aby8wxpn5x/AAAOqaUV9LvtgrNghMT71AkHa?dl=0

还有截图（因为我不允许在其中插入图片，我没有10个声誉......纠正似乎我错了）

vba code to create a XML - https://www.dropbox.com/s/6vr30uydv9kmgqq/EXCEL_luxom_macro.PNG?dl=0

formula doesn't work "inconsistent error" in excel2013- https://www.dropbox.com/s/mnpaurktpj39o21/EXCEL_luxom_columns.PNG?dl=0

（不幸的是，我只允许每天提出一个问题，所以明天我会打开一个新问题 ...） （不是解决不一致问题的最佳解决方案，但它是我迄今为止唯一发现的问题 - 见评论）

1。 vba代码：创建XML文件

我试图找出'如何'使宏直接从表中提取数据并创建XML文件并通过XSD文件验证它。 手动它会罚款，所以我记录了vba代码。

但不幸的是，这似乎不起作用。

' REF VBA   - http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=162:excel-vba-calling-sub-procedures-a-functions-placement-in-modules&catid=79&Itemid=475
'     EXCEL - http://excelcentral.com

Sub Export2XML()
'
' export2XML Macro
'
'  REF : http://office.microsoft.com/en-gb/excel-help/export-xml-data-HP010206401.aspx
'

'
    Path_Name = Sheets("info").Range("c21").Value ' Path_Name = E:\luxom.xml

    'work sheet luxom_input
    Sheets("luxom_input").Select

    'where Luxom__Elements_In_Output_Map is the root element of the XSD-file
    'which is used as reference

    'method 1 created via a record macro doesn't work
    ActiveWorkbook.XmlMaps("Luxom__Elements_In_Output_Map").export URL:= _
        "E:\luxom.xml"

    'method 2 
    ActiveWorkbook.XmlMaps("Luxom__Elements_In_Output_Map").export URL:= _
        Path_Name
End Sub

2。表：公式不工作不一致错误 （我找到的解决方案 - 见评论）

该公式在EXCEL2010中运行良好，在EXCEL2013中重新输入并识别，但现在我收到错误

微软的帮助都没有解决我的问题

http://office.microsoft.com/en-ca/mac-excel-help/correct-an-inconsistent-formula-HA102927556.aspx

表“luxom_input”，表“T_LuxomInput”，

• 列“O - ID”（地址=固定字符串格式）

  =CONCATENATE([@[networkID]] ;address; [@[groupID]] ;address; TEXT([@[HexAddress]];"00"))

• 在“O - KAST”栏目中

  =IF(AND(IFERROR(FIND(start_02;MID([@Name];1;1))>0;0);MID([@Name];2;1)<(CHAR(CODE(9)+1)));MID([@Name];2;1);"")

有人想让它发挥作用......

您可能需要根据当地人将;更改为,和,更改为.。

Answer 1

stackoverflow.com/questions/15142523/ ...第1部分.MACRO：创建XML文件是＆＃34;非程序员＆＃34; - kris 8月25日和14日16:21