De foutmelding is een bekend probleem, .busy icm .readystate loopt bij sommige niet helemaal soepel.
Je zou het zo eens kunnen testen:
Sub tabelophalen()
With CreateObject("InternetExplorer.Application")
.Visible = True
.Navigate "https://www.e-lotto.be/NL/drawGames/lotto/results/result/last"
Do While .Busy: DoEvents: Loop
Application.Wait DateAdd("s", 4, Now)
Set ieDoc = .Document
Set ieTxt = ieDoc.getElementsByClassName("results")(0)
ThisWorkbook.Sheets(1).Cells(5, 4).Resize(, 8) = Split(Replace(ieTxt.InnerText, "+", ""), vbCrLf)
.Quit
End With
End Sub