“VBA Split String” Ответ

VBA Split String

Dim names() As String
names = Split( "John Paul Smith" ,",")