|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
如何利用公式将sheet1中某列中指定的内容整行复制到sheet2中
sheet2的A1单元格输入公式 =INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$A$1:$A$1000="甲",ROW($A$1:$A$1000),4^8),ROW(1:1)))&"" 数组公式,按CTRL+SHIFT+回车三键确定,鼠标移到单元格右下角,当出现一个黑色小十字时,同时按住鼠标左键往右拖,再往下拖拉填充
以上方法我试过了相当灵!
下面的方法也行,但我没有试验。(都是论坛搜来的)
在sheet2的A1单元格中输入公式: =IF(ROW()>COUNTIF(Sheet1!$A:$A,"甲"),"",INDEX(Sheet1!$A$1:$C$100,SMALL(IF(Sheet1!$A$1:$A$100="甲",ROW($1:$100),4^8),ROW()),COLUMN())) 回车后按一下F2,再按shift+ctrl+回车,然后选中A1单元格向下向右复制公式,注意向下多复制一些行,以备你在表一中添加信息后表二也能随时更新.
该贴已经同步到 hsyzg的微博 |
|