Thank you for your reply. As a matter of fact that is what I am trying to do. I am using this vba code I copied from an old post, and I have modified it for my usage. But it gives me an error on the line with 'Set objHTTP = New MSXML2.XMLHTTP'. Error message is 'Compiling error: Own designed tpe has not been defined'....
Sub InvokeAuthenticate()
'Declare our working variables
Dim sMsg As String
Dim sURL As String
Dim sEnv As String
Dim LastToken As String
'Set and Instantiate our working objects
Set objHTTP = New MSXML2.XMLHTTP
sURL = "
https://www.dhltoolboxtest.se/DHLTimeTableWS/TimeTable.asmx"
'SOAP envelope for submission to the Web Service
sEnv = "<?xml version=""1.0"" encoding=""utf-8""?>"
sEnv = sEnv & "<SOAP-ENV:Envelope xmlns:SOAP-ENV=""
http://schemas.xmlsoap.org/soap/envelope/"
xmlns: ns1 = "
http://dhltimetable.dhl.com/" > ""
sEnv = sEnv & " <SOAP-ENV:Header/>"
sEnv = sEnv & " <SOAP-ENV:Body>"
sEnv = sEnv & " <ns1:GetTimeTable>"
sEnv = sEnv & " <ns1:strUser>TimeTableAppUser</ns1:strUser>"
sEnv = sEnv & " <ns1:strPwd>TTA%Pwd06</ns1:strPwd>"
sEnv = sEnv & " <ns1:intType>1</ns1:intType>"
sEnv = sEnv & " <ns1:strCountryCode>SE</ns1:strCountryCode>"
sEnv = sEnv & " <ns1:strPickupPostCode>44361</ns1:strPickupPostCode>"
sEnv = sEnv & " <ns1:strPickupPlace>Stenkullen</ns1:strPickupPlace>"
sEnv = sEnv & " <ns1:strDeliveryCountryCode>SE</ns1:strDeliveryCountryCode>"
sEnv = sEnv & " <ns1:strDeliveryPostCode>50189</ns1:strDeliveryPostCode>"
sEnv = sEnv & " <ns1:strDeliveryPlace>BORÅS</ns1:strDeliveryPlace>"
sEnv = sEnv & " <ns1:blnEarliestSent>true</ns1:blnEarliestSent>"
sEnv = sEnv & " <ns1:dtDate>2016-02-25</ns1:dtDate>"
sEnv = sEnv & " <ns1:blnHolidayCheck>true</ns1:blnHolidayCheck>"
sEnv = sEnv & " </ns1:GetTimeTable>"
sEnv = sEnv & " </SOAP-ENV:Body>"
sEnv = sEnv & "</SOAP-ENV:Envelope>"
'invoke the web service
objHTTP.Open "Post", sURL, False
objHTTP.setRequestHeader "Content-Type", "text/xml"
objHTTP.send (sEnv)
MsgBox objHTTP.responseText
End Sub