ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

EH搜索     
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
Excel不给力? 何不试试FoxTable! Excel 2016函数公式学习大典 Office知识技巧免费学 打造核心竞争力的职场宝典
300集Office 2010微视频教程 Tableau-数据可视化工具 精品推荐-800套精选PPT模板,点击获取 ExcelHome出品 - VBA代码宝免费下载
你的Excel 2010实战技巧学习锦囊 欲罢不能, 过目难忘的 Office 新界面 Excel VBA经典代码实践指南
楼主: opiona

[原创] 工作簿汇总,工作表汇总合并,多文件汇总合并 通用代码 支持多层子文件夹

    [复制链接]

TA的精华主题

TA的得分主题

发表于 2020-10-22 13:58 | 显示全部楼层
感谢opiona老师,太厉害了,谢谢分享。非常实用!

TA的精华主题

TA的得分主题

发表于 2020-10-26 08:58 | 显示全部楼层
老师,有多工作簿多个工作表,指定几列的数据汇总(工作表格式不同,标题相同不同)的例子吗

TA的精华主题

TA的得分主题

发表于 2020-11-4 23:12 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2020-11-6 22:01 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2020-11-9 10:46 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2020-11-9 12:41 | 显示全部楼层

下面的代码如何改成粘帖的时候 是粘帖值

Sub 按钮7_Click()
    Application.ScreenUpdating = False
    Dim wb As Workbook
    Set wb = Workbooks.Open(ThisWorkbook.Path & "(已自动还原).xlsx")
    wb.Sheets("云数据").Range("A1:L1500").Copy ThisWorkbook.Sheets("S1").Range("A1")
    wb.Saved = True
    wb.Close
    Application.ScreenUpdating = True
    MsgBox "已自动更新计划表!"
End Sub

TA的精华主题

TA的得分主题

发表于 2020-11-11 16:46 | 显示全部楼层
你好老师,请问多个工作簿里面有多个工作表的固定几个位置单元格数据需要汇总,请问怎么写程序,我是对编程不懂,想学习一下。能否帮忙指导一下。比如附件中《01桩检验批1# - o》工作簿里面的”钻孔桩施工记录”工作表,黄色底纹的三处想要汇总,请问要怎么写程序

因为只能上传2M,所以只发了几个工作簿内容。

资料(汇总).rar

1.8 MB, 下载次数: 1

单元格内容汇总

TA的精华主题

TA的得分主题

 楼主| 发表于 2020-11-11 21:28 | 显示全部楼层
linweisheng 发表于 2020-11-11 16:46
你好老师,请问多个工作簿里面有多个工作表的固定几个位置单元格数据需要汇总,请问怎么写程序,我是对编程 ...

2_多工作簿指定工作表,指定几个位置的数据汇总
数据在多个工作簿内,每个工作簿有一个相同格式和标题的工作表
需要这个工作表,几个固定位置的数据

TA的精华主题

TA的得分主题

发表于 2020-11-11 23:10 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2020-11-11 23:12 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关注官方微信,每天学会一个新技能

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2020-12-1 22:26 , Processed in 0.069972 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2021 Wooffice Inc.

   

沪公网安备 31011702000001号 沪ICP备11019229号

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:徐怀玉律师 李志群律师

快速回复 返回顶部 返回列表