Variable für Makro aus Zelle auslesen

Computer: Software & Programmierung Visual Basic
1

Hallo,
ich hole mir über ein Makro Börsendaten, die von Yahoo als cvs-Datei zur Verfügung gestellt werden.

Ausschnitt aus Makro mit der Adresse (X steht für für die kompl. Addr.)

With ActiveSheet.QueryTables.Add(Connection:= _
„TEXT;http://X/d/quotes.csv?=SCL5NY.SG&f=l1c1oghjk&e=.csv“ _
, Destination:=Range(„C4“))

Das klappt soweit auch.
Jetzt suche ich eine Möglichkeit, den Namen des entsprechenden Wertpapiers (hier SCL5NY.SG) aus der Tabelle auszulesen und im Makro einzufügen.
In etwa so:

„TEXT;http://X/d/quotes.csv?s=(Inhalt Zelle A5)&f=l1c1oghjk&e=.csv“ _

Habe ich da eine Chance?

Oder hat jemand einen besseren Weg, Börsendaten in Excel zu laden.

cu

2

Hallo ghostkeeper.

Ohne Garantie, aber so sollte es theoretisch funktionieren:

:"TEXT;http://X/d/quotes.csv?s=" & Cells(5,1) & "&f=l1c1oghjk&e=.csv" \_

Viele Grüße
Carsten

3

Hallo Carsten

???
Hat genau einmal funtioniert.
Danach habe ich die Abfrage in eine Schleife gelegt.
Seitdem kommt immer (selbst nach Neustart) am Ende der Kette bei

.Refresh BackgroundQuery:=False

ein Laufzeitfehler 7 (nicht genug Speicher).

cu

4

Hallo Carsten

es geht.
Fehler lag bei mir. Bei den misslungenen Versuchen wurde immer auf eine Zelle mit einem nicht existenten Wertpapier verwiesen.
Die csv hat so nicht existiert.

cu

5

Hi,

hast Du es schon so probiert?

http://www.microsoft.com/germany/msdn/library/visual…

Ist zwar ein völlig neuer Ansatz (und somit viel Arbeit), aber es lohnt sich. Man kann sich damit auch von Seite zu Seite hangeln und alle Infos der Seite auslesen.

Viel Spaß
Martin

6

Das übersteigt meinen derzeitigen Kenntnisstand um einiges.

cu