Hello Experts. I need your help to change the below Function code to also allow for null or blank values. Currently the code updates chk1 to True when there is a date, but does not update chk1 to True when null or blank.
Function chk1(A As String) As Boolean
Dim i As Integer, l As Integer, c As String
A = Trim(A) 'remove possible spaces
chk1 = False
If IsDate(A) Then chk1 = True
If IsNull(A) Then chk1 = True 'I inserted this line, but it does not work