Tabellenkalkulation

Beim Eintragen soll das Datum automatisch erscheinen

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Guten Tag, Ich habe gelesen, dass es ein ähnliches Thema bereits gibt. Nur leider habe ich nicht ganz verstanden und bei mir ist es ein wenig anders. Also. Ich habe eine Excel Datei die Drei Spalten beinhaltet. In die 1 und 3 kommen zahlen zwischen 1-3 und werden am Ende der Tabelle zusammen gerechnet. Also jede Zeile. Die 2 beinhaltet nur einen Doppelpunkt zur Trennung. Die 4 Spalte hat die Überschrift Datum. Und immer wenn ich eine Zahl in eine Zeile bei Spalte 1 oder 3 eingebe möchte ich das das aktuelle Datum in der 4 Spalte erscheint. Wie ist das möglich? Ich kann auch gerne meine Excel Datei euch zu schicken. Gruß Daniel

Antwort 1 von Hajo_Zi

Hallo Daniel,

vielleicht ist dies ein Ansatz.

Gruß Hajo

Antwort 2 von Flinkbaum

Wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen
das Datum wird entfernt falls die Eingabe gelöscht wird
wird im definierten Bereich eine Eingabe überschrieben wird das Datum nicht verändert

Genau. Dies möchte ich erreichen.
Nur wie.

Antwort 3 von Saarbauer

Hallo,

das ist nur mit Makro zu lösen.
Dahier mehrere Faktoren zusammentreffen undmit der Funktion Heute() das Datum bei jedem öffnen geändert wird.

Gruß

Helmut

Antwort 4 von Hajo_Zi

Hallo Daniel,

das ist doch genau die Beschreibung auds meiner Datei?
Der Code ist in VBA unter der entsprechenden Tabelle.
Bei mir ist jetzt Weihnachten und erstmal Schluß im Forum.

Gruß Hajo

Antwort 5 von Flinkbaum

Nur ist das das Problem in deiner Tabelle, die du mir netterweise geschickt hast, sind zwar die Fragen, aber kein Code sondern nur zwei Spalten gelb unterlegt.

Antwort 6 von Hajo_Zi

Hallo Daniel,

gehe im Register auf Tabelle2, rechte Maustaste, Code anzeigen.

Gruß Hajo

Antwort 7 von Flinkbaum

Danke Hajo,
ich habe versucht nur irgendwie stelle ich mich dumm an.

Wenn du oder sonst jemand vielleicht es eintragen könnte damit ich es verstehe?

Klick hier

Antwort 8 von coros

HalloDaniel,

wenn Du der Anleitung auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 2 folgst, solltest Du den VBA-Code in Hajos Datei finden. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.

Bei Fragen melde Dich.

MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du}
^{ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Antwort 9 von Flinkbaum

Das ist nicht das Problem. Hajos Code habe ich gefunden, doch weiß ich nicht welche Werte ich ändern muss und wie es dann funktioniert.

Danke trotzdem.

Antwort 10 von coros

Hallo Daniel,

sorry, aber wie sollen wir das denn wissen wo bei Dir welche Daten stehen, wenn Du nicht mal etwas über den Aufbau Deiner Tabelle schreibst. Nur aus den Angaben

Zitat:
Also. Ich habe eine Excel Datei die Drei Spalten beinhaltet.
In die 1 und 3 kommen zahlen zwischen 1-3 und werden am Ende der Tabelle zusammen gerechnet. Also jede Zeile. Die 2 beinhaltet nur einen Doppelpunkt zur Trennung.
Die 4 Spalte hat die Überschrift Datum. Und immer wenn ich eine Zahl in eine Zeile bei Spalte 1 oder 3 eingebe möchte ich das das aktuelle Datum in der 4 Spalte erscheint.

kann keiner ershen, wo bei Dir die Daten stehen.

Lade deine Datei doch mal z.B. bei

www.netupload.de

hoch und poste den Link, den Du erhälst dann hier, damit man Deine Datei und den Aufbau einsehen kann.

MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du}
^{ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Antwort 11 von Flinkbaum

Stimmt. Sorry.

Bitte sehr

Hier

Antwort 12 von coros

Hallo Daniel,

der Link funktioniert nicht.

MfG,
Oliver
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du}
^{ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Antwort 13 von Flinkbaum

http://www.netupload.de/detail.php?img=65d9e01d26050c4a090a65637e90da94.xls

http://www.netupload.de/img.php/65d9e01d26050c4a090a65637e90da94.xls

[URL=http://www.netupload.de/detail.php?img=65d9e01d26050c4a090a65637e90da94.xls][IMG]http://www.netupload.de/img.php/65d9e01d26050c4a090a65637e90da94.xls[/IMG][/URL]

Antwort 14 von aiuto

Hallo

Bitte Schön hier

und Frohe Weihnachten
vom Helfer

Antwort 15 von PcDock

Hi Danie,

1. Mit dieser Formel geht es doch relativ einfach

Zitat:
=WENN(SUMME(A2+C2>0);HEUTE();"")

Einfach bei D2 reinkopieren und nach unten ziehen.

2. Oder habe ich dich falsch verstanden.

PcDock

_{Hardware lebt und ist eigenständig}

Antwort 16 von aiuto

@PcDock
1.weil Heute() Morgen Gestern ist klappt das wohl nicht! (siehe AW3)
2.trotzdem Frohe Weihnachten

Antwort 17 von PcDock

Hi,

1. Jo, war zu schnell :)

PcDock

_{Hardware lebt und ist eigenständig}

Antwort 18 von rainberg

Hallo Daniel,

hab Dir mal folgenden Code eingebaut, teste mal, ob Dir das reicht.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If (.Column = 3 Or .Column = 8) And .Row < 102 Then
            If Not IsNumeric(.Value) Then
                .Value = ""
                .Offset(0, 1).Value = ""
                Exit Sub
            Else
                .Offset(0, 1).Value = Date
            End If
        End If
    End With
End Sub

http://www.netupload.de/detail.php?img=3f7eab1f068d353d75af7061af26...

Gruß
Rainer

Antwort 19 von Flinkbaum

Vielen Dank euch allen.

Mein Problem ist gelöst.

Mehrfach.

Frohe Weihnachten.