Office: Berechnungsergebnisse auflisten

Hallo Zusammen,

ist es möglich die einzelnen Ergebnisse einer Zelle in einer Spalte nebenan aufzulisten (untereinander) ?

Beispiel: Zellwert ist eine Motorleistung, die von Parametern abhängt. Jetzt möchte ich die Parameter nach und nach verändern und die Ergebnisse entsprechend dokumentieren, ohne schriftlich oder händig (copy&paste o.ä.) eingreifen zu müssen.

Für eine Hilfe wäre ich dankbar. :?:

 

Hallo!

Schau mal in den Anhang.
Das Ergebnis aus E10 wird ab F10 abwärts protokolliert, wenn das Blatt neu berechnet wird.

 

Erweiterte Frage

Guten Morgen !

Danke für das Makro. Wie geht das denn wenn die Ergebnisse auf einem Nachbartabellenblatt liegen ? Danke für die Hilfe.

Sven :-?

 

Nachgefragt

Hallo,

ich habe das Makro übernommen und die Zellennamen angepasst. Das funktioniert auch soweit.

Jetzt steht in meinem VBA Editor schon ein Programm, darunter habe ich dannn das Makro eingefügt, die Option Explicit lässt sich nach einem End Sub auch nicht einfügen. Wenn man keine Ahnung von VBA hat, ist echt doof.

Ich habe aber mehrere Rechnungsergebnisse auf dem Tabellenblatt. Wenn ich nun das Makro mehrmals einfüge bekomme ich ein Mehrdeutigkeitsproblem. Bitte um Hilfe. Danke.


Kann man auch die Eingabewerte protokollieren um so den Zusammenhang zwischen Eingabe und Ergebnis herzustellen ?

:?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?: :?:

 

Hallo!

Es reicht, wenn Option Explicit EINmal auftaucht. (Dies dient zur Sicherheit, dass du die Variablen, die du verwendest, vorher explizit deklarierst.)

Pro Blatt ist nur EIN Calculate-Ereignis möglich, d.h. deine Codeanweisungen gehören alle in das gleiche Calculate-Ereignis, z.B.

Code:

Private Sub Worksheet_Calculate()
Dim Letzte As Integer
With Sheets("Protokoll")
Letzte = WorksheetFunction.Max(10, .Range("F65536").End(xlUp).Row + 1)
.Cells(Letzte, 6) = Range("E10")
.Cells(Letzte, 7) = Range("F10")
.Cells(Letzte, 8) = Range("G10")
End With
End Sub

 

Funzt !

Hallo,

danke für die Antwort, ich habe beim debuggen einfach die bemängelten Zeilen gelöscht, es blieben dann nur noch die zwei zeilen über, die die Zuweisung zu den Zellen enthielten. Dann funktionierte es....Zufall und Glück aber

trotzdem danke für die Erklärung.

Danke, danke, danke.

:-D ;-)

 

Nachgefragt II

Hallo,

ist es auch möglich nur die geänderten Daten zu protokollieren ?
Es gibt in meinen Rechnungen etwa 20 Einflussfaktoren, die sich auf unterschiedliche Ergebnisse auswirken (6 Ergebnisse insgesamt).

Danke für einen Tipp oder ein no go !

Sven

 

Hallo!

Rein theoretisch müsste das möglich sein.
Es gibt verschiedene Ereignisse, die die geänderte Zelle(n) mit berücksichtigen. In VBA heißt diese Zelle "Target".
Ereignisse wie "Change" oder "SelectionChange" können diese Zelle lokalisieren; "Calculate" leider nicht.

 

Hallo !

Ok, ich lasse es lieber bleiben. Ohne VBA Kenntnisse, werde mir mal Literatur besorgen, bríngt das alles nichts. In Zukunft wird Excel wohl immer noch auf dieser Plattform programmier sein, gell ?

Grüsse
Sven

 

Hallo!

Na, das will ich doch stark hoffen, sonst darf ich auch wieder bei Null anfangen...