请教用VBA读XML文件的问题,非常感谢！-经管之家官网！

文件A.XML如下：
<?xml version="1.0" encoding="iso-8859-1"?>
<ExportCR Date1="0109" xsi:noNamespaceSchemaLocation="exportCR.xsd" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<CR Date2="0108">
<Response R_ID="12345"><![CDATA[This is a badresponse.]]></Response>
<ID Destination="HH">10001</ID>
<ID Destination="BB">10002</ID>
</CR>
<CR Date2="0107">
<Response R_ID="67890"><![CDATA[This is a good response.]]></Response>
<ID Destination="HH">2001</ID>
<ID Destination="BB">3003</ID>
</CR>
</ExportCR>
当然，我的文件里有几百个这样的record,上面我只是选取了2个record.
我想读成以下的格式：
Date1 Date2 R_ID Response Destination ID Destination ID
可是如果用EXCEL直接IMPORT XML文件，它把最后的两组Destination ID分成了两行，但是大家可以看到，其实这两组是属于同一个CR里面的。
我能用EXCEL读出来的是这样的：
Date1 Date2 Response R_ID ID Destination
109 108 This is a badresponse. 12345 10001 HH
109 108 This is a badresponse. 12345 10002 BB
109 107 This is a good response. 67890 2001 HH
109 107 This is a good response. 67890 3003 BB
但是我希望是这样的：
Date1 Date2 Response R_ID ID Destination ID2 Destination3
109 108 This is a badresponse. 12345 10001 HH 10002 BB
109 107 This is a good response. 67890 2001 HH 3003 BB
朋友帮写了一个perl的东西，但是对perl特别不了解，所以特来请教VBA高手，如何用VBA解决这个问题？
BTW,我的EXCEL有03版的，有07版的。
不胜感激！！