Supportnet / Forum / Tabellenkalkulation
Excel:Datum und Uhrzeit in einer Zelle
Frage
Ich habe eine Excel-Tabelle mit ca 1200 Zeilen.
Am Anfang jeder Zeile hat eine Zelle mit Datum und Uhrzeit.
Wie kann ich am einfachsten die Uhrzeit entfernen, brauche diese nicht für die Weiterverarbeitung. Das Datum soll erhalten bleiben.
Gruss und Danke für die Hilfe
Antwort 1 von rainberg
Hallo Nussknacker,
kopiere dir folgenden Code in den Codebereich der betreffenden Tabelle.
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim rngZelle As Range
For Each rngZelle In ActiveSheet.Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
If rngZelle <> "" Then
With rngZelle
.Value = Int(rngZelle)
.NumberFormat = "dd.mm.yy"
End With
End If
Next
End Sub
Dieses Makro startest du durch einen Doppelklick in eine beliebige Zelle deiner Tabelle.
Nach getaner Arbeit musst du das Makro wieder löschen, sonst startet es bei jeden weiteren Doppelklick erneut.
Gruß
Rainer
kopiere dir folgenden Code in den Codebereich der betreffenden Tabelle.
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim rngZelle As Range
For Each rngZelle In ActiveSheet.Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
If rngZelle <> "" Then
With rngZelle
.Value = Int(rngZelle)
.NumberFormat = "dd.mm.yy"
End With
End If
Next
End Sub
Dieses Makro startest du durch einen Doppelklick in eine beliebige Zelle deiner Tabelle.
Nach getaner Arbeit musst du das Makro wieder löschen, sonst startet es bei jeden weiteren Doppelklick erneut.
Gruß
Rainer
Antwort 2 von nussknacker
hallo rainer
zuerst danke für die prompte antwort.
habe leider nicht verstanden, wo ich es genau hinkopieren soll.
was genau ist der codebereich und wo finde ich ihn?
eine einfachere lösung für den laien gibt es nicht?
gruss und danke
zuerst danke für die prompte antwort.
habe leider nicht verstanden, wo ich es genau hinkopieren soll.
was genau ist der codebereich und wo finde ich ihn?
eine einfachere lösung für den laien gibt es nicht?
gruss und danke
Antwort 3 von Event
Hallo
Die Spalte markieren und dann rechte Maustaste Zellen formatieren... Datum auswählen und gewünschtes Format anklicken.
Gruß
Die
Gruß
Antwort 4 von nussknacker
hallo Event
leider funktioniert das nicht mit dem formatieren der zelle.
die anzeige ist zwar korrekt, doch in der zelle selber wird die uhrzeit noch mit gerechnet.
danke
leider funktioniert das nicht mit dem formatieren der zelle.
die anzeige ist zwar korrekt, doch in der zelle selber wird die uhrzeit noch mit gerechnet.
danke
Antwort 5 von rainberg
Hallo Nussknacker,
Rechtsklick auf den Tabellenreiter der Tabelle wo das Makro wirken soll, dann "Code anzeigen" wählen.
Nun Kopierst du den Code in das sich öffnende Fenster, verlässt den VBA-Editor, kehrst in deine Tabelle zurück, wo du nun einen Doppelklick ausführst.
Gruß
Rainer
Rechtsklick auf den Tabellenreiter der Tabelle wo das Makro wirken soll, dann "Code anzeigen" wählen.
Nun Kopierst du den Code in das sich öffnende Fenster, verlässt den VBA-Editor, kehrst in deine Tabelle zurück, wo du nun einen Doppelklick ausführst.
Gruß
Rainer
Antwort 6 von JLM
Hallo
Probier es mit der Funktion Menu Daten - Text in Spalten
Da kannst du das Datum von der Uhrzeit trennen - Die Uhrzeit wird in eine neue Spalte angezeigt
Du kannst es dann Löschen
Gruss
JLM
Probier es mit der Funktion Menu Daten - Text in Spalten
Da kannst du das Datum von der Uhrzeit trennen - Die Uhrzeit wird in eine neue Spalte angezeigt
Du kannst es dann Löschen
Gruss
JLM
Antwort 7 von Event
Hallo
sorry, hatte das überlesen.
Du mußt den Nachkomma-Teil der Zelle(n) entfernen.
Ich würde dies mit einer Hilfsspalte machen, also spalte (nach) der Zeitangabe einfügen.
Dann mit "=kürzen(bezug zur zeitangabe)" nur das Datum aus der Zeitangabe übernehmen.
Formel dann soweit wie benötigt nach unten kopieren.
Gruß
sorry, hatte das überlesen.
Du mußt den Nachkomma-Teil der Zelle(n) entfernen.
Ich würde dies mit einer Hilfsspalte machen, also spalte (nach) der Zeitangabe einfügen.
Dann mit "=kürzen(bezug zur zeitangabe)" nur das Datum aus der Zeitangabe übernehmen.
Formel dann soweit wie benötigt nach unten kopieren.
Gruß
Antwort 8 von nussknacker
hallo
zuerst danke für die rege beteiligung.
das mit =kürzen hat super geklappt. datum steht ohne uhrzeit.
Daten - Text in Spalten hat auch geklappt, doch habe ich es nur auf ein zeile aufs mal anwenden können.
wenn ich mehrere zeilen/zellen ausgewählt habe, ist plötzlich die uhrzeit in die zelle übertragen worden...
das mit dem Code in den Codebereich habe ich überhaupt nicht verstanden. vba kenne ich zuwenig.
war aber echt froh um eure lösungsvoschläge.
gruss und schönen zweiten tag in dieser woche
zuerst danke für die rege beteiligung.
das mit =kürzen hat super geklappt. datum steht ohne uhrzeit.
Daten - Text in Spalten hat auch geklappt, doch habe ich es nur auf ein zeile aufs mal anwenden können.
wenn ich mehrere zeilen/zellen ausgewählt habe, ist plötzlich die uhrzeit in die zelle übertragen worden...
das mit dem Code in den Codebereich habe ich überhaupt nicht verstanden. vba kenne ich zuwenig.
war aber echt froh um eure lösungsvoschläge.
gruss und schönen zweiten tag in dieser woche
Antwort 9 von rainberg
Hallo Nussknacker,
noch mal etwas genauer
.
- Kopiere alle Zeilen meines Code
- Öffne deine Datei und aktiviere die zu ändernde Tabelle
- nach Rechtsklick auf den Tabellenreiter öffnet sich ein DropDown-Menü, in diesem wählst du "Code anzeigen " aus
- es öffnet sich ein Fenster, in dieses fügst du den kopierten Code ein
- klicke mit der linken Maustaste auf das Schließkreuz in der rechten oberen Ecke deines Bildschirmes, damit gelangst du wieder in deine Tabelle
- hier startest du nun durch einen Doppelklick in eine beliebige Zelle das Makro
- nach Ablauf des Makro´s gelangst durch einen erneuten Rechtsklick auf den Tabellenreiter wieder zu dem Fentser in dem das Makro steht, was du nun einfach löschst.
- Zum Schluß noch einen Klick auf das Schließkreuz ganz oben rechts und der Fall ist abgeschlossen.
Gruß
Rainer
noch mal etwas genauer
.
- Kopiere alle Zeilen meines Code
- Öffne deine Datei und aktiviere die zu ändernde Tabelle
- nach Rechtsklick auf den Tabellenreiter öffnet sich ein DropDown-Menü, in diesem wählst du "Code anzeigen " aus
- es öffnet sich ein Fenster, in dieses fügst du den kopierten Code ein
- klicke mit der linken Maustaste auf das Schließkreuz in der rechten oberen Ecke deines Bildschirmes, damit gelangst du wieder in deine Tabelle
- hier startest du nun durch einen Doppelklick in eine beliebige Zelle das Makro
- nach Ablauf des Makro´s gelangst durch einen erneuten Rechtsklick auf den Tabellenreiter wieder zu dem Fentser in dem das Makro steht, was du nun einfach löschst.
- Zum Schluß noch einen Klick auf das Schließkreuz ganz oben rechts und der Fall ist abgeschlossen.
Gruß
Rainer
Antwort 10 von nussknacker
hallo rainberg
danke noch für die genaueren ausführungen.
für mich ist die formel mit =kürzen ideal gewesen und hat meine aufgabe bestens übernommen.
drum hab ich deine version nicht ausprobiert.
doch nochmals danke für deine unterstützung.
gruss
danke noch für die genaueren ausführungen.
für mich ist die formel mit =kürzen ideal gewesen und hat meine aufgabe bestens übernommen.
drum hab ich deine version nicht ausprobiert.
doch nochmals danke für deine unterstützung.
gruss

