は、私は、このXMLを持っている - それは、Excelリボンの_relsファイルです:私は1で、最後の関係要素が存在するかどうかを確認するためにSelectSingleNode
を使用しようとしている名前空間プロパティを使用してXPATHとSELECTSINGLENODE属性
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<Relationships xmlns="http://schemas.openxmlformats.org/package/2006/relationships">
<Relationship Id="rId3" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/extended-properties" Target="docProps/app.xml"/>
<Relationship Id="rId2" Type="http://schemas.openxmlformats.org/package/2006/relationships/metadata/core-properties" Target="docProps/core.xml"/>
<Relationship Id="rId1" Type="http://schemas.openxmlformats.org/officeDocument/2006/relationships/officeDocument" Target="xl/workbook.xml"/>
<Relationship Id="cuID14" Type="http://schemas.microsoft.com/office/2007/relationships/ui/extensibility" Target="customUI/customUI14.xml"/>
</Relationships>
Type
属性をチェックすることにより、「cuID14」というIDを取得する。リレーションシップ要素にxmlns属性がない場合(つまり、2行目をRelationships>
に変更した場合)に動作するコードがあります。私はそれをやろうとしていますが、文法を働かせることはできません。例に過ぎないの
Sub CheckForAttribute()
Dim oXMLDoc As MSXML2.DOMDocument60
Dim oXMLElement As MSXML2.IXMLDOMElement
Dim XmlRelsNamespace As String
XmlRelsNamespace = "xmlns:rels='http://schemas.openxmlformats.org/package/2006/relationships'"
Set oXMLDoc = New MSXML2.DOMDocument60
oXMLDoc.SetProperty "SelectionNamespaces", XmlRelsNamespace
oXMLDoc.Load "C:\Users\doug\XPATH_TESTER.xml"
'The following line works if the Relationships element to just <Relationships>
Set oXMLElement = oXMLDoc.SelectSingleNode("//Relationship[@Type='http://schemas.microsoft.com/office/2007/relationships/ui/extensibility']")
End Sub
私が見つけたたくさん定義された名前空間を持つ属性を使用しています。ここでのxmlns合併症なしで動作SelectSingleNode
機能を持つ私のコードです。私はoXMLDoc.SelectSingleNode("//rels:Relationship[@rels:Type='http:
のようなものを試しました...
ありがとう!私はそれが私が最初に試みたことを誓うことができました。私がビザンチンの道を進んでこれを(XML/XPATHのコーディングに新しい:-))得るためには、これは明らかな選択でした。しかし、今、それは動作し、私はこのウサギの穴の前にやろうとしていたことを何でもすることができます。とても有難い! –