Thema Datum  Von Nutzer Rating
Antwort
Rot Datum eintragen - Zelle schreibgeschützt
 01.10.2020 06:54:22 Mike
NotSolved
01.10.2020 07:52:05 Gast95394
NotSolved

Ansicht des Beitrags:
Von:
Mike		 Datum:
01.10.2020 06:54:22		 Views:
837		 Rating:
     
Antwort:
  Ja
Thema:
Datum eintragen - Zelle schreibgeschützt

hallo

ich hätte gerne einen code der mir folgendes macht (Spalte T ist nicht schreibgeschützt, Spalte U schon)

in Spalte T erfolgt ein Eintrag, dann soll in Spalte U das aktuelle Datum eingetragen werden. Folgenden Code habe ich, aber das Problem ist der Schreibschutz in der Spalte U.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("T9:T100")) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub 'Bearbeiten mehrerer Zeilen wird abgefangen
    If Target = "" Then
        Target.Offset(0, 1).ClearContents
        Else:
        Target.Offset(0, 1) = CDate(Format(Now, "dd.mm.yyyy"))
    End If
End Sub

Danke für eure Unterstützung

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Datum eintragen - Zelle schreibgeschützt
 01.10.2020 06:54:22 Mike
NotSolved
01.10.2020 07:52:05 Gast95394
NotSolved