Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tageszahl in Datum umwandeln

Tageszahl in Datum umwandeln
20.06.2018 12:43:05
johann
Hallo,
habe ine Liste mit drei Spalten ,in der ersten Spalte soll das Datum
dargestellt werden z.B. 05.06.2018 !!!
Aber bei der Formatierung komme ich auf kein Ergebniss möchte nur die
nummerische Tageszahl vorgeben dann soll das komplette Datum erscheinen !!
Wer hilft mir ?

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tageszahl in Datum umwandeln
20.06.2018 12:45:40
SF
Hola,
was ist denn für dich eine numerische Tageszahl?
Gruß,
steve1da
AW: Tageszahl in Datum umwandeln
20.06.2018 12:48:34
johann
I'm Sorry,
meine natürlich den Kalendertag 1-31.
AW: Tageszahl in Datum umwandeln
20.06.2018 12:50:34
SF
Hola,
also du gibst die 19 ein und es soll der 19.06.2018 erscheinen?
Gruß,
steve1da
AW: Tageszahl in Datum umwandeln
20.06.2018 12:58:06
johann
ja richtig !!!
AW: Tageszahl in Datum umwandeln
20.06.2018 13:18:47
Torsten
und woher soll Excel wissen, welchen 19. du meinst?
AW: Tageszahl in Datum umwandeln
20.06.2018 13:37:56
johann
gibt es da keine Formatierung,
damit ich nur den Kalendertag eingeben muss?
vielleicht in Spalte "A" - das Jahr, und in "B" - Monat und "C" - den Tag,bei Tageseingabe in "C" sollte
dann das komplette Datum ersichtlich sein Z.B. 12.06.2018 .
nein,gibt es nicht-Tipps nicht akzeptabel?
20.06.2018 18:31:44
robert
AW: Tageszahl in Datum umwandeln
20.06.2018 13:23:52
UweD
Hallo
immer den eingegebenen Tag plus aktueller Monat + aktuelles Jahr ?
dann evtl. so...
- Rechtsclick auf den Tabellenblattreiter
- Code anzeigen
- Makro dort einfügen
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Z
    On Error GoTo Fehler
    If Target.Column = 1 Then
        Application.EnableEvents = False
        For Each Z In Intersect(Columns(1), Target) ' nur Spalte 1 
            If CInt(Z.Value) > 0 And CInt(Z.Value) <= 31 Then
                Z.Value = DateSerial(Year(Date), Month(Date), Z.Value)
            End If
        Next
    End If
    '*** Fehlerbehandlung 
    Err.Clear
Fehler:
    Application.EnableEvents = True
    If Err.Number <> 0 Then MsgBox "Fehler: " & _
        Err.Number & vbLf & Err.Description: Err.Clear
End Sub

interessant wird es in Monaten, die keinen 31. haben oder im Februar
LG UweD
Anzeige
zB. 19 Bindestrich 6 Enter=19.06.2018
20.06.2018 13:33:35
robert
..zu viel Arbeit?
AW: zB. 19 Bindestrich 6 Enter=19.06.2018
20.06.2018 13:34:26
SF
Hola,
19.6 geht auch.
Gruß,
steve1da
am Ziffernblock...
20.06.2018 14:34:02
UweD
19
geteiltZeichen
6
Enter
geht es auch recht komfortabel
LG UweD
AW: Tageszahl in Datum umwandeln
20.06.2018 13:36:02
Daniel
Hi
da musst du mindestens den 19.6 eingeben.
Nur das Jahr wird von Excel automatisch ergänzt.
für das aktuelle Datum gäbs den Shortcut STRG+Punkt
ansonsten musst du dir was programmieren (wurde ja schon gezeigt)
Gruß Daniel

388 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige