关于Excel表格自动更新的问题，急！

来源：百度知道 编辑：UC知道 时间：2024/06/17 17:16:47
领导给我一个总表格，我将总表格整理分类分成若干份表格下发到各分支机构填写相关数据，然后收回各分支机构表格将数据填写进总表格中
如何让我收回的各分支机构的数据自动更新到我的总表格中？
因不死很精通，需要具体的操作步骤
===================================================================
在线等
累加
表格格式是一定的，各分支机构只是填写数据

A3单元格，再点菜单栏，数据，自文本，选"湖北报表.TXT"，接下来根据文本文件的具体情况选择。最后确定

问题不是很清晰
不知道是需要累加的
还是需要将各个分支机构的汇总誊写到一个表上
实现起来不一样
********我分我割×××
既然是累加的就要用宏了，需要你的表的格式
方便的Hi我

如果各分支机构填写相关数据是一张的固定表格，要实现就很容易了。只要在单元格中输入：=某一分支机构填写相关数据单元格就好了+原数据，再对意表刷新一下就OK了。我说说是简单的，要是不懂的做做还是困难的。

'所有表格第一行为标题，数据从第二行开始
'将要回收的分表放到“D:\分表文件夹”，如果没有可以自己建立（自己的原始表格不要放进去）

Sub 表格合并()

lj = "D:\分表文件夹\"
thisfile = ActiveWorkbook.Name
Sheets(1).Select
Filename = Dir(lj & "*.xls")

Do Until Filename = ""
Set Newbook = Workbooks.Open(lj & Filename)

'======分表合并

Workbooks(Filename).Activate
Sheets(1).Select

i = 2
Do Until Cells(i, 1) = ""

temp = Cells(i, 1)

If Not Workbooks(thisfile).Sheets(1).[A:A].Find(temp, , , 1, , 1) Is Nothing Then
rc = Workbooks(thisfile)