Hallo,
Die Excelmappe ist mit mehreren Unterordnern versehen und einige Dokumente sind miteinander verküpft. das Dokument, wobei es sich um dass angesprochene handelt, hat ausserdem noch einige Formeln.. allerding nicht auf den Feldern die der Code ansteuern soll.
Ich schereibe das deshalb, weil ich mir nicht sicher bin ob das Einfluss auf den Code hat..!?
Zum eigentlichen..
Die Felder E15:E36 sollen sobalt mit Inhalt gefüllt (oder eine davon) in Zelle E/F/G13 das Datum statisch wiedergeben. Also die Zellen sind verbunden. Der code sieht dann wie folgt aus..
Private Sub Worksheet_Change(ByVal Target As Range)
'die Range auf deinen Bereich anpassen
If Application.WorksheetFunction.CountBlank(ActiveSheet.Range("E15:E36")) <> Range("E15:E36").Count And ActiveSheet.Range("E13") = "" Then ActiveSheet.Range("C1") = Date
End Sub
Liegt es evtl. an der Zellenverbund?
Die Fehlermeldung nach Eingabe in dem besagten bereich ist dann ein kleines Fenster.. "Microsoft visual basic" Laufzeitfehler....(mehrere Zahlen) Die Methode'Rang' für das Objekt'_Worksheet'ist fehlgeschlagen.
Hoffe ich hab alles halbwegs verständlich Rübergebracht!?
Vielen Dank nochmal für die Hilfe.
|