вот фрагмент vba, на случай, если это поможет:
Dim s As String: s = "wergyuklwgh9235783850298"
Dim i As Long:
For i = 1 To Len(s)
If Mid(s, i, 1) Like "#" Then Exit For
Next
sLeft = Left(s, i - 1) ' now sLeft contains "wergyuklwgh"
sRght = Mid(s, i) ' now sRght contains "9235783850298"
может поместить это в публичную функцию, чтобы сделать небольшую UDF, используемую из строки формул