Free for PREMIUM members
[Last Call] Learn how to a build a cloud-first strategyRegister Now
Public Function GetDateFromYYYYMMDD(ValueIn As String) As Date
Dim s As String
s = Left(ValueIn, 4) & "-" & Mid(ValueIn, 5, 2) & "-" & Right(ValueIn, 2)
GetDateFromYYYYMMDD = CDate(s)
Open in new window
Public Function TextToDate(strTextDate As String) As Date
Dim strDate As String
strDate = Mid(strTextDate, 5, 2) & "/" & Right(strTextDate, 2) _
& "/ " & Left(strTextDate, 4)
TextToDate = CDate(strDate)
Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.