本人在一个集团公司工作,下属有若干公司,常下发若干excel表格。表格的样式都一样,收回来的是全国各地上报的。除了在单元格内输入=B12+[安徽.xls]Sheet1!$B$12+[内蒙古.xls]Sheet1!$B$12+[上海.xls]Sheet1!$B$12……等简单的excel单元格相加方法外,还有没有别而办法。34-40加单位,在手动输入的时候可能会遗漏,假如有100家单位呢?难免+的时候会漏掉。求高手指点迷津,不胜感激。
同问,财务报表多行多列,这个公式能够汇总吗?
追答For j = 1 To 20 ‘我这里设置的20列, 你可以自己改成 实际列输入
行数 是实际有多少行 就收集多少行
For i = 2 To r '从第二行开始收集, 如果开始不是第二行, 把 2修改为实际开始行数
按F5提示“运行错误9,下表越界。”怎办呢?
Set sh = wk.Sheets("sheet1")
arr = wk.Sheets("sheet1").UsedRange
表名称 默认为 sheet1 , 请修改为实际 名称
还是下标越界,选择继续,出现1004错误。
追答可是我的表格是很多列的,比如财务报表汇总,怎么处理?
追答.Range("a1").Value = .Range("a1").Value + w.Sheets(1).Range("b2").Value
.Range("a2").Value = .Range("a2").Value + w.Sheets(1).Range("b3").Value
.Range("a4").Value = .Range("a4").Value + w.Sheets(1).Range("b4").Value
'可以仿照上面语句增加其他需要汇总的单元格.