Supportnet Computer
Planet of Tech

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

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

Antwort 3 von Event

Hallo

Die
  • Spalte markieren und dann
  • rechte Maustaste
  • Zellen formatieren...
  • Datum auswählen und
  • gewünschtes Format anklicken.

    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

    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

    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

    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ß

    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

    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

    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

    Ich möchte kostenlos eine Frage an die Mitglieder stellen:


    Ähnliche Themen:


    Suche in allen vorhandenen Beiträgen: