Enum DateTimeFormat dtGeneralDate dtLongDate dtMediumDate dtShortDate dtLongTime dtMediumTime dtShortTime dtCustomEnd Enum' Enhanced VB FormatDateTime functionFunction FormatDateTimeEx(newDate, Optional ByVal dtFormat As DateTimeFormat = _ dtGeneralDate, Optional FirstDayOfWeek As VbDayOfWeek = vbSunday, _ Optional FirstWeekOfYear As VbFirstWeekOfYear = vbFirstJan1) ' Select the right formatting function Select Case dtFormat Case dtGeneralDate FormatDateTimeEx = FormatDateTime(newDate, vbGeneralDate) Case dtLongDate FormatDateTimeEx = FormatDateTime(newDate, vbLongDate) Case dtMediumDate FormatDateTimeEx = Format(newDate, "Medium Date", FirstDayOfWeek, _ FirstWeekOfYear) Case dtShortDate FormatDateTimeEx = FormatDateTime(newDate, vbShortDate) Case dtLongTime FormatDateTimeEx = FormatDateTime(newDate, vbLongTime) Case dtMediumTime FormatDateTimeEx = Format(newDate, "Medium Time", FirstDayOfWeek, _ FirstWeekOfYear) Case dtShortTime FormatDateTimeEx = FormatDateTime(newDate, vbShortTime) Case dtCustom FormatDateTimeEx = Format(newDate, "dddd d mmmm yyyy - Hh:Nn:Ss") End Select End Function


Data Observability Explained
Data is the lifeblood of any successful business, as it is the driving force behind critical decision-making, insight generation, and strategic development. However, due to its intricate nature, ensuring the