Thema Datum  Von Nutzer Rating
Antwort
23.05.2017 20:56:59 Alex B.
NotSolved
23.05.2017 22:52:41 Gast39339
NotSolved
Rot Datum in mehrere Spalten
23.05.2017 23:34:04 Werner
Solved
24.05.2017 10:14:12 Alex B.
NotSolved

Ansicht des Beitrags:
Von:
Werner
Datum:
23.05.2017 23:34:04
Views:
662
Rating: Antwort:
 Nein
Thema:
Datum in mehrere Spalten

Hallo Alex,

zum Beispiel so:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
Select Case Target.Column
Case 2
    If Intersect(Target, Columns(2)) Is Nothing Then Exit Sub
    If Target = "" Then Target.Offset(0, -1).ClearContents Else: Target.Offset(0, -1) = Date
Case 4
    If Intersect(Target, Columns(4)) Is Nothing Then Exit Sub
    If Target = "" Then Target.Offset(0, -1).ClearContents Else: Target.Offset(0, -1) = Date
Case 6
    If Intersect(Target, Columns(6)) Is Nothing Then Exit Sub
    If Target = "" Then Target.Offset(0, -1).ClearContents Else: Target.Offset(0, -1) = Date
Case Else
End Select
End Sub

 

Gruß Werner


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
23.05.2017 20:56:59 Alex B.
NotSolved
23.05.2017 22:52:41 Gast39339
NotSolved
Rot Datum in mehrere Spalten
23.05.2017 23:34:04 Werner
Solved
24.05.2017 10:14:12 Alex B.
NotSolved