Anzeige
Archiv - Navigation
1248to1252
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Aktienkurse per Makro aktualisieren

Aktienkurse per Makro aktualisieren
Excel-Beginner
Hallo liebe Excel-Profis,
ich bin mal wieder auf eure Hilfe angewiesen.
Die Datei ist hochgeladen unter https://www.herber.de/bbs/user/78759.xlsm
Im Reiter "Depot" befindet sich die Depotübersicht.
Per Makro möchte ich aus dem Web die aktuellen Aktienkurse in den Reiter "Kurse" importieren.
Das Makro ist mit dem Button im Reiter "Depot" verknüpft.
Wenn ich ausführe, zieht er sich die aktuellen Kurse, allerdings greift dann in der Depotübersicht der Sverweis ins leere (#Bezug). -->Reiter "Depot", Spalte E, Zeile 4-6.
Ich bin ratlos und hoffe auf eure Hilfe.
Vielen Dank vorab und Gruss,
Andi
hier noch das Makro:

Sub AktienkurseLaden()
' AktienkurseLaden Makro
' Tastenkombination: Strg+Umschalt+K
Sheets("Kurse").Select
Columns("A:BQ").Select
Selection.Delete Shift:=xlToLeft
Range("A1").Select
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.boerse.de/kurse/DAX-Aktien/DE0008469008", Destination:=Range( _
"$A$1"))
.Name = "DE0008469008"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = """pushList"""
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
Sheets("Depot").Select
Range("A23").Select
End 

Sub


		

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Aktienkurse per Makro aktualisieren
06.02.2012 16:29:22
Rudi
Hallo,
...der Sverweis ins leere (#Bezug).
dann lösch doch nicht die Spalten sondern nur die Werte.
Gruß
Rudi
AW: Aktienkurse per Makro aktualisieren
06.02.2012 16:42:48
Excel-Beginner
Hi Robert / Rudi,
perfekt, vielen Dank für eure schnelle Hilfe, hat funktioniert.
Gruss, Andi
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige