文件薄减肥(无法正常运行)【附件已修复】

胡剑0227

<p>楼主 </p><p>我发觉你的表格很特殊 B表 和 SHEET1 的 列都是一样的呀，个数相通，而且次序也相同，所以公式可以大大的简化。提一下 520个数据中有4个是重复的，其实是516个数据 ，四个重复的数据如下：</p><p><table cellspacing="0" cellpadding="0" width="100" border="0" style="WIDTH: 75pt; BORDER-COLLAPSE: collapse;"><colgroup><col width="100" style="WIDTH: 75pt; mso-width-source: userset; mso-width-alt: 3200;"></col><col></col></colgroup><tbody><tr height="15" style="HEIGHT: 11.25pt;"><td class="xl88" width="100" height="15" style="BORDER-RIGHT: windowtext 1pt solid; BORDER-TOP: windowtext 1pt solid; BORDER-LEFT: windowtext 1pt solid; WIDTH: 75pt; BORDER-BOTTOM: #ece9d8; HEIGHT: 11.25pt; BACKGROUND-COLOR: transparent;"><font face="Gulim" color="#ff0000" size="2">E1103001670</font></td></tr><tr height="15" style="HEIGHT: 11.25pt;"><td class="xl89" height="15" style="BORDER-RIGHT: windowtext 1pt solid; BORDER-TOP: #ece9d8; BORDER-LEFT: windowtext 1pt solid; BORDER-BOTTOM: #ece9d8; HEIGHT: 11.25pt; BACKGROUND-COLOR: transparent;"><font face="Gulim" color="#ff0000" size="2">E1103001800</font></td></tr><tr height="15" style="HEIGHT: 11.25pt;"><td class="xl89" height="15" style="BORDER-RIGHT: windowtext 1pt solid; BORDER-TOP: #ece9d8; BORDER-LEFT: windowtext 1pt solid; BORDER-BOTTOM: #ece9d8; HEIGHT: 11.25pt; BACKGROUND-COLOR: transparent;"><font face="Gulim" color="#ff0000" size="2">E1103001970</font></td></tr><tr height="16" style="HEIGHT: 12pt;"><td class="xl90" height="16" style="BORDER-RIGHT: windowtext 1pt solid; BORDER-TOP: #ece9d8; BORDER-LEFT: windowtext 1pt solid; BORDER-BOTTOM: windowtext 1pt solid; HEIGHT: 12pt; BACKGROUND-COLOR: transparent;"><font face="Gulim" color="#ff0000" size="2">E1103007890</font></td></tr></tbody></table></p><p>而sheet1 的模型 行 也是一个没有重复行，所以公式一样的可以简化。</p><p>=IF(LEN(G$2)&lt;2,"",INDEX((INDEX(Sheet1!$G$7:$CB$522,,MATCH(G$2,Sheet1!$G$6:$CB$6,0))),ROW($1:$516))*B!G$4)</p><p>=IF(LEN(G$2)&lt;2,"",F7:F522-G7:G522)</p><p>以上是主公式。</p><p>我把重复的东西擅自去除了</p> 8Xd9J3PP.rar (96.25 KB, 下载次数: 23)

2008-7-31 17:33 上传

点击文件名下载附件

<br/>

[此贴子已经被作者于2008-7-31 17:33:47编辑过]

KIES

<p>不卡了。</p><p>太神奇了！</p><p></p><p>谢谢胡版主~学习中。</p><p> 1gzERxSG.rar (187.4 KB, 下载次数: 26)

2008-8-10 11:30 上传

点击文件名下载附件

<br/></p><p>多了几个项目。</p><p></p>

[此贴子已经被作者于2008-8-10 11:31:14编辑过]

胡剑0227

<p>为什么我把公式改了，就不好用了呢？</p><p>=IF(LEN(G$2)&lt;2,"",INDEX((INDEX(Sheet1!$G$7:$CB$522,,MATCH(G$2,Sheet1!$G$6:$CB$6,0))),ROW($1:$516))*B!G$4)</p><p>=IF(LEN(G$2)&lt;2,"",F7:F522-G7:G522)</p><p>后面的即使改了，也不正确。</p><p>还有改过之后，粘贴公式也提示 “数组公式不能怎么怎么。。。”</p><p>==========================================================================================</p><p>不是很清楚到底怎么回事，想想可能是这样。</p><p>你是否在一个单元格改了公式呀，数组公式，多单元格数组公式之所以效率高是因为整多个单元格是一个整体，修改的时候整多个单元格会一起参与修改，基于这个原因 多单元格数组公式的单元格也不能单个的删除内容。我一般是把公式复制出来后，把整个多单元格区域删除（这里一个公式的范围是一个列（7：522））。所以需要把这个区域（对应一个公式）整体进行操作。</p>

[此贴子已经被作者于2008-8-10 10:43:28编辑过]

胡剑0227

<p>只要进行修改公式的部门参数就可以了</p><p></p> EWPOR4e3.rar (540.69 KB, 下载次数: 33)

2008-8-10 16:41 上传

点击文件名下载附件

<br/>

[此贴子已经被作者于2008-8-10 16:42:02编辑过]

tsoyzm

这样的贴子看起来特别费神，怎么那么多方括号和P等等，影响视觉

hdaktp

又看了一次

sweetian

接触了数组才知道，为什么之前设计的表格打开需要那么长时间，
曾经以为“函数太慢”转而用了VBA,但VBA的普遍适用性还是比函数差些哦