Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
340to344
340to344
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ergebnisse aktualisieren

Ergebnisse aktualisieren
24.11.2003 16:55:22
toni
Hallo VBA'ler,

habe heute um 14.15 schon mal mein Problem geschildert. Vielleicht war die Schilderung etwas unverständlich.
Ich versuche es mal so:

In den Zellen "A1:K1" stehen Werte, mit denen ich rechne. Gerechnet werden darf erst, wenn alle Felder ("A1:K1") gefüllt sind, sonst erscheint eine Fehlermeldung.
Wie bekomme ich es hin, dass das Ergebniss in Zelle "L1" automatisch aktualisiert wird, wenn Werte in "A1:K1" nachträglich verändert werden (in "L1" ist keine Formel hinterlegt. Ich rechne in VBA (Prozedur 'Rechnen')).

Das ganze soll zudem nicht nur für Zeile 1 gelten sondern für insgesamt 20 Zeilen. Das heisst, wenn ich z. B. nachträglich, den Wert in "B5" verändere, soll automatisch das Ergebnis in "L5" aktualisiert werden.

Vielleicht kann mir ja jemand auf die Sprünge helfen...

Ciao

Toni

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ergebnisse aktualisieren
24.11.2003 17:25:08
Martial
Hi Toni

ich glaube, du kannst einfach in deiner Prozedur 'Rechnen' ein:
application.volatile
hineinstellen.
Damit wird bei jeder Änderung des Blattes die Berechnung wiederholt. Das Ding hat allerdings so seine Tücken, vor allem bei grösseren Dateien.

Besser ist es vermutlich, wenn du eine Funktion 'Rechnen' machst und einen Bereich übergibst.
Diese kannst du dann wie alle Excel-Formeln in einer Zelle benutzen (und sie sollte sich auch aktualisieren ) Beispiel für Summe:


Function Rechnen(Bereich As Range)
Dim cell, summe
summe = 0
For Each cell In Bereich
summe = summe + cell.Value
Next cell
Rechnen = summe
End Function


Gruss, Martial
Anzeige
Nachtrag ;-)
24.11.2003 17:41:12
Martial
Habe dich vermutlich falsch verstanden.

Um mit der Prozedur zu arbeiten, musst du das worksheet_change Ereignis bemühen:
das Argument Target gibt dir an, welche Zelle verändert wurde. In Abhängigkeit davon wirst du deine Prozedur aufrufen müssen.


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
End Sub


Gruss, Martial
AW: Nachtrag ;-)
25.11.2003 15:35:43
toni
Sorry Martial,

bin erst jetzt dazu gekommen Dir zu antworten.
Mit Worksheet_Change geht es ganz einfach!!!
Habe am Anfang wohl etwas zu hastig gelesen und hab's mit Worksheet_SelectionChange versucht. Das hat dann nicht so gut geklappt...
Wer lesen kann, ist klar im Vorteil!!!

Schönen Dank noch mal für Deine Hilfe.

Ciao, Toni
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige