ich habe eine Tabelle, in diese lade ich mir bei Start jeweils die aktuellen Aktienkurse. Wenn ich einen Button setze wird automatisch eine Zeile eingefügt und die aktuellen Werte werden eingetragen. Bis hier ist alles kein Problem. Nun möchte ich aber mit einer bedingten Formatierung die Werte ich Zeile 4 farblich hervorheben wenn sie sich im vergleich zum letzten Wert verändert haben. Die bedeutet in meiner Tabelle ein Vergleich der Werte aus Zeile 4 und Zeile 8 [ =$C$4 > $C8 ]. Dies funktioniert aber nicht das der Vergleich nach dem einfügen einer Zeile dann automatisch auch geändert wird auf =$C$4 > $C9.
Wie bekomme ich das so hin das auch nach dem einfügen einer Zeile der ursprüngliche Vergleich =$C$4 > $C8 erhalten bleibt?
Eventuell noch eine 2.Frage: Wie kann ich das Makro automatisch starten wenn ich das Blatt öffne?
Hier das Makro
Sub Kurse_kopieren()
'
' Kurse_kopieren Makro
'
'
Rows("6:6").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("B4:J4").Select
Selection.Copy
Range("B7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Range("B6").Select
End Sub
Vielen Dank schon einmal im Voraus.