Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Währungsrechner | Herbers Excel-Forum


Betrifft: Währungsrechner von: Tobias
Geschrieben am: 23.10.2008 10:57:27

Hallo zusamme,

habe folgendes Problem ich will Währungsumrechnungsfaktoren von € in Dollar und Yen von einer Hompage (muss noch eine gefunden werden ;)) in ein Excesheet downloaden. Das jeden Tag, das ganze soll 3 spaten haben 1. Datum 2. Umrachnungsfaktor (Dollar) 3. Umrechnungsfaktor (Yen) mit diese Daten kann ich dann weiterarbeiten

Danke im Voraus

  

Betrifft: AW: Währungsrechner von: Cardexperte
Geschrieben am: 23.10.2008 11:19:33

Hallo Tobias, hier mal die Nachfrage des Umrechnungskurses Euro nach Polen

Private Sub CommandButton2_Click()
  
   Dim oIEApp As Object
        
   Set oIEApp = CreateObject("InternetExplorer.Application")
      With oIEApp
          
       .Visible = True
     
      ' Seite einlesen
.Navigate "http://www. _
faz.net/d/invest/devisen1.aspx?Rate1=EUR&Rate2=PLN"

      
       End With
End Sub


Nachteil ist ich muss noch über die Zwischenablagen den Wert in Excel reinkopieren, aber ich hatte es auch schon, dass der Wert direkt in Zelle geschrieben wird, muss es eben aber erst finden, hatte die Seite als Quelltext geladen und dann nach dem Wert Polen -Euro gesucht, falls keiner hier antwortet schaue ich noch mal nach!
Gruss WS


  

Betrifft: AW: Währungsrechner von: Gert Seler
Geschrieben am: 23.10.2008 11:20:28

Hallo Tobias,
schau Dir mal dieses Beispiel an :

https://www.herber.de/forum/archiv/676to680/t678541.htm

mfg
Gert