TXT源文件数据的格式如上图，需要将其导入到Excel处理如下图这样：导入txt文件到excel当中，操作框中只点击下一步红色方框都是需要导入的数据，现在进行数据筛选，A列保留红色方框内1或2的行。这个txt数据总体来说是比较规律的，应用VBA处理也是十分方便。但，VBA只是最终手段，用上面的操作方式处理，也就几分钟的事儿。完全就好像没思考过一样。题外话，打铁还需自身硬，希望大家都是牛逼闪闪的。
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只是最终手段，用上面的操作方式处理，也就几分钟的事儿。
这个问题是在某论坛上面看到的，给我的感觉就是无论什么大事小事，
难事简单事，上某论坛找义工就没错了。
完全就好像没思考过一样。
题外话，打铁还需自身硬，希望大家都是牛逼闪闪的。
,
