Range mit anderer Range vgl. & Call Wav Datei bei Abweichung

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Lightsource.

    Range mit anderer Range vgl. & Call Wav Datei bei Abweichung

    Hallo liebes Forum!
    Ich möchte gerne ein Makro schreiben, dass zwei Zellen (Zelle AF6 mit Zelle AJ6) jede Sekunde miteinander vergleicht und bei einer Abweichung von 0.05 einen Alarm ausgibt. Es geht darum, dass ich in meinem Workbook 10 Worksheets habe, die ständig mit Daten gefüttert werden. Vom Format her sind alle Worksheets identisch. Sobald Zelle AF6 aber um 0,05 kleiner ist als AN6 sollte ein Alarm ausgestoßen werden und optimalerweise auch noch farblich hinterlegt werden. Das Makro soll für alle Worksheets 3-10 gelten und wie gesagt kontinuierlich checken ob alles ok ist.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „chris11“ ()

    Du kannst so etwas probieren:

    Visual Basic-Quellcode

    1. Private Sub Worksheet_Change(ByVal Target As Range)
    3. If Target = Range("AF6") Or Target = Range("AJ6") Then
    5. If Range("AJ6").Value - Range("AN6").Value >= 0.05 Then
    6. Range("AJ6").Font.Color = vbRed
    7. Else
    8. Range("AJ6").Font.Color = vbBlack
    9. End If
    11. End If
    13. End Sub


    Allerdings wird dieses Sub dann abgearbeitet, wenn etwas auf dem Worksheet geändert wurde.
    Das mit alle Sekunden musst du auf eine andere Weise lösen.

    Eine Schleife, die ein DoEvents enthält und laufend testet ob mal wieder eine Sekunde vorbei ist.

    Oder eine OnTime Methode.

    So eine ähnliche Frage war hier schon mal im Forum.

Facebook
Telefonspende