Code:
Function SplitString(ByVal value As String) value = StrConv(value, vbUnicode) SplitString = Split(Left(value, Len(value) - 1), vbNullChar) End Function
Above code will return an array of characters.
Function SplitString(ByVal value As String) value = StrConv(value, vbUnicode) SplitString = Split(Left(value, Len(value) - 1), vbNullChar) End Function
Above code will return an array of characters.