Thema Datum  Von Nutzer Rating
Antwort
Rot Laufzeitfehler 91 - Object variable or With block variable not set
16.11.2020 17:32:10 Näpflin
NotSolved
16.11.2020 18:05:38 volti
NotSolved
16.11.2020 19:32:36 volti
NotSolved
16.11.2020 19:00:02 Gast79865
NotSolved
16.11.2020 19:00:43 Gast55387
NotSolved
17.11.2020 18:19:06 Gast89521
NotSolved
19.11.2020 16:25:00 Näpflin
NotSolved
19.11.2020 17:25:14 Gast70572
NotSolved

Ansicht des Beitrags:
Von:
Näpflin
Datum:
16.11.2020 17:32:10
Views:
96
Rating: Antwort:
  Ja
Thema:
Laufzeitfehler 91 - Object variable or With block variable not set

Guten Tag Freunde

Kriege irgendwie den Laufzeitfehler 91 nicht aus meinem Makro:( Ich benötige dieses Makro dringend für meine Masterarbeit...

Könnt ihr mir vielleicht weiterhelfen? Der Fehler scheint bei der fetten Markierung zu liegen?

Hier habe ich den "vollständigen" Code:

Sub Sub_Aktienkurse()
 
Dim appIE As Object
Dim ticker As String
Dim myValue As String
 
ticker = Range("A1")
 
Set applE = CreateObject("InternetExplorer.Application")
 
applE.Top = 0
applE.Left = 0
applE.Width = 800
applE.Height = 600
applE.Visible = True
 
With applE
.Navigate "https://finance.yahoo.com/quote/" & ticker & "?p=" & ticker & ""
.Visible = True
End With
 
Do While applE.Busy
DoEvents
Loop
 
Set allRowOfData = appIE.document.getElementsByClassName("Ta(end) Fw(b) Lh(14px)")
 
myValue = allRowOfData(0).innerText
 
applE.Quit
Set applE = Nothing
 
Range("B1").Value = myValue
 
End Sub
 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Laufzeitfehler 91 - Object variable or With block variable not set
16.11.2020 17:32:10 Näpflin
NotSolved
16.11.2020 18:05:38 volti
NotSolved
16.11.2020 19:32:36 volti
NotSolved
16.11.2020 19:00:02 Gast79865
NotSolved
16.11.2020 19:00:43 Gast55387
NotSolved
17.11.2020 18:19:06 Gast89521
NotSolved
19.11.2020 16:25:00 Näpflin
NotSolved
19.11.2020 17:25:14 Gast70572
NotSolved