Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
580to584
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datum-Format in Systemsteuerung ändern

Datum-Format in Systemsteuerung ändern
11.03.2005 11:20:41
Remo
Hallo zusammen
Ich möchte mittels eines VBA-Makro auf die Systemsteuerung zugreifen.
Das kurze Datumsformat soll auf die Form "TT.MM.JJJJ" gebracht werden.
Habt ihr irgendwelche Ansätze? Danke für eure Hilfe
Gruss Remo

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

Betreff
Datum
Anwender
Anzeige
AW: Datum-Format in Systemsteuerung ändern
11.03.2005 12:06:25
Matthias
Hallo Remo,
damit kann man das Format auslesen:
Option Explicit
Private Declare Function GetSystemDefaultLCID Lib _
"kernel32" () As Long
Private Declare Function GetLocaleInfo Lib "kernel32" _
Alias "GetLocaleInfoA" (ByVal Locale As Long, _
ByVal LCType As Long, ByVal lpLCData As String, _
ByVal cchData As Long) As Long
Function GetShortDateFormat() As String
Dim LCID&, Result&, Buffer$, Length&, ID&
ID& = &H1F
LCID = GetSystemDefaultLCID()
Length = GetLocaleInfo(LCID, ID, Buffer, 0) - 1
Buffer = Space(Length + 1)
Result = GetLocaleInfo(LCID, ID, Buffer, Length)
GetShortDateFormat = Left(Buffer, Length)
End Function

(hier gefunden:
http://www.activevb.de/tipps/vb6tipps/tipp0277.html
und aufs Datum beschränkt)
Vielleicht kannst du die Information nutzen, um deinen Code daraufhin anzupassen!
Gruß Matthias
Anzeige
AW: Datum-Format in Systemsteuerung ändern
11.03.2005 12:43:25
Remo
Danke - ist sicher einmal ein guter Ansatz!

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige