Прежде всего:
Всегда объявлять все переменные. Для этого всегда пишите Option Explicit в качестве первой строки в каждом модуле. Таким образом, особенно опечатки в именах переменных немедленно обнаруживаются компилятором.
Вот что делать с вашей проблемой:
IE иногда бывает настоящей дива. Например, ему не нравится обрабатывать URL-адреса в одном и том же экземпляре в быстрой последовательности. Поэтому рекомендуется выкидывать его из памяти и перезапускать для каждого нового URL.
Чтобы перезапустить его быстро, удаление куков, кеша и т.д. c. не должен быть установлен в его настройках. В противном случае возникнут ошибки автоматизации.
Попробуйте этот макрос. С указанными URL работает:
Option Explicit
Sub test()
Dim URL As String
Dim ie As Object
Dim i As Long
For i = 2 To 300
If i > 14 Then
ActiveWindow.SmallScroll down:=1
End If
URL = ActiveSheet.Cells(i, 1).Value
Set ie = CreateObject("internetexplorer.application")
ie.navigate URL
ie.Visible = False
Do While ie.readystate <> 4: DoEvents: Loop
ActiveSheet.Cells(i, 3) = ie.document.getElementsByTagName("h1")(0).innerText
ActiveSheet.Cells(i, 4) = ie.document.getElementsByTagName("strong")(0).innerText
ie.Quit
Set ie = Nothing
Next i
MsgBox "acabou"
End Sub