Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Wertübertragung bei Datumsänderung.





Frage

Hallo, ich habe folgendes Problem : ich möchte auf Bezug der täglichen Datumsänderung, daß ein Betrag von A1 (Bestand heute) zu B1(Bestand gestern) gleichgesetz wird. Gruß Carl

Antwort 1 von rolandaa

hallo,

schreibe in zelle E1 - =heute()
speichert das datum in zelle F1 beim verlassen,
und beim öffne wird überprüft ob sich das datum geändert hat und wenn ja soll er den Wert von Zelle A1 in B1 übertragen.

Sub auto_open()
If Range("E1").Value <> Range("F1").Value Then
Range("B1").Value = Range("A1").Value
End If
End Sub
Sub auto_close()
Range("E1").Select
Selection.Copy
Range("F1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub

mfg
roland

Antwort 2 von carlcox

Hat super funktioniert.

Vielen Dank
Carl

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Suche in allen vorhandenen Beiträgen: