txt文件批量导入表格中(TXT文件数据导入Excel整理合并)

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(1)

TXT源文件数据的格式如上图,需要将其导入到Excel处理如下图这样:

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(2)


导入txt文件到excel当中,操作框中只点击下一步

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(3)

红色方框都是需要导入的数据,现在进行数据筛选,A列保留红色方框内1或2的行。

输入辅助列公式:=IF(Q2="","","构件编号:"&ROUNDUP(COUNTA($Q$2:Q2)/2,0))

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(4)

单单筛选辅助列,剔除空白的数据

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(5)

复制数据到新的表格,第一列不需要复制;【或者筛选删除空白行。】

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(6)

编辑排版如下:

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(7)

继续添加辅助列公式:

R2单元格:=OFFSET($A3,,COLUMN(A1)),右拉

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(8)

R4单元格:=OFFSET($A5,,COLUMN(A3)),右拉

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(9)

选择四行向下填充公式:

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(10)

结果如下:

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(11)

将公式全部转换为数值,在原表上复制--粘贴--数值,然后执行筛选删除空白行

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(12)

最后结果如下,实现了最初的目的。

txt文件批量导入表格中(TXT文件数据导入Excel整理合并)(13)

【总结】这个txt数据总体来说是比较规律的,应用VBA处理也是十分方便。

但,VBA只是最终手段,用上面的操作方式处理,也就几分钟的事儿。

这个问题是在某论坛上面看到的,给我的感觉就是无论什么大事小事,

难事简单事,上某论坛找义工就没错了。

完全就好像没思考过一样。

题外话,打铁还需自身硬,希望大家都是牛逼闪闪的。

,

免责声明:本文仅代表文章作者的个人观点,与本站无关。其原创性、真实性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容文字的真实性、完整性和原创性本站不作任何保证或承诺,请读者仅作参考,并自行核实相关内容。文章投诉邮箱:anhduc.ph@yahoo.com

    分享
    投诉
    首页