Office: 2 Zellen addieren und Wert anderswo eintragen

Hi alle,

ich steh völlig auf dem Schlauch und wäre dankbar für Eure Hilfe - ich vermute, es wieder mal einfacher, als ich es mir versucht habe zu machen...

Ich möchte, dass aus Tabellenblatt "Zusammenfassung" das Ergebnis von Zelle A9 minus Zelle A11 eingetragen wird nach
Tabellenblatt "Buchungen" Spalte A und zwar unter die bereits dort stehenden Daten. Daneben soll in Spalte B das Wort "Korrektur" stehen und in Spalte C das Datum von heute.

Aaaaaah! Ich krieg es einfach nicht hin. Bitte helft mir.

Danke!

:)

 

in Spalte A
Zusammenfassung!A9 -A11
in B Korrektur
in C strg+Punkt

 

Hallo Hajo, jaaaaa klar. Aber ich brauch das als VBA. Einen Shortcut, der mir das subito erledigt.

 

Code:

 

Hallo Hajo, danke! Der Code ist schon mal ganz gut. Hab noch etwas dran korrigiert (dass es auch in Buchungen steht), hab aber noch ein Problem: Das Ergebnis wird in irgendeine Zeile in Buchungen geschrieben und nicht unten an die bestehenden Daten angefühgt. Da sind dann viele Leerzeilen dazwischen. (Ähm, ich nutzte MS-Office 2004 für Mac)

Code:

 

ich stelle die Letzte Zelle in Spalte a fest und schreibe darunter, die in der aktuellen Tabelle. Das es in einer bestimmten Tabelle stehe soll Stand nicht im Beitrag.
Die letzte Zelle in der aktuellen Tabelle ist wohl eine andere als in der Tabelle Buchungen.

 

ja genau

 

Code:

und in "DieseArbeitsmappe":
Code:

Gruß
Jörg

 

Hallo Jörg,

Dir ist bekannt das
Loletzte = Worksheets("Buchungen").Range("A" & Rows.Count).End(xlUp).Row
ein falsches Ergebnis liefert falls die letzte Zelle in der Spalte belegt ist?

 

Hallo Jörg, bei "Ergebnis =" meckert VBA, dass die Variable nicht definiert sei.

 

Hajo, wie sag ich denn dem Code, dass er bitte die letzte Zeile im Tabellenblatt "Buchungen" suchen soll und nicht in "Zusammenfassung" (von dem aus ich das steuern möchte)?

 

with Worksheets("Buchungen")
und überall vor Range, Cells, Rows ein Punkt
End With

 

Yes, jaha, JUBEL.Es geht, es geht. Danke, lieber Hajo!!!

Code:

 

Warum Du schreibst
"Worksheets("Buchungen")." statt "." muss mir nicht klar sein.

Man sollte schon im ersten Beitrag die Aufgabe komplett beschreiben. Beiträge in denen die Aufgabenstellung nicht komblett beschrieben ist erhalten von mir keine weiteren Antworten.
Man muß sich bei jeder veränderten Aufgabenstellung wieder neu in das Problem einarbeiten.

 

Lieber Hajo, ich bin Dir doch einfach dankbar für Deine super Hilfe und weil ich es nicht so gut kann, verneige ich mich vor Cracks wie Dir.

Hab die 3x Worksheets("Buchungen") weggemacht - ich lerne noch!

Und ich dachte, ich hätte meine Frage so geschrieben ganz oben. Naja. Egal. Es funzt ja - klasse!