vba - 我的 MSXML2 代码在 24 后无法工作。循环

Question

下面的代码不保存数据，通常在 24 次循环之后。为什么会这样？谢谢你。

Public Sub XmlHttpTutorial()
For x = 1 To 50
Dim xmlhttp As New MSXML2.XMLHTTP60, myurl As String
myurl = "https://www.etsy.com/shop/SilverHandwriting/reviews?page=" & x
xmlhttp.Open "GET", myurl, False
xmlhttp.send
Sheets("sayfa1").Cells(x, "a") = xmlhttp.responseText
 Next x
End Sub