为C列自定义函数的代码运算提速

13782671637 · 发表于 2018-6-16 10:55

lsc900707 发表于 2018-6-16 10:46
m = Cells(Rows.Count, 11).End(3).Row - 4 这行怎么修改？

版主老师：54楼-57楼里，粗红色字体是需要修改的数据源列标，粗蓝色字体是需要修改的公式所在列列标，我标颜色的地方还有没有其他遗漏之处？

lsc900707 · 发表于 2018-6-16 10:56

13782671637 发表于 2018-6-16 10:55
版主老师：54楼-57楼里，粗红色字体是需要修改的数据源列标，粗蓝色字体是需要修改的公式所在列列标，我 ...

很简单，测试代码，结果正确就改对了，否则就还有问题。

13782671637 · 发表于 2018-6-16 10:58

lsc900707 发表于 2018-6-16 10:53
m = Cells(Rows.Count, 2).End(3).Row - 4
修改成：
m = Cells(Rows.Count, 11).End(3).Row - 4

m = Cells(Rows.Count, 11).End(3).Row - 4 2改11，代表B改K。谢谢版主提醒！

13782671637 · 发表于 2018-6-16 11:00

lsc900707 发表于 2018-6-16 10:56
很简单，测试代码，结果正确就改对了，否则就还有问题。

嗯。万分感谢版主老师的关爱和提点！

13782671637 · 发表于 2018-6-16 13:43

各位大神：请看附件

修改G列代码的计算规则.zip (868.99 KB, 下载次数: 5) ，请按G17:G18的要求修改G7:G13代码的计算规则。

13782671637 · 发表于 2018-6-16 13:46

zopey 发表于 2018-6-16 10:30
m = Cells(Rows.Count, 2).End(3).Row - 4

k0 = .End(4).Row - 4 跟这个差不多哦，

老师：帮忙看看65楼附件里的问题怎么解决？

13782671637 · 发表于 2018-6-16 14:57

恳请高手大神们帮忙看看65楼附件里的问题怎么解决？

13782671637 · 发表于 2018-6-16 15:43

恳请高手大神们帮忙看看65楼附件里的问题怎么解决？

13782671637 · 发表于 2018-6-16 16:41

恳请高手大神们帮忙看看65楼附件里的问题怎么解决？

13782671637 · 发表于 2018-6-16 18:29

恳请高手大神们帮忙看看65楼附件里的问题怎么解决？

		自动登录	找回密码
密码			免费注册

[求助] 为C列自定义函数的代码运算提速