Excel 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

0 vote222 views1 answer
Get current url vb.net
VBA
0 vote256 views1 answer
How to mount floppy disks in vb.net
VBA
5 votes254 views1 answer
Excel vba get user selected range
VBA
8 votes253 views1 answer
Excel vba make integer
VBA
1 vote230 views1 answer
Change the first item in a queue vb.net
VBA
4 votes221 views1 answer
Excel vba check cell not empty
VBA
0 vote237 views1 answer
Vba type
VBA
5 votes224 views1 answer
Excel vba high word from Long Integer
VBA
0 vote221 views1 answer
Type excel.application is not defined vb
VBA
0 vote248 views1 answer
Vba round to 2 decimals
VBA