VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Aktuellen Wechselkurs abrufen

Gruppe

Extern

Bereich

Internet

Thema

Aktuellen Wechselkurs abrufen

Problem

Wie kann ich den aktuellen Wechselkurs aus dem Internet abrufen?

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.




StandardModule: basMain

Sub WechselKurse()
   Range("B4").Value = Date
   Range("B5").Value = Time
   Worksheets("Tabelle2").QueryTables(1).Refresh
End Sub

Sub EinAusblenden()
   Worksheets("Tabelle2").Visible = True
   'Worksheets("Tabelle2").Visible = xlVeryHidden
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Extern und Internet