For those who may find it useful, I have figured it out. Here is th
algorithm:
Code
-------------------
Public Sub GetXML()
Dim objSClient As MSSOAPLib30.SoapClient30 ' soap object to access and expose web service interface
Dim oXML As MSXML2.DOMDocument40 ' xml document object
Dim rst As New ADODB.Recordset ' ADODB recordset
Dim str As New ADODB.Stream ' ADODB stream
' create new soap client
Set objSClient = New SoapClient30
'create new empty XML document
Set oXML = New DOMDocument40
' Point the SOAP API to the web service that we want to call...
' the wsdl file contains the scheme for the webservice
Call objSClient.mssoapinit(par_WSDLFile:="http://localhost/WebService.wsdl")
' Call the web service and load requested XML document in to MSXML DOM document structure
Call oXML.LoadXml(objSClient.GetXMLString())
' open sream
str.Open
' save xml document from web service to stream
oXML.Save str
' set starting position to beginning of stream
str.Position = 0
' open recordset from stream
rst.Open str
' copy recordset to range of cells
Range("A1").CopyFromRecordset rst
Set oXML = Nothing
Set objSClient = Nothing
Set rst = Nothing
Set stream = Nothing
End Su
-------------------
My next step is to figure out how to get the field names from the XM
file
--
brazilnu
-----------------------------------------------------------------------
brazilnut's Profile:
http://www.excelforum.com/member.php...fo&userid=2941
View this thread:
http://www.excelforum.com/showthread.php?threadid=49122