I2输入公式:=IFERROR(INDEX(A:A,MATCH(J2,B:B,0)),"")
下拉
J2输入公式:=IF(OFFSET($B$2,INT((ROW(A1)-1)/7),MOD(ROW(A7),7))<>"",CHOOSE(MOD(ROW(A7),7)+1,"",$C$1&".",$D$1&".",$E$1&".",$F$1&".",$G$1&":","")&OFFSET($B$2,INT((ROW(A1)-1)/7),MOD(ROW(A7),7)),"")
下拉
将H/I两列表格直接复制到WORD中,调整边框即可。
附件已上传,如果看不见请按Ctrl+Shift+F5刷新页面。
这个转换起来 步骤还是很多的 虽然难度不是很大……叙述如下:
1、首先复制 你的表格数据(除了列标之外)然后 粘贴到 word 中 成为一个word 表格……
2、选中表格 然后 点 表格菜单 转换---表格转成文本 使用 段落标记……
3、使用替换 功能逐一替换 最后完成你需要的格式
1) 作如下替换 查找里填写 ([0-9])(^13) 替换里填写 \1、全部替换(勾选通配符,目的是先把题号及题目处理成一行)……
2)查找里 填写 ^13 替换里 填一个 特殊符号(目前文字里没有的)如 ◆ 全部替换……
3)查找里 填写 ([0-9]、*)(◆) 替换里 填写 \1^p◆ 全部替换……
4|)查找里 填写 (◆)([0-9]) 替换里 填写 ^p\2 全部替换……
5)最后一步有些麻烦了 要手工逐一进行分段替换了,查找里 填写 ◆替换里 填写 ^p 每一段开头第一次替换后 要使用项目编号 并且进行缩进 选则 A B C D……这样的编号 ,然后再逐步进行一个一个的替换……
祝你快乐!