寸有所长，尺有所短。

yyhhhbb

谢谢大家

回去我一定好好学习，向你们看齐。

kankan1030

1、=INDIRECT("2!R"&CEILING((FIND(V6,PHONETIC(A1:T15))-1)/60,1)&"C"&MOD((FIND(V6,PHONETIC(A1:T15))-1)/3,20)+1,0)   
速度：18.76S
2、=SUMIF(OFFSET($A$1:$T$1,LOOKUP(MID($V6,1,1),{"a","b","c"},{4,9,14}),0,-5),V6,OFFSET('2'!$A$1,LOOKUP(MID($V6,1,1),{"a","b","c"},{0,5,10}),,,))
速度：24.93S
3、=SUMIF($A$1:$T$15,$V6,'2'!$A$1)
速度：26.93S
4、=INDIRECT("2!"&TEXT(SUM((A1:T15=V6)*(ROW(A1:T15)*1000+COLUMN(A1:T15))),"r0c000"),0)
速度：28.33S
5、=MIN(IF($A$1:$T$15=$V6,'2'!$A$1:$T$15))
速度：40.52S

以上公式测试环境相同，均为运算十万次所需的时间。

yyhhhbb

=INDIRECT("2!R"&CEILING((FIND(V6,PHONETIC(A1:T15))-1)/60,1)&"C"&MOD((FIND(V6,PHONETIC(A1:T15))-1)/3,20)+1,0)

我还没看懂，不过我想一定能很快，我这就回去试试

再次感谢zljkd007先生和kankan1030先生！

kankan1030

原帖由 yyhhhbb 于 2010-10-15 19:26 发表
=INDIRECT("2!R"&CEILING((FIND(V6,PHONETIC(A1:T15))-1)/60,1)&"C"&MOD((FIND(V6,PHONETIC(A1:T15))-1)/3,20)+1,0)

我还没看懂，不过我想一定能很快，我这就回去试试

再次感谢zljkd007先生和kankan1030先生！

PHONETIC应该是有限制的，不适合你的大数据量表格。我猜测用整个区域去做运算会导致速度变慢，可对比一下采用辅助列或VBA的方式，相信速度会有提升！

zljkd007

请问测试速度怎么测试？

aking9505

楼主朋友，要快电脑配置高点吧，我的电脑是看不出来这个有啥快慢区别。你能计时一下来说明问题吗？
要么就控制屏幕刷新次数。

[ 本帖最后由 aking9505 于 2010-10-15 19:51 编辑 ]

kankan1030

原帖由 zljkd007 于 2010-10-15 19:44 发表
请问测试速度怎么测试？

Sub TestFormula()

Dim strFormula As String
Dim vRetValue As Variant
Dim lngIterations As Long, lngLooper As Long
Dim sngTimer As Single

lngIterations = 100000

strFormula = "=MAX(IF(IF(ISTEXT(A1:T15),V6)=A1:T15,'2'!A1:T15))"
sngTimer = Timer

For lngLooper = 1 To lngIterations
vRetValue = Application.Evaluate(strFormula)
Next lngLooper

MsgBox lngIterations & " took " & Format(Timer - sngTimer, "0.00") & " seconds"

End Sub
测试代码，引号中间部分为被测试的公式！ 100000为重复次数，可根据实际情况自行修改！

[ 本帖最后由 kankan1030 于 2010-10-15 20:11 编辑 ]

海婷

原帖由 zljkd007 于 2010-10-15 19:44 发表
请问测试速度怎么测试？

同样问题关注

yyhhhbb

万分感谢各位的知道！
尤为感谢kankan1030先生！

公示的写法的确与运算速度有关，并不是写法简单就是最好，而应注重运算的准确性与简捷性的结合才算好！

yyhhhbb

=INDIRECT("2!R"&CEILING((FIND(V6,PHONETIC(A1:T15))-1)/60,1)&"C"&MOD((FIND(V6,PHONETIC(A1:T15))-1)/3,20)+1,0)   

这个公式与“文字”有关，可惜我的电脑不能运行。（好像和日语有关）

我的电脑配置并不低，只是数据太大。公式求值多达几百万个单元格，书写文本及数值上亿，
所以在用公式上要格外揣摩，