Merhaba Sayın @exmadon.
Web üzerinden veri alırken objectiniz -ki uygulamanızda xmldoc- beklenen şekilde yüklenmediğinde veya nothing olarak atandığında bu hatayı alırsınız.
Uygulamanızda da xmldoc istendiği gibi yüklenmediğinde DovizListesi nesnesine erişilemediğinden hata alıyorsunuz. Örneğiniz özelinde bu tip web kaynaklarına erişim gerektiren uygulamalar için çalışmanıza web kaynaklarına erişimi denetleyecek

If xmldoc Is Nothing Then

        MsgBox "XML belgesi yüklenemedi.", vbExclamation

        Exit Sub

    End If

gibi bir kontrol kodu eklemelisiniz. Böylece web kaynaklarına erişimi doğruladıktan sonra diğer adımlara geçersiniz.