如何用vba将试卷题目和选项分开?

比如单元格中有一列试卷的题目和选项,其中每道题的题目和选项在一个单元格中,形式如下:

要将上述的内容按照 题目内容+A选项内容+B选项内容+C选项内容+D选项内容 的形式分别拆分到不同的单元格

可以使用如下的思路:

1.首先确定各个选项后面的分隔符是否统一,如果统一获取该分隔符。

2.用正则表达式将 选项+分隔符 替换为一个不可能存在于题目内容和选项内容中的字符。

3.用split函数拆分步骤2替换后的字符生成数组,然后依次填入具体的单元格中。

代码如下:

       

发表评论