Vba date to unix timestamp

'VBA functions to convert between Excel and Unix date-times.

'These work on Windows and optionally the Mac:

Function UnixDateTime#(ExcelDateTime As Date, Optional Mac As Boolean)
    Dim OSOffset: OSOffset = IIf(Mac, 24107, 25569)
    UnixDateTime = (ExcelDateTime - OSOffset) * 86400
End Function
         
Function ExcelDateTime(UnixDateTime#, Optional Mac As Boolean) As Date
    Dim OSOffset: OSOffset = IIf(Mac, 24107, 25569)
    ExcelDateTime = (UnixDateTime / 86400) + OSOffset
End Function

Source: academy.excelhero.com

Similar codes

-1 vote275 views1 answer
For i in range vba
VBA
0 vote290 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
0 vote283 views1 answer
Replace spaces with underscores vbnet
VBA
15 votes383 views1 answer
Excel vba wait
VBA
0 vote298 views1 answer
Vba add spaces
VBA
0 vote285 views1 answer
Thread sleep vb
VBA
0 vote282 views1 answer
Vba len variant
VBA
0 vote276 views1 answer
Vba word open document read only
VBA
0 vote283 views1 answer
Dlete rows with blanks and space " " vba
VBA
3 votes279 views1 answer
Vba request json
VBA