Kann ich in Excel 2010 VBA einen asynchronen XML-Aufruf durchführen?

Question

In meiner Tabelle habe ich einen Verweis auf die MS XML v3-Bibliothek.

Hier ist mein Beispielcode

Option Explicit 


Private objConn As XMLHTTP30 


Public Sub HandleAsyncEvent() 
    Debug.Print "Done" 
End Sub 

Public Function InitService(serviceUrl As String, Optional asyncMode As Boolean = True) 
    Set objConn = New XMLHTTP30 
    objConn.Open "POST", serviceUrl, asyncMode 
    objConn.setRequestHeader "Content-Type", "text/xml" 
    objConn.onreadystatechange = HandleAsyncEvent 

End Function 

ich eine Laufzeitausnahme aufgetreten, wenn es um die Leitung

objConn.onreadystatechange = HandleAsyncEvent 

Excel wirft die Ausnahme

Ist es tatsächlich möglich, „Objekt erforderlich“ kommt hier eine Funktion in übergeben? Kann ich eine Funktion "Zeiger" in Excel VBA übergeben?

Answer 1

Hier ist ein Ansatz für diese Art von Aufgabe:

http://www.dailydoseofexcel.com/archives/2006/10/09/async-xmlhttp-calls/