[已解决]数据统计

szzb

求助各位大神:关于数据统计问题，内容如题。

最佳答案

月排行榜 / 总排行榜

grf1973

2017-10-31 13:22

原来代码里有：
For Each SHT In Sheets
                If SHT.Name < "汇总" Then
改一下：
For Each SHT In Sheets
                If SHT.Name < >"汇总" And SHT.Name < >"A" Then
即可。
或者如果只统计某张工作表之后（比如从第三张表开始统计）的
for k=3 to sheets.count
      set sht=sheets(k)

跳转到最佳答案楼层

大灰狼1976

打开后错误，代码丢失，所以也不好给你在原代码上修改。
只要在你原来代码的基础上，循环工作表时，跳过A工作表就行了。

szzb

大灰狼1976 发表于 2017-10-31 12:44
打开后错误，代码丢失，所以也不好给你在原代码上修改。
只要在你原来代码的基础上，循环工作表时，跳过A ...

谢谢老师指点，要如何跳过呢

grf1973

原来代码里有：
For Each SHT In Sheets
                If SHT.Name < "汇总" Then
改一下：
For Each SHT In Sheets
                If SHT.Name < >"汇总" And SHT.Name < >"A" Then
即可。
或者如果只统计某张工作表之后（比如从第三张表开始统计）的
for k=3 to sheets.count
      set sht=sheets(k)

grf1973

或者如果只统计某张工作表之后（比如从第三张表开始统计）的,还有种写法：
For Each SHT In Sheets
      If SHT.Index>=3 Then

szzb

grf1973 发表于 2017-10-31 13:23
或者如果只统计某张工作表之后（比如从第三张表开始统计）的,还有种写法：
For Each SHT In Sheets
      ...

谢谢老师指点，可是我想点击"汇总"时所有的工作表都能统计进来。

grf1973

相当无语。你把汇总的代码复制一份，改为“汇总1”，然后按上面的修改即可。