Thema Datum  Von Nutzer Rating
Antwort
Rot Datum in VBA
 10.11.2010 07:34:12 Steffi
NotSolved
10.11.2010 07:41:49 Severus
NotSolved
10.11.2010 07:59:09 Steffi
NotSolved

Ansicht des Beitrags:
Von:
Steffi		 Datum:
10.11.2010 07:34:12		 Views:
1564		 Rating:
     
Antwort:
  Ja
Thema:
Datum in VBA
Guten Morgen!!

Bei folgendem Code wird immer jeweils ein "x" gesetzt, egal was ich eingebe. Nun möchte ich, dass bei Eingabe das aktuelle Datum erscheint. Somit kann man praktisch feststellen, wann die letzte Änderung durchgeführt worden ist.

Wie ersetze ich dann das "x"?

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 200 Then Exit Sub
If Target.Row 4 Then Exit Sub
If Target.Column = 2 Then
If Target = "" Then Exit Sub
Application.EnableEvents = False
If Target <> "x" Then Target = "x"
Target.Offset(0, 1) = ""
Target.Offset(0, 2) = ""
ElseIf Target.Column = 3 Then
If Target = "" Then Exit Sub
Application.EnableEvents = False
If Target <> "x" Then Target = "x"
Target.Offset(0, 1) = ""
Target.Offset(0, -1) = ""
ElseIf Target.Column = 4 Then
If Target = "" Then Exit Sub
Application.EnableEvents = False
If Target <> "x" Then Target = "x"
Target.Offset(0, -1) = ""
Target.Offset(0, -2) = ""
End If
Application.EnableEvents = True
End Sub


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 in VBA
 10.11.2010 07:34:12 Steffi
NotSolved
10.11.2010 07:41:49 Severus
NotSolved
10.11.2010 07:59:09 Steffi
NotSolved