Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1340to1344
1340to1344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datumsformat per VBA wandeln

Forumthread: Datumsformat per VBA wandeln

Datumsformat per VBA wandeln
31.12.2013 13:55:42
Lisa
Hallo Experten,
ich steh gerade auf dem Schlauch. In Spalte A steht ein Datum im Format TT/MM/JJ
Ich möchte es aber im Format TT.MM.JJ haben.
Mit diesem Makro hab ichs versucht aber es passiert... NICHTS :-(
Sub Datum_umwandeln() Dim x As Long With Worksheets("Tabelle1") For x = 1 To Cells(Rows.Count, 1).End(xlUp).Row .Cells(x, 1).NumberFormatLocal = "TT.MM.JJ" Next End With End Sub Hat jemand einen Tipp?
Einen schönen Sylvester wünscht
Lisa

Anzeige

17
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 13:56:57
Hajo_Zi
Hallo Lisa,
in der Zelle steht Text, der aussieht wie ein Datum. Typ(a3)=2

AW: Datumsformat per VBA wandeln
31.12.2013 14:01:24
Lisa
Hallo Hajo,
was meinst du mit Typ(a3)=2?
Gibts eine Möglichkeit das Format doch noch zu wandeln?

Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 14:02:47
Hajo_Zi
schreibe in Zelle C3 =Typ(A3) und es wird Dir 2 angezeigt, was Text bedeutet.
Gruß Hajo

AW: Datumsformat per VBA wandeln
31.12.2013 14:09:28
Hajo_Zi 

Option Explicit
Sub Datum_umwandeln()
Dim x As Long
With Worksheets("Tabelle1")
For x = 1 To Cells(Rows.Count, 1).End(xlUp).Row
.Cells(x, 1) = Application.Substitute(.Cells(x, 1), "/", ".") * 1
.Cells(x, 1).NumberFormatLocal = "TT.MM.JJ"
Next
End With
End Sub
Gruß Hajo

Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 14:16:07
Lisa
da warst du schon schneller Hajo :-)
jetzt wandelt es mir das "Datum" in eine Zahl z.B. 31122013 aber ich bekomme nur Rauten angezeigt.

AW: Datumsformat per VBA wandeln
31.12.2013 14:17:50
Hajo_Zi
nur wenige sehen Deine Datei und können die Lösung für Deine Datei erstellen.
Gruß Hajo

Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 14:21:26
Hajo_Zi
nur wenige sehen auch in was 12/12/37 umgewandelt werden soll. ins Jahr 2000 oder 1900
Gruß Hajo

AW: Datumsformat per VBA wandeln
31.12.2013 14:44:02
Lisa
Hallo Hajo,
hier eine Beispieldatei.
31/12/2013 sollte in 31.12.2013 gewandelt werden.
https://www.herber.de/bbs/user/88651.xlsm
Grüße Lisa

Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 14:51:58
Hajo_Zi
Hallo Lisa,
im ersten Beitrag Stan "TT/MM/JJ" und das ist 13 nicht 2013 
Option Explicit
Sub Datum_umwandeln()
Dim x As Long
With Worksheets("Tabelle1")
For x = 1 To Cells(Rows.Count, 1).End(xlUp).Row
.Cells(x, 1) = DateSerial(Right(.Cells(x, 1), 4), _
Mid(.Cells(x, 1), 4, 2), Left(.Cells(x, 1), 2))
Next
End With
End Sub
Gruß Hajo

Anzeige
Danke :-)
31.12.2013 15:03:27
Lisa
für deine Mühe, jetzt funktionierts. :-)
und einen guten Rutsch ins neue Jahr wünscht
Lisa

AW: Danke :-)
31.12.2013 15:05:11
Hajo_Zi
Hallo Lisa,
gleichfalls
Gruß Hajo

AW: andere Lösung
01.01.2014 11:13:59
Hajo_Zi
Hallo Lisa,
damit 12/1/2013 auch richtig übersetzt wird. 
Sub Datum_umwandeln2()
Dim x As Long
With Worksheets("Tabelle1")
For x = 1 To Cells(Rows.Count, 1).End(xlUp).Row
.Cells(x, 1) = CDate(Application.Substitute(.Cells(x, 1), "/", "."))
Next
End With
End Sub

Gruß Hajo

Anzeige
AW: Datumsformat per VBA wandeln
31.12.2013 14:10:14
Lisa
tatsächlich :-(
wie kann ich denn dieses Textdatum zu einer brauchbaren Zahl machen? Das Datum bekomme ich aus einer txt-Datei und dort steht das eben in diesem Format (TT/MM/JJ) drin. Schöner Mist. :-(

Rückfrage zu der Textdatei,...
01.01.2014 11:49:22
Matze
Hallo Lisa, Hallo Hajo,
ich habe eben mal um mir das mal zu verwirklichen eine Textdatei erstellt in der die Datümer untereinander so dargestellt sind : 1/12/2013,....
Diese habe ich in der Textdatei markiert und in Excel Spalte A1 eingefügt.
Und als Ergebnis Tataaa: 1.12.2013,... erhalten!
Warum ist das nur bei mir so? Es sollte auch bei dir/euch so sein.
..wie und auf welchen Weg wird denn das Datum aus der Textdatei eingelesen.
a)Durch manuelles kopieren/einfügen?
b)Oder einem Code der schon in deiner Datei ist?
zu b) dann kann der Code von Hajo doch da gleich mit eingebunden werden.
Wäre nett wenn du diesen dann hier mal aufzeigst, danke.
Nur mal so als Vorschlag,
Gruß Matze

Anzeige
AW: Rückfrage zu der Textdatei,...
01.01.2014 11:53:09
Hajo_Zi
Hallo Matze,
Du benutzt nicht z.B. das Programm SAP für den Export.
Gruß Hajo

AW: Rückfrage zu der Textdatei,...
01.01.2014 12:08:25
Matze
Hallo Hajo,
nein hab hier nur eine reine Textdatei mit Notepad erzeugt und dort wie beschrieben die Datümer
untereinander (pro Zeile) in dieser Form 1/12/13 , erstellt, kopiert, eingefügt.
Wenn und überhaupt müsste Lisa mit dem SAP arbeiten, da sollte der Export aber doch eigentlich reibungslos funktionieren. Das ist aber eine andere Baustelle.
Mal sehn was Lisa dazu schreibt, falls es Sie interessieren sollte.
Gruß Matze

Anzeige
warum nicht einfach Daten Text in Spalten?
01.01.2014 13:24:33
Matthias
Hallo
Vorher: (Zelle mit TextFormat)
Tabelle1

 A
11/12/13


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

    Daten Text in Spalten
  1. Klick auf Weiter

  2. Nochmal auf Weiter

  3. Option Datum einstellen.

  4. Fertigstellen


Nachher:
Tabelle1

 A
101.12.2013


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias
Anzeige
;

Forumthreads zu verwandten Themen

VBA - Zellen nach Prozentformat abfragen
Jenny

Hi, Excel-Freaks!
Kann mir bitte jemand sagen, wie ich per VBA Zellen auf ein beliebiges Prozentformat abfragen kann?
If rngZ.NumberFormat = "0%" Then...
findet leider/natürlich nur die Zellen, die ohne Nachkommastellen formatiert sind.
Danke im Voraus!
Grüße von Jenny im Ex...
28.08.2008 15:03:49
Thread-ID: 1005460
4 Beiträge
VBA DateFormat zu String convertieren
MBorn

Guten Morgen,
weiß jemand, wie man ein Datum, das im DateFormat (als Zahl) vorliegt
in das Textformat (yyyy-mm-dd) konvertiert. Sodaß das Ergebnis ein Text ist?
sodaß beispielsweise aus der Zahl 39868 das Text-Datum "2009-02-24" wird?
Herzlichen Dank,
Born
18.03.2009 12:59:43
Thread-ID: 1061376
12 Beiträge
Anzeige
VBA: Verlust Zellenformat bei Workbooks.Close
Andreas

Hallo und guten Morgen:
Als Neuling hier möchte ich mich sogleich mit einem Problem an Euch wenden:
Ich habe 2 Excel-Tabellen, wobei Daten in der einen und Referenzen in der anderen Tabelle stehen.
Nun lese ich Daten über die ReferenzTabelle aus der DatenTabelle aus und schreibe die...
02.04.2009 09:14:45
Thread-ID: 1066193
16 Beiträge
Datumsformat in der Maske bei Aufruf über VBA
Wusino

Hallo miteinander,
da meine Suche in ettlichen Büchern und Foren sehr frustrierend war, wende ich mich nun doch an Euch.
Ich habe ein kleines Skript, das beim Öffnen des Dokuments auf das Datenblatt Uebersicht springt und beim Wählen eines anderen Datenblatts die Maske anzeigt. Das Prob...
18.04.2009 09:42:39
Thread-ID: 1069435
2 Beiträge
Anzeige
Datum in andere Spalte mit and. Format VBA
Wolfgang

Hallo,
in Spalte F, ab Zeile 2 befinden sich Daten im Format "18.06.2009" - wäre denkbar, dass jeweils dieses Datum in Spalte R im Format "Juni 09" wiederholt/konvertiert wird? Die Anzahl der Zellen ist jeweils unbekannt, das Konvertieren würde ich gerne immer beim Start der Excel-Mappe vor...
18.06.2009 21:23:07
Thread-ID: 1082734
6 Beiträge
Datum formatieren mit VBA (Formular)
Wolle


Hallo Forum,
nachdem es jetzt klappt das die Daten aus der Tabelle in das Formular angezeigt werden, habe ich noch ein Problem mit der Formatierung "Datum"
Ich schreibe in dem Formular das Anfangs und enddatum und lasse Sie über das Formular in die Tabelle schreiben. Dort sollen Si...
01.12.2009 07:18:45
Thread-ID: 1121125
12 Beiträge
VBA: Gültigkeit für eine Zelle zuweisen
André

Moin zusammen,
ich möchte per VBA einer Zelle eine Gültigkeit zuweisen, und zwar eine Liste von Werten, die dann per Dropdown ausgewählt werden können.
Um den hierzu notwendigen Code zu erhalten, habe ich die Gültigkeit manuell zugewiesen und per Makrorekorder aufzeichnen lassen. Dabei...
22.03.2010 14:10:36
Thread-ID: 1147568
3 Beiträge
Formatieren von Zellen per VBA
Zellen

Guten Tag
habe bereits eine Ergänzungsfrage zu einem Projekt bei welchem mir hier via Forum schon sehr sehr gut geholfen wurde....
und zwar:
mittels folgendem Code schreibe ich in eine Spalte ein Datum:
Cells(j, 10).Value = CDate(MyDatStrg)
Wie müsste ich diese Zeile erweite...
07.12.2010 10:53:17
Thread-ID: 1190357
18 Beiträge
Datumsformat einer Arbeitsmappe per VBA ändern
Thomas

Gibt es eine Möglichkeit das Datumsformat einer Arbeitsmappe oder einer Excel-Sitzung per VBA zu ändern ?
Ich möchte eine Daten aus einer Webanwendung mit englischem Datumsformat übernehmen.
Eine Lösung wäre natürlich die Ländereinstellung im System zu ändern.
Aber diesen umständlic...
05.04.2011 22:09:12
Thread-ID: 1209166
2 Beiträge
Anzeige
Vba zellen mit bestimmten Inhalt formatieren
thomas

Hallo Leute
Ich würde gerne bestimmte Zellen per VBA so formatieren, dass bei einem bestimmten Inhalt ein Zellbereich mit einer Dicken Linie oben bzw. unten formatiert wird.
Ich habe eine Excel-Datei in der per Makro 2 Zeilen mit den Wörtern "Zwischensumme" und "Übertrag" an jedem Seit...
05.09.2011 07:33:20
Thread-ID: 1228619
3 Beiträge
VBA-Makro Zellen formatieren
Huber

Hallo zusammen
Bin zur Zeit an einem komplexeren Excel und komme nicht mehr weiter. Hoffe jemand kann mir helfen.
Ich hab ein Personalcontrolling und somit immer Zahlen von Januar bis Dezember.
In jedem Register habe ich also z.B. Bezeichnung, Jan 2011, Feb 2011, März 2011 ... und d...
16.12.2011 15:10:52
Thread-ID: 1242273
4 Beiträge
VBA: textbox afterupdate format Datum
Bernd

Hallo zusammen,
irgendwie bekomme ich das nicht richtig hin, vielleicht kann mir jemand behilflich sein und den Code berichtigen.
Hier mein Code, der nicht funktioniert:
Private Sub TextBox5_AfterUpdate() 'TextBox5 = format(CDbl(TextBox5), "TT.MM.JJJJ") End Sub Vielen Dank im...
03.06.2013 19:44:47
Thread-ID: 1316131
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige