Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.11.2023 15:32:06
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Datum und Uhrzeit ausgeben in Text-Datei per VBA

Datum und Uhrzeit ausgeben in Text-Datei per VBA
02.08.2014 16:01:40
Ingo Siemon

Hallo
Ich möchte gerne mit VBA das aktuelle Datum und die aktuelle Uhrzeit ausgeben.
Es soll in eine Textdatei ausgegeben werden.
Immer wenn das Makro gestartet wird, soll das aktuelle Datum und die aktuelle Uhrzeit in die Text-Datei geschrieben werden.
Dabei möchte ich ein bestimmtes Format haben.
Ein Stück weit bin ich schon gekommen.
Jetzt ist der 02. August 2014 und es ist 15:58:12 Uhr
Es soll ausgegeben werden:
Sat, 02 Aug 2014 15:47:38
Ich habe es bisher soweit hinbekommen:
Application.Text(Now, "[$-409]dd mmm yyyy hh:mm:ss")
Es wird aber "nur das hier ausgegeben:
02 Aug 2014 15:47:38
Wie bekomme ich denn noch die englische Abkürzung für den Tag mit 3 Buchstaben dort hinein?
Könntet Ihr mir da helfen?
Gruß
Ingo

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum und Uhrzeit ausgeben in Text-Datei per VBA
02.08.2014 16:07:11
Hajo_Zi
Hallo Ingo,
Application.Text(Now, "[$-409]ddd dd mmm yyyy hh:mm:ss")

AW: Datum und Uhrzeit ausgeben in Text-Datei per VBA
02.08.2014 18:27:35
Ingo Siemon
Ach Mensch, wie einfach.
Da hätte ich ja auch mal selber drauf kommen können.
Danke Dir sehr für Deine Hilfe.

Anzeige

407 Forumthreads zu ähnlichen Themen


Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...

Guten Tag
Mit nachfolgendem Code wandle ich einen Textstring in ein Datum um. Komisch ist, dass ich die Schleife zweimal hintereinander laufen lassen muss. Nach dem ersten Mal wird das Datum mit "d/m/yy" und erst das zweite Mal im gewünschten Format "dd.mm.yy" angezeigt.
Was muss ich än...

Hallo Excel-Freunde
ich möchte gern per Formel folgendes lösen:
in zelle a3 steht
1 haley, bill rock around the clock 1956
jetzt soll in b3 die "1" stehen --- löse ich per Formel mit =LINKS(A3;SUCHEN(" ";A3)-1)
in e3 soll "1956" stehen --- löse ich mit Array-Formel {=...

Hallo ihr lieben,
ich schreib jetzt schon den ganzen Tag an folgender Routine:
Private Sub CommandButton1_Click() Dim z As Integer z = Range("I101").End(xlUp).Row + 1 TextBox1 = Format(CDate(TextBox1.Value), "dd.mm.yyyy") Cells(z, 9) = TextBox1 'Datum des Tauchgangs Cells(z, 12) = Tex...

Hallo, ich versuche grade bei einem Schichtplan die Verschiedenen Zelleninhalte z.B. Zelle A3 Inhalt "U1",Zelle A4 Inhalt"1/3" usw. in Werte umzuwandeln und diese dann als Stunden ausrechennen zu lassen.
Also so soll z.B. aus dem Inhalt von Zelle A3, dort steht "U1" soll dann 8 Stunden ents...

Hallo,
ich habe einen Textstring mit Zahlen die ich rechstbündig anordnnen will.
Text= "Beisiel: " & Format (Zahl,"#,###")
Wie wird die Zahl im Formatbefehl z.B rechtsbündig bei max 6 Stellen ausgegeben?
Gruß
Helmut

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige