基本的なところですみません。 Excel2007 VBAで「実行時エラー438 オブジェクトは、このプロパティまたはメソッドをサポートしていません」となります。 Dim xml As Object Dim objPrice As Object Dim tempWprd As Varient Set xml = CreateObject("Microsoft.XMLDOM") 省略（XMLデータを受信しxmlに代入） Set objPrice = xml.SelectNodes("AAA/BBB/CCC") If Not objPrice Is Nothing Then tempWord = objPrice.text ’★ここでエラー End If というようなコードです。 うまく取れることもあるのですが、objPrice は存在するがtextのメンバがいないということだと思いますが、存在を判定する方法をご教授させてください。そもそも<ccc>文字</ccc>の中の文字（実際は数値）を取得したい場合は、textはダメなのでしょうか？ cccはNothingではないので存在しているように見えるのですが、textが使える場合と使えない場合があるのは理由があり、値がある場合に取得したいと考えています。 存在確認に関しては if (objPrice.text <> Null) then Empty,Nothingなどいろいろ試しましたが、そもそもtextがないようなのでうまくいきません。 すみませんが、よろしくお願いします。
↧