Kan man ändra Datum ut skriften till skrivaren

Detta ger ju År-Månad-Datum
Printer.Print " "; Date & ""
Jag skulle vilja ha Datum-Månad-År




Sören

Ett sätt är fixa till det

Dim Datum As String

Datum = Right(Date, 2) + "-" + Mid(Date, 6, 2) + "-" + Left(Date, 4)
Printer.print Datum
/Bo

Tack så mycket, det fungerade


Sören

Mycket fult sätt att göra det på. Efter som datum formateras efter de3n lokala inställningen kommer koden bara att fungera under inställningar med samma datumformat som svenska.

Det korekta sättet att göra det är:
<code>
Printer.Print " "; Format$(Date, "dd-mm-yyyy")

</code>
Eller:
<code>
Printer.Print " "; Day(Date) & "-" & Month(Date) & "-" & Year(Date)

</code>