TXT源文件数据的格式如上图,需要将其导入到Excel处理如下图这样:
导入txt文件到excel当中,操作框中只点击下一步
红色方框都是需要导入的数据,现在进行数据筛选,A列保留红色方框内1或2的行。
输入辅助列公式:=IF(Q2="","","构件编号:"&ROUNDUP(COUNTA($Q$2:Q2)/2,0))
单单筛选辅助列,剔除空白的数据
复制数据到新的表格,第一列不需要复制;【或者筛选删除空白行。】
编辑排版如下:
继续添加辅助列公式:
R2单元格:=OFFSET($A3,,COLUMN(A1)),右拉
R4单元格:=OFFSET($A5,,COLUMN(A3)),右拉
选择四行向下填充公式:
结果如下:
将公式全部转换为数值,在原表上复制--粘贴--数值,然后执行筛选删除空白行
最后结果如下,实现了最初的目的。
【总结】这个txt数据总体来说是比较规律的,应用VBA处理也是十分方便。
但,VBA只是最终手段,用上面的操作方式处理,也就几分钟的事儿。
这个问题是在某论坛上面看到的,给我的感觉就是无论什么大事小事,
难事简单事,上某论坛找义工就没错了。
完全就好像没思考过一样。
题外话,打铁还需自身硬,希望大家都是牛逼闪闪的。
,