URL Formatierung

Forumthread: URL Formatierung

URL Formatierung

02.02.2015 09:24:41

unzzz1978

Hallo noch mal,
fast hätte ich meinen 2. Punkt ganz vergessen. Ich möchte historische Kurse von der Seite Yahoo-Finanzen downloaden. Die dazugehörige URL baut sich wie folgt auf:
https://de.finance.yahoo.com/q/hp?s=ADS.DE&b=30&a=00&c=2014&e=30&d=00&f=2014&g=d
Die Zahlen entsprechen dem abzufragenden Datum: 30.1.2014. Genau diese Zahlen möchte ich aber durch Zahlen in meine Tabelle ersetzen, damit ich die Abfrage ber VBA in mein jeweiligens Tabellenblatt einfügen kann.
Ist es möglich die Zahlen durch Zellbezüge zu erseten?
Beste Grüße
unzzz1978

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: URL Formatierung

02.02.2015 18:02:53

Michael
AW: URL Formatierung

03.02.2015 20:17:01

unzzz1978
VBA-Feinheiten

05.02.2015 04:49:24

Michael
AW: URL Formatierung die zweite

05.02.2015 05:10:41

Michael

AW: URL Formatierung

02.02.2015 18:02:53

Michael

Hi unzzz1978,
schnappe Dir in der Tabelle je eine Zelle für Tag, Monat und Jahr - die kannst Du händisch eingeben oder, wenn Dir das zu umständlich ist, direkt aus der Zelle mit dem kompletten Datum ziehen.
Aus Datum in z.B. A1 mit =Tag(A1) usw.
Wenn T/M/J in B1, C1 und D1 stehen, setzt Du Dir den String in VBA dann so zusammen:
="https://de.finance.yahoo.com/q/hp?s=ADS.DE&b=" & range("b1") & "usw"
Schöne Grüße,
Michael

AW: URL Formatierung

03.02.2015 20:17:01

unzzz1978

Hallo Michael,
viele Dank für deine schnellen Beitrag ! Leider weißt mir das Modul einen Syntaxfehler bzw.erwarteter Ausdruck.
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://de.finance.yahoo.com/q/hp?s=ADS.DE&b="&range("a57")&a=&range("a58")&c=&range("a59")&e=&range("a57")&d=&range("a58")&f=&range("a59")"&g=d"
, Destination:=range("$A$136"))
Hoffe du oder anderer Teilnehmer können helfen.
LG
unzzz1978

VBA-Feinheiten

05.02.2015 04:49:24

Michael

Hi unzi,
daß die Leut aber auch nie machen können, was man sagt!
Der Syntax-Fehler hat zwei Ursachen: VBA zickt nämlich (manchmal), wenn man vor und nach dem "&"-Operator kein Leerzeichen läßt.
Außerdem paß bitte auf, daß Du die vorhandenen Textschnipsel in "" setzt, also so (Ausschnitt aus Deinem string):
& range("a57") & "a=" & range("a58") & "usw."
Beides ist in meinem Beispiel vorhanden.
Viel Spaß und schöne Grüße,
Michael

AW: URL Formatierung die zweite

05.02.2015 05:10:41

Michael

Ein weiterer Knackpunkt sind die Unterstriche zur Verbindung von Zeilen: Du hast sie, soweit man es hier beurteilen kann, nicht konsequent eingesetzt.
Problematisch ist insbesondere der Zeilenumbruch zwischen der zweiten und der dritten Zeile, der *innerhalb* eines Strings liegt - das kann nicht gehen.
Insgesamt sollte es etwa so aussehen:
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://de.finance.yahoo.com/q/hp?" & _
"s=ADS.DE&b=" & "usw."
Mühsam nährt sich das Eichhörnchen, sorry.
Ciao,
Michael

Forumthread: URL Formatierung

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread