有个小问题

sampsonpon

Sheet1里A12值=Sheet1里A12值本身+表TO里第一列的行数值-1
Sheet1.Range("A12").Value = Sheet1.Range("A12").Value + Sheets("TO").Cells(Rows.Count, 1).End(3).Row - 1

Sheets("TO").Cells(Rows.Count, 1).End(3).Row这里的Rows前到底要不要加.或者加Sheets("TO").?

z865593849

要加的，不然就是默认activesheet

kevinchengcw

最好是加上Sheets("TO").，考虑到03与07的行数不同，不加有出错的几率

小凡、、、

不加的话，会在默认显示的sheet上获取最大行号，你在“T0”表上运行没问题，切到sheet1里就不对了

大灰狼1976

如果是Rows.Count这里的话，一个文件内所有工作表rows都是相同的，不需要加工作表限定。

sampsonpon

小凡、、、 发表于 2024-11-4 16:44
不加的话，会在默认显示的sheet上获取最大行号，你在“T0”表上运行没问题，切到sheet1里就不对了

所以是：Sheet1.Range("A12").Value = Sheet1.Range("A12").Value + Sheets("TO").Cells(Sheets("TO").Rows.Count, 1).End(3).Row - 1

sampsonpon

大灰狼1976 发表于 2024-11-4 16:46
如果是Rows.Count这里的话，一个文件内所有工作表rows都是相同的，不需要加工作表限定。

Sheets("TO").Cells(Rows.Count, 1).End(3).Row也就是说：(Rows.Count, 1)前面的Sheets("TO").Cells已经给界定了？是这样吗？

kevinchengcw

rows.count前面不加前缀是从activesheet取的
如果activesheet不是sheets("TO")，而activesheet是03的表，而sheets("TO")是07的表，如果数据量还超过了03表的最大值，则可能取值范围就不准确
反之，如果activesheet是07的表，而sheets("TO")是03的表，这里会报错
以上两种情况是不确定因素，所以加上前缀才能保证不出这个问题

大灰狼1976

sampsonpon 发表于 2024-11-5 11:04
Sheets("TO").Cells(Rows.Count, 1).End(3).Row也就是说：(Rows.Count, 1)前面的Sheets("TO").Cells已经 ...

不是的，rows.count可以看作一个常量，同一文件里面所有工作表行数都是一样的，所以不必做限定，除非是xls格式。

nihao123456789

要加的。不加的话会限制使用场景。
当宏放在模块中的时候，需要明确具体的sheet，否则sheet不同结果也不同了。取数会错误。