Office: Datum einfügen

Hallo
Habe eine Exel Liste in der täglich mehrmals Buchstaben-Zahlenkombinationen eingegeben werden.
Ist es möglich wenn diese Spalte (Spalte B) ausgefüllt wird, Das Datum automatisch in Spalte A einzufügen?
Datum muss aber stehen bleiben also nicht wie bei der Funktion "Heute".
Am besten über Makro.


Mfg.:Puck

PS.:Hoffe ich habe diese Frage jetzt nicht zweimal gestellt da beim ersten mal mein Internet gesponnen hat.

 

Hallo!

Teste mal dies:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
Dim Zelle As Range
For Each Zelle In Intersect(Columns(2), Target)
If Zelle <> "" Then Zelle.Offset(0, -1) = Date
If Zelle = "" Then Zelle.Offset(0, -1) = ""
Next Zelle
End Sub

 

Hallo

Danke für Deine Mühen, nur leider tut sich bei diesem Makro überhaupt nichts.
Oder muss ich da noch Details einfügen!

Mfg.:Puck

 

Hallo!

Der Code gehört direkt ins Modul des Tabellenblatts:
Rechtsklick auf den Tabellenreiter > Code anzeigen

Dann müsste es klappen.

 

Hallo
Ja jetzt funktioniert es, Danke für Deine Hilfe.
Ich hätte aber in dieser Tabelle noch ein weiteres Problem!
Ich hoffe Sie können mir bei diesem Problem auch noch helfen.
Ich habe in einem Ordner (1) auf der Festplatte mehrere Unterordner (2).
Jedes Mal wenn in einem dieser Unterordner (2) ein Ordner (3) angelegt wird soll automatisch der Name des Ordners in Spalte B eingeschrieben werden.
Im neuen Ordner (3) befindet sich wiederum eine Datei dessen Name in Spalte C erscheinen soll.
Und das soll mit jedem dieser Unterordner (2) so ablaufen.
Das Makro der letzten Frage soll da natürlich weiterhin funktionieren!
Hoffe das ist lösbar!

Mfg.:Puck

 

Hallo!

Dazu reichen meine VBA-Kenntnisse leider nicht aus.
Ich bewege mich bisher nur innerhalb von Excel, daher sind Ordner-Strukturen so gar nicht mein Gebiet.

PS: Ich weiß auch nicht, ob Excel für dein Vorhaben wirklich das richtige Programm ist, denn die Programmierung dürfte in diesem Fall schon sehr aufwändig werden...

 

Hallo
Hatte mir schon fast gedacht das dass etwas schwieriger sein wird.
Macht aber nix Vielleich bekomme ich das irgendwie anders hin!
Trotzdem Danke für Deine mühen!

Mfg.:
Puck