VBA to parse a text string containing three fields of different lengths

Hi

So I have a text string that contains three fields - Name, Product and Count. This is what the data can look like:


David Johnson Enrollment 3
Bill Trump Partnership and Collaboration 45
Deborah Fotheringay-Banks Accounting and Control 367


How can I have VBA automatically break this into the three fields, given there is no rule around the length of each field, in addition to no delimiter between each field?