把文本比对的结果保存为 *.xlsx ,使其不用“比对程序”也可浏览
vb吧
全部回复
仅看楼主
level 1
nhjsjjs 楼主
这是怎么做到的呢?
我们可以从如下的视角观察“文本A”与“文本B”之间的关系:
先把“文本A”复制一份,名为“A副本”,然后把“A副本”进行编辑,最后把编辑完的“A副本”改名为“文本B”。
当比对程序在比对过程中发现对“A副本”做过“删除行”和“修改行”的操作时,比对程序会在“文本A”的对应行的行首标注记号“! ”(似乎是为了“有案可查”);当比对程序发现对“A副本”做过“插入行”的操作时,比对程序会在那些插入的行的行首也标注记号“! ”。
这样一来,Excel 的“条件格式”功能就有“用武之地”了。
下面是程序的界面与代码:
我的“比对程序”在“计算”(比对)后,会出现2个【复制】按钮。单击1次左边的【复制】按钮,剪贴板里就有了“文本A”的全部文本。这时,可以打开Excel ,调节好A列和B列的宽度,单击A1单元格按 Ctrl-v 粘贴。
单击1次右边的【复制】按钮,剪贴板里就有了“文本B”的全部文本,再单击B1单元格按 Ctrl-v 粘贴。表格里就有了2边的文本。(这时可以退出比对程序)。
单击任一个有数据的单元格,再按 Ctrl-A 选中了矩形区域。按【条件格式】……参照(图例)的设置。等到完成、满意后,保存文件(另存为)。
因为文章太长,所以代码下一贴再写出。
2024年10月17日 03点10分 1
level 9
思路不错。或许可以用excel的VBA,把后面手操作的部分也自动化。
2024年10月17日 07点10分 2
1