Function CheckForLetter(strSearch As String) As Boolean Dim intPosition As Long CheckForLetter = True For intPos = 1 To Len(strSearch) CheckForLetter = (Mid$(strSearch, intPosition, 1) Like "[a-zA-Z]") If Not CheckForLetter Then Exit For Exit Function Next intPosition End Function
|Excel callender with date slider||5||28|
|Most Consistent Performer||4||22|
|SQL select * from doesn't work with variable but ok with string directly.||3||11|
|How to use vba code to toggle a text box in access between plain text and rich text or make the output view look like the plain text view where the data is not all lumped together?||3||14|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
24 Experts available now in Live!