Public Function fCursorToStartOnClick()
'* Move cursor to start of text field when clicked
On Error Resume Next
If Len(Screen.ActiveControl.InputMask) > 0 Then
If IsNull(Screen.ActiveControl) Then
Screen.ActiveControl.SelStart = 0
End If
End If
On Error GoTo 0
End Function