Hallo,
Jeder kennt wohl die Schwierigkeit, die sich bei Formularen ergibt: oben als Kopf steht ein allgemeiner Text, dann kommt die eigentliche Tabelle mit Einnahmen und Ausgaben, dann das Ergebnis der Berechnungen und ein weiterer Text, sozusagen der Formularfuß.
Nun sind diese Einnahmen und Ausgaben ganz unterschiedlich, mal 30 Zeilen, mal 200.
Wenn ich nun so ein Formular entwerfe und als Vorlage benutze, dann weiss ich nie, wie viele Zeilen ich für die Einnahmen und die Ausgaben benötigen werde. Also sind es mal zu viele Zeilen, mal zu wenig.
Gibt es da keine Möglichkeit, dass eine automatische Anpassung stattfindet ? Dass also der Text am Ende (z. B. nach der Endsumme) automatisch um eine Zeile verschoben wird, solange ich am Anfang der Zeile eine Eingabe vornehmen ?
Beispiel:
Datum-Betrag-Buchungszweck-Beleg Nr.
12.12. 50 Miete 1
Wenn jetzt im Feld unter 12.12 keine neue Eingabe erfolgt, soll dort eine Berechung des Saldos stehen (Einnahme - Ausgabe), und ein kurzer Text. Wenn dort eine Eingabe erfolgt, soll diese Berechung mit dem dazugehörigen Text um eine Zeile nach unten verschoben werden.
Gibt es da eine Lösung ?
Gruss
Andreas
Hallo Andreas,
wenn du dein Formular so aufbaust, das zwischen den Einzelpositionen und der Summenzeile eine leere Zeile bleibt und die Formeln in der Summenzeile entsprechend gestaltest, dann werden die Summenformeln von EXCEL automatisch angepaßt, wenn unterhalb der letzten Einzelposition eine neue Zeile eingefügt wird. Beispiel:
Tabellenblattname: Tab1
A B C D
1 Datum Betrag Buchungszweck Beleg Nr.
2 12.12.06 50 Miete 1
3 13.12.06 -25 Wasser Stadtwerke 2
4
5 Summe 25
Benutzte Formeln:
B5: =SUMME(B2:B4)
Gruß
Franz
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo Franz,
Hallo Andreas,
wenn du dein Formular so aufbaust, das zwischen den
Einzelpositionen und der Summenzeile eine leere Zeile bleibt
und die Formeln in der Summenzeile entsprechend gestaltest,
dann werden die Summenformeln von EXCEL automatisch angepaßt,
wenn unterhalb der letzten Einzelposition eine neue Zeile
eingefügt wird. Beispiel:
Tabellenblattname: Tab1
A B C D
1 Datum Betrag Buchungszweck Beleg Nr.
2 12.12.06 50 Miete 1
3 13.12.06 -25 Wasser Stadtwerke 2
4
5 Summe 25
Benutzte Formeln:
B5: =SUMME(B2:B4)
Gruß
Franz
genau das wollte ich ja nicht, immer per Hand eine Zeile einfügen, sondern das soll automatisch geschehen, sobald ein Wert eingegeben wird.
Gruss
Andreas
genau das wollte ich ja nicht, immer per Hand eine Zeile
einfügen, sondern das soll automatisch geschehen, sobald ein
Wert eingegeben wird.
Hallo Andreas,
hier ein neuer Versuch mit Automatik mit Makro
Tabellenblattname: Tabelle1
A B C D
1 Datum Betrag Buchungszweck Beleg Nr.
2 12.12.06 50 Miete 1
3 13.12.06 -25 Wasser Stadtwerke 2
4 14.10.06 50 3
5 15.10.06 24 4
6
7 Summe 99
Benutzte Formeln:
B7: =SUMME(B2:B6)
Namen in der Tabelle:
Datum: =Tabelle1!$A$2:blush:A$6
Makro Code:
Private Sub Worksheet\_SelectionChange(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("Datum")) Is Nothing Then
If IsEmpty(Target) Then
Target.EntireRow.Insert shift:=xlShiftDown
End If
End If
End Sub
Wenn die leere Zelle zwischen Summe und letztem Datum aktiv wird (per Mausklick oder Cursortaste), dann wird eine neue Zeile eingefügt.
Das zugehörige Makro ist im VBA-Editor unter Tabelle1 einzufügen
Der Bereich von A2 bis A6 hat den Namen „Datum“ und wird beim Einfügen neuer Zeilen ebenso wie die Formel in B7 dynamisch angepasst.
Ich schicke dir die Beispieldatei auch per e-mail
Gruß
Franz
2 „Gefällt mir“
Tabelle zu kurz/zu lang - Dankeschön !
Hallo,
vielen Dank an Franz, das ist ja super !
Gruss
Andreas