Aktualisieren von Zellen

Bild

Betrifft: Aktualisieren von Zellen
von: Vasko
Geschrieben am: 23.09.2003 16:57:22

Hallo Leute

Mit der in diesem Forum unter https://www.herber.de/forum/archiv/184to188/t187957.htm publizierte Funktion "Farbe" summiere ich Werte von Zellen die mit Farbe hinterlegt sind.
Die Funktion funktioniert soweit gut, nur wenn die Farbe ändert wird die
Funktion nicht automatisch aktualisiert. Auch das Aktualisieren über F9 hilft
nicht.
Hat jemand eine gute Idee wie das aktalisieren automatisiert werden kann?

MfG Vasko

Bild


Betrifft: Application.Volatile
von: IngoG
Geschrieben am: 23.09.2003 17:07:40

Hallo Vasko,

versuch mal die folgende Zeile:

Application.Volatile

am anfang der function einzusetzen
sollte dann funzen

Gruß Ingo


Bild


Betrifft: AW: Application.Volatile
von: vasko
Geschrieben am: 24.09.2003 08:14:46

Hallo Ingo

Danke für die rasche Antwort.

Ich habe "Application.Volatile" meiner nachstehenden Funktion angefügt leider ohne Erfolg.
Nach ausführen der Funtion bekomme ich die Fehlermeldung "Fehler beim Kompilieren, Ausserhalb der Prozedur ungültig.


Application.Volatile


Function Farbe(Bereich As Range, Farbwahl As Byte)
Dim c As Range
If Farbwahl = 35 Then ' Pastellgrün
For Each c In Bereich
If c.Interior.ColorIndex = Farbwahl Then Farbe = Farbe + c.Value
Next c
End If
End Function


MfG Vasko


Bild


Betrifft: falsche stelle
von: ingo
Geschrieben am: 24.09.2003 10:43:11

HAllo Vasko,

die zeile gehört in deinem Code hinter den Dim-befehl

Gruß Ingo


Bild


Betrifft: AW: falsche stelle
von: Vasko
Geschrieben am: 24.09.2003 14:32:43

Hallo Ingo

Jetzt funktioniert es nach meinem Vorstellungen.
Nochmals herzlichen Danke für deine Hilfe.

vasko


Bild


Betrifft: AW: falsche stelle
von: Vasko
Geschrieben am: 25.09.2003 12:13:43

Hallo Ingo

In Test funktionierte allse supper. Nur wenn ich das in der Praxis anwende rechnet
er bei jeder Eingabe ca. 8-10 Sek. Ist es Möglich das Ganze auf Komando über einen Button oder F-Taste zu starten ?

Gruss Vasko


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Aktualisieren von Zellen"