Wir wünschen allen Forenteilnehmern ein frohes Fest und einen guten Rutsch ins neue Jahr. x

Abgerufene Daten bewerten und farbig markieren
#1
Hallo,

ich rufe Daten aus dem Internet (Aktien Werte) ab. Diese werden ausgelesen und weiter ausgewertet. Soweit alles okay.

Ist es möglich, die Zelle rot oder grün zu markieren je nach dem wie der Wert sich verändert hat.

Beispiel :

Heute rufe ich die Werte ab --> A1 = 10 €

Rufe diese Werte Morgen ab --> A1 = 11 €

--> Jetzt würde ich gerne diese Zelle Grün markieren weil 11 > 10
und wenn kleiner dann rot.

Danke für alle Tips.

Grüße
Antworten Top
#2
Hallo
wenn ich das richtig verstehe so wird A1 überschrieben. 
Dann geht das nicht weil es keinen Vergleichswert gibt.

Du müsstest vorab A1 in einer andere Zelle kopieren so das der letzte (alte) Wert erhalten bleibt
Dann rufst du die neuen Werte ab und vergleichst in der bedingten Formatierung A1 mit A1-alt
Zwei bedingte Formatierungen, ein mal für ROT ein mal für GRÜN

Gruß Holger
Antworten Top
#3
...die Frage ist, wie Du die Daten abrufst. Denn nur beim Abruf wäre noch ein direkter Vergleich zwischen Tabellen- und neuen Daten möglich. Oder... Du nimmst Holger's Vorschlag an...
Der sicherste Ansatz für einen Irrtum ist der Glaube, alles im Griff zu haben.
Nur, weil ich den Recorder bedienen kann, macht mich das noch lange nicht zum Musiker.

Ciao, Ralf

Antworten Top
#4
erstmal Danke für die Antworten.


==> die Frage ist, wie Du die Daten abrufst

Die Daten werden 
Daten --> neue Abfrage --> aus anderen Quellen --> aus dem web
abgerufen


wenn ich das richtig verstehe so wird A1 überschrieben --> Ja die Zelle wird überschrieben.

-->  Du müsstest vorab A1 in einer andere Zelle kopieren so das der letzte (alte) Wert erhalten bleibt


Darüber habe ich auch nachgedacht aber irgendwo habe ich Knoten "in meiner Birne" den ich nicht gelöst bekomme.
Heute rufe ich die Daten ab --> A1=10   --> Diese kopiere ich nach A2 (hier habe ich (A2 --> Summe ist A1)
Morgen Rufe ich Daten wieder ab --> A1 =11 --> Dadurch dass aber A2 gleich Summe A1 ist ändert sich die Summe sofort so dass ein Vergleich nicht möglich wäre.

Über "1x jeweils "zwischenparken" der Werte hätte ich keine Probleme.

Danke und Viele Grüße
Antworten Top
#5
...via PQ also... ist doch super. Häng noch eine Datumsspalte zum Vergleich an.
Dann neue Abfrage, in welcher Du erst die alte Ergebnistabelle einliest, dann erst die Webdaten und beide Tabellen miteinander vergleichst.
Der sicherste Ansatz für einen Irrtum ist der Glaube, alles im Griff zu haben.
Nur, weil ich den Recorder bedienen kann, macht mich das noch lange nicht zum Musiker.

Ciao, Ralf

Antworten Top
#6
wenns in der Birne einmal klemmt, dann klemmt es richtig. Ich komme irgendwie nicht weiter (habe was für excel 365 gefunden aber für 2016 nein)

Also, ich starte jeweils Excel

15.01.2024   --> A1 = 10 
16.01.2024   --> A1 = 11  (wie übernehme ich die A1=10 diese nach z.B. A2)  -->A1 muss auf Grün
17.01.2024   --> A1 = 9     (wie übernehme ich die A1=11 diese nach z.B. A2)  -->A1 muss auf jetzt auf Rot 

Die Daten rufe ich (das ist gewollt) manuell ab. über "Alle aktualisieren".

Hier klemmt es total bei mir:
"Häng noch eine Datumsspalte zum Vergleich an.
Dann neue Abfrage, in welcher Du erst die alte Ergebnistabelle einliest, dann erst die Webdaten und beide Tabellen miteinander vergleichst."


was trage ich genau ins A2 ein damit die Daten von A1 kopiert werden (entweder beim starten von excel oder beim beenden).

Grüße
Antworten Top
#7
Hallo,

das Prinzip, wie du eine Abfrage um eine Historie ergänzt, habe ich hier geschildert: https://www.clever-excel-forum.de/Thread...#pid282861 bei dir müsstest du vor dem zusammenführen nur noch eine benutzerdefinierte Spalte mit dem Datum erzeugen.
Erst im nächsten Schritt kannst du dann zum Beispiel mit einer bedingten Formatierung anzeigen, ob sich ein Wert verändert hat.

Viele Grüße
derHöpp
[-] Folgende(r) 1 Nutzer sagt Danke an derHoepp für diesen Beitrag:
  • nxxel
Antworten Top
#8
Habe ein wenig anders umgesetzt.

Ein Makro erstellt. 

Sub Auto_Open()
Worksheets("Datenx").Range("B2").Copy _
    Destination:=Worksheets("Datenx").Range("N2")
End Sub

Kopiere die Inhalte beim Start der Datei weg. Damit habe ich den Stand "beim Start".
Wenn ich die Daten dann manuell aktualisiere, sind die Unterschiede zu sehen.

Wo ich jetzt hänge ist, beide Zellen miteinander zu vergleichen

Wenn B2 > N2 --> dann B2 grün
Wenn B2 < N2 --> dann B2 rot

Grüße
Antworten Top
#9
Hallöchen,

das geht doch mit der bedingten Formatierung ...
Was ist eigentlich bei B2=N2?
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#10
Erstmal Danke an Alle

das geht doch mit der bedingten Formatierung ...
--> jo habe ich auch gefindet :)   Ich hatte nach etwas wie if B2>n2 then green else red gehofft, aber das tuts auch

Was ist eigentlich bei B2=N2?
Jetzt werden wir zum Erbsenzähler *g*
Das ging mir auch durch den kopf, dann wird die Zelle Grau markiert

Also danke nochmal und Grüße
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste