使用 Excel VBA 比较 XML 输入解析列表中的最大数字答案

【问题标题】：Compare largest number among a list of XML input parse using Excel VBA使用 Excel VBA 比较 XML 输入解析列表中的最大数字
【发布时间】：2011-03-08 03:10:45
【问题描述】：

   Set node = xmldoc.SelectNodes("//Attribute[@name='XSHIP_LOCATION']")
   For Each n In node
        result = n.Text
        logmsg = "XSHIP_LOCATION: " & result
        Call PrintLog(logmsg, logline)
   Next n

对于 xml 中包含 name=XSHIP_LOCATION 的每一行，将读取该属性的值。如何比较从 XML 读取的结果列表并选择最高的数字？

结果示例 = 1, 2,1,3,5,4,1,2

我想从从 XML 读取的输入列表中找到最大的数字，在这种情况下使用 5。

任何人都可以帮助这个新手吗？谢谢

【问题讨论】：

我想知道除了分配默认值并将默认值与每个传入的 xml 输入进行比较并在比较后重新分配最大值之外是否有更有效的方法

标签： arrays excel vba numbers compare

【解决方案1】：

为什么不添加第二个变量来捕获最大值，然后通过循环的每次迭代，将最大值与结果进行比较......这样

    result = n.Text   '->your code
    if result > max then max = result
    logmsg = "XSHIP_LOCATION: " & result    '--> your code

请注意，如果 n 不是数字，这将引发错误。

【讨论】：