I need a formula to find and return the first letter in a string. So if a cell contains:

```
1234(*&^%$23ADFG54
```

the formula would return:

```
A
```

**EDIT#1:**

I am currently using the following *UDF:*

```
Public Function FirstLetter(Sin As String) As String
Dim i As Long, CH As String
FirstLetter = ""
For i = 1 To Len(Sin)
If Mid(Sin, i, 1) Like "[A-Z]" Then
FirstLetter = Mid(Sin, i, 1)
Exit Function
End If
Next i
End Function
```

But I need a non-VBA solution.

EDIT#1– Gary's Student Nov 30 '14 at 19:37