Office: (Office 2007) Hysterese mit Excelformel möglich

Hallo liebes Forum,

habe folgendes Problem:

In meiner Exceltabelle soll es mal eine Zelle geben welche
zwei Zustände (Ausgaben) einnehmen kann (nähmlich "Heizbetrieb"
oder "Kühlbetrieb"). Diese Zelle soll "Heizbetrieb" anzeigen sobald
F52 kleiner ist wie F48, wenn nun F52 nun wieder größer wird
wie F48 soll diese Zelle immer noch "Heizbetrieb" anzeigen. Erst
wenn F52 größer wird wie F46 soll "Kühlbetrieb" angezeigt werden.
Wenn nun F52 wieder kleiner wird wie F46 soll noch immer "Kühlbetrieb"
angezeigt werden. Erst wenn F52 wieder kleiner wird wie F48 soll wieder
"Heizbetrieb" angezeigt werden. Diese Zelle soll also ein Verhalten haben
eben wie eine Hysterese.

Bin im Moment soweit gekommen (Formel ist in Zelle A1)
wie ihr in der angehängten Grafik sehen könnt:

Da wo jetzt "Bisheriger Betriebsmodi" steht hatte ich ursprünglich
vor A1 zu schreiben. Doch wie ich es mir schon dachte erhalte ich dann
die Fehlermeldung das ein Winkelbezug vorliegt.

Wäre nett wenn ihr mir weiterhelfen könntet wie ich dieses Problem
nur mit Excelformeln lösen kann. Oder muß ich auf VBA ausweichen?

Schon jetzt danke für die Antworten
Grüße Fonso

:)

 

Hallo Fonso,

ich würde das mit VBA machen...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(52, 6).Value < Cells(48, 6).Value Then
Range("A1").Value = "Heizbetrieb"
End If
If Cells(52, 6).Value > Cells(46, 6).Value Then
Range("A1").Value = "Kühlbetrieb"
End If

End Sub
Gruß

Tiya

 

Moin, Tiya,

meiner Meinung nach macht es wenig Sinn, das Makro bei jedem Wechsel des Cursors zu starten... *wink.gif*

 

Hallo jinx,

ein Makro muss ich doch eh starten.. entweder eins, was den Änderungsbereich überprüft (If Target.Address...) und dann den Rest startet oder gleich das ganze.. dauert ja in dem Fall nicht wirklich lang*wink.gif* Oder hast Du eine bessere Idee???

Gruß

Tiya

 

Hi Fonso!

Ich glaube nicht, dass Dein Vorhaben mit Formeln lösbar ist, lasse mich aber gerne des besseren belehren *Smilie .

Da ich im Augenblick nicht so viel Zeit habe, konnte ich nur einen nicht ausgereiften Code schreiben, der - so glaube ich - noch einige logische Fehler hat.

Der Arbeitsmappe habe ich folgendes Makro als Initialisierung hinterlegt:
Code:

Dem Tabellenblatt, in dem die Zellen stehen folgender Code:
Code:

Und hier das eigentliche Makro, dass ich einem algemeinen Modul hinterlegt habe: Code:

Der Trick ist, dass eine Variable als static deklariert ist, was man ganz gut hier erklärt bekommt.

Die Initialisierung muss auf jeden Fall noch verbessert werden, und das Makro an sich habe ich nicht mehr auf seine Logik hin überprüfen können.

Und jetzt drängt mich mein Zeitdruck wieder, ich hoffe, Du oder mit Hilfe der anderen kommst zu einer guten Lösung. Ich werde erst wieder morgen Abend "vorbeischauen" und würde mich über eine Rückmeldung freuen.

Grüße, Ulrich

 

Hallo Leute,

erst mal danke für die Antworten. Die Lösungsvorschläge
um die Hysteresefunktion per VBA zu realisieren hätte ich
so ähnlich schon sebst umgesetzt. Aber VBA ist nicht
nötig! Einfach in Excel in Menü "Extras" den Menüeintrag
"Optionen" anklicken. Dann im Optionsfenster auf die
Registerkarte "Berechnung" wechseln und ein Häckchen bei
"Iteration" setzen. Nun noch mit "OK" bestätigen und
fertig. Dann funktioniert die Formel (siehe Anhang), welche
sich in Zelle A1 befindet wunderbar. Schön das manche Dinge
einfacher zu lösen sind wie es auf den ersten Blick aussieht

Gruß Fonso

 

Hi Fonso!
Freut mich, dass Du eine Lösung gefunden hast, wenn sie auch meiner Meinung nach nicht zu deiner Problembeschreibung passt:

Beispiel:
F48 hat den Wert 30
F52 bekommt den Wert 10 -> Heizbetrieb -> super!
F52 bekommt den Wert 100 -> Kühlbetrieb *frown.gif*

Schade, mein Makro ist aber auch nicht besser. Und da Du anscheinend happy bist bastel ich auch nicht dran rum *wink.gif* .

Viele Grüße, Ulrich