|
![](https://clubstatic.excelhome.net/image/common/ico_lz.png)
楼主 |
发表于 2009-5-12 12:16
|
显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
原帖由 weifaxiang 于 2009-5-11 22:07 发表 ![](http://club.excelhome.net/images/common/back.gif)
请指教。
你的公式:
=IF(--RIGHT(SMALL(IF(ISERR(FIND((COLUMN(A:J)-1)*ROW(A2:A9)^0,A2:A9)),10,(COLUMN(A:J)-1)*ROW(A2:A9)^0)+ROW(A2:A9)*10^3,COLUMN(A:J)+(ROW(A2:A9)-2)*10),3)=10,"",--RIGHT(SMALL(IF(ISERR(FIND((COLUMN(A:J)-1)*ROW(A2:A9)^0,A2:A9)),10,(COLUMN(A:J)-1)*ROW(A2:A9)^0)+ROW(A2:A9)*10^3,COLUMN(A:J)+(ROW(A2:A9)-2)*10),3))
只能说你很强吧,呵呵。如果问题再复杂点呢,呵呵。要善于运用名称来封装模块,模块化流水线作业。那样改进时,也可以从模块出发。 |
|