try catch塊宏

我有一段代碼，將數據發送到一個HTTP終點try catch塊宏

Set xhr = CreateObject("MSXML2.XMLHTTP") 
xhr.Open "POST", URL, False 
xhr.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 

Data = "volumeDate=" & URLEncode(VolumeDate) & "&" & "volume=" & URLEncode(Volume) 
xhr.Send Data

我想有一個try catch塊來處理，如果它沒有連接到URL，或者如果它返回的東西除了200

我該怎麼做？

來源

2017-10-06 Prateek Narendra

Try/Catch在VBA中不可用。 [這是一個非常類似的問題]（https://stackoverflow.com/questions/30188584/vba-try-and-catch-ms-outlook）。 – MatSnow

VBA具有錯誤處理，並且/或者您可以檢查響應的「狀態」。 VBA不是VB.Net或其他語言，所以你需要在VBA上做一些Google搜索。 –

VBA中的錯誤處理基於On Error聲明。看看Error Handling In VBA瞭解更多信息。

我建議創建一個COM加載項而不是VBA宏。您將能夠輕鬆地檢查錯誤代碼並優雅地處理異常。請參閱Walkthrough: Creating Your First VSTO Add-In for Outlook快速入門。

來源

2017-10-08 13:18:17

回答

相關問題