在Excel中将单元格拆分为以字符串和分号分隔的列

我有一个单元格列表，格式如下：

A1 >> Industry Type: Home & Garden,Import/Export/Wholesale, Location: Auckland,Hawkes Bay,Wellington, PriceRange: $250,000 to $400,000, Order By: Latest Listings

A2 >> Industry Type: Retail General,Technology / Computer / IT,Retail Food,Cafes, Location: Auckland,Wellington, PriceRange: Up to $100,000, Order By: Latest Listings

对于这两个单元格，我需要拆分它们的标签和内容。因此，对于第一个单元格，它将是（假设|旁边的内容是两个单元格）：

行业类型：|住宅和花园、进出口/批发，|地点：|奥克兰、霍克斯湾、惠灵顿，|价格范围：| 250000美元至400000美元，|订购人：|最新上市

---

如何同时使用字符串和分号拆分文本

如果您的数据总是按照相同的顺序（行业类型、位置、价格范围和订购方式），则可以使用一系列公式进行提取

单元格B1输入：

=LEFT(RIGHT(A1, LEN(A1)-15),FIND(", Location",RIGHT(A1,LEN(A1)-15))-1)

单元格C1输入：

=LEFT(RIGHT(A1,LEN(A1)-SUM(15,LEN(B1),12)),FIND(", Price",RIGHT(A1,LEN(A1)-SUM(15,LEN(B1),12)))-1)

单元格D1输入：

=LEFT(RIGHT(A1,LEN(A1)-SUM(15,LEN(B1),12,LEN(C1),14)),FIND(", Order",RIGHT(A1,LEN(A1)-SUM(15,LEN(B1),12,LEN(C1),14)))-1)

单元格E1输入：

=RIGHT(A1,LEN(A1)-SUM(15,LEN(B1),12,LEN(C1),14,LEN(D1),12))

然后将所有公式复制下来，以获取所有信息

---

可以使用一些命名的范围，甚至VBA来稍微清理一下，但这将完成工作。

对于普通公式来说，这是很困难的。VBA是否可以接受？