|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
原帖由 wangg913 于 2011-2-15 18:07 发表 ![](http://club.excelhome.net/images/common/back.gif)
时过境迁,现在感觉这个题目还是很有趣。
=ADDRESS(ROW(),LOOKUP(4,MATCH("*"&MID(LARGE(-(1&REPT(ROW($1:$10)-1,COLUMN(A:J))),ROW($1:$100)),3,10)&"*",A1:C1&"",)),4)
数组公式。
再简化,下拉的公式,长度9 ...
呵呵,有意思,很佩服大头兄的钻研精神。
=ADDRESS(ROW(),LOOKUP(4,MATCH("*"&REPT(RIGHT(ROW($10:$109)),ROW($10:$109)/10)&"*",A1:C1&"",)),4)
红色部分的Match和rept组合非常强悍,之后的lookup用的也很巧妙,学习了。
借花献佛:
=CHAR(LOOKUP(4,MATCH("*"&REPT(RIGHT(ROW($10:$109)),ROW($10:$109)/10)&"*",A1:C1&"",))+64)&ROW()
再减2字符,长度94,依旧是普通公式。 |
|