宏的话,split来分割字串,置入变量内,ubound来回传最大下标(0起加1可得个数)取得的个数用于range.resize内,再将该变量写入,变量需配合工作表函数transpose转置确定最后一笔有值的储存格range.end、range.find或列号(前述range.row),因有连续也可以工作表函数counta取得写入最后一笔储存格或列号下方的话,range.offset或列号+1公式的话,零件代号为固定长度的话
https://i.imgur.com/7qSEIYS.jpg非固定长度的话
https://i.imgur.com/sswFm2k.jpg