Datenbank neuer Datensatz
21.02.2004 19:38:34
Hans-Werner Schmidt
folgendes Problem beschäfigt mich:
In einer Datenbank möchte ich auch ohne Datenbankmaske Werte eingeben. Das klappt auch.
Ich möchte jetzt aber das wenn ich in der Spalte A6:A10000 ein Datum eingebe -in der betreffenden Zeile
in Spalte C folgende Formel eingetragen wird: =WENN(A75<>"";"A";"")
in Spalte D folgende Formel eingetragen wird: =WENN(B75<>"";"B";"")
in Spalte D folgende Formel eingetragen wird: =WENN(C75<>"";"V";"")
A75,B75 ändern sich ja jede Zeile z.B A76,B76
Ansatz:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A6:A10000")) Is Nothing Then Exit Sub
'hier mein Code
End Sub
Hat einer eine Idee?
Gruss aus Hamburg Hans-Werner Schmidt