每列的函数如下(粘贴在第一行然后往下拖就行)：

C：=SUMPRODUCT((MID(A1,ROW($1:$999),1)="D")*1)

D：=C1*200

E：第一列写=D1 第二列写=E1+D2，从第二列开始往下拖

F：=CONCATENATE(B1,E1,"}")

H：=IF(G1="","",E1)

I：=IF(G1="","",CONCATENATE(G1,H1,"}"))

J：=CONCATENATE(F1,I1)

这个表格保存，以后要处理谱子直接粘进去就好

最后一列(这里就是J列)得到的文本粘贴进word里面查

找内容^p,下面不填，然后你就得到了合在一起的文本

头尾加上大括号，第一行写15#就可以了