Automatisches Datum bei Eingabe auf andere Tabelle
Lukas
ich bin noch ein kleines Greenhorn in sachen VBA und hänge mich deswegen ständig an irgendetwas auf T_T.
Naja aufjedenfall wollte ich für meinen Chef eine kleine Tabelle programmieren in der er den zahlungseingang seiner Mieter überprüfen kann, nun möchte er allerdings noch zusätzlich sehen wann diese gezahlt haben das würde ich gerne über ein VBA script laufen lassen.
Das Grundgerüst habe ich mitlerweile:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [B3:M31]) Is Nothing Then Exit Sub
If Target.Value = "bezahlt" Then
Target.Offset(0, 5).Value = Date
Else
Target.Offset(0, 5).ClearContents
End If
End Sub
Geht das?!
Ich bin wirklich dankbar für jede antwort wirklich! ^^
MfG
Lukas =)