利用函数，提取表中不重复数据，且按升序排序。请将三角函数公式大全写出来。谢谢！

来源：蜘蛛抓取(WebSpider) 时间：2015-07-29 03:26 标签： 函数公式
查看: 1118|回复: 30
从总表中提取相应的分表
阅读权限30
在线时间 小时
附件中有一个总表，想要使用公式，提取相应的分表，如在流向中包含“P&字符的给提取出来。
目的：修改的话，只需要更改总表，分表就可以自动修改了。而无需人工再重新修改了。
19:08 上传
点击文件名下载附件
34.85 KB, 下载次数: 16
阅读权限100
在线时间 小时
(124.96 KB, 下载次数: 17)
19:33 上传
点击文件名下载附件
阅读权限100
在线时间 小时
上面是全表格的数组公式，比较慢，想寻找一列，其数据都是唯一的，可用vlookup取代，运转可以快一点，但是找不到，零件代号有重复，序号有重复，序号&零件代号，还是有重复！
阅读权限90
在线时间 小时
Sub 查询()
Dim rg As Range
Sheets(&查询数据&).Range(&a3:s10000&).Clear
i = Sheets(&总表&).Rows.Count
For Each rg In Sheets(&总表&).Range(&e2:e& & i)
m = m + 1
If rg Like Sheets(&查询数据&).Range(&e1&) Then
k = k + 1
Sheets(&总表&).Range(&a& & m + 1 & &:s& & m + 1).Copy Sheets(&查询数据&).Range(&a& & k + 2)
End If
Next
End Sub复制代码
阅读权限90
在线时间 小时
这个是附件。。。。。。。。。。。。
19:46 上传
点击文件名下载附件
42.6 KB, 下载次数: 13
阅读权限30
在线时间 小时
xutianlin 发表于
这个是附件。。。。。。。。。。。。
谢谢您的解决方案！
但是，我不懂这个VBA代码，那么我想要做些修改，就比较麻烦了。
比如：1.若是在总表和提取的表格中增加一行作为表头话，代码要做什么样的变动
& && &2.若是我想要提取O P Q R列非空的的表格并且按照升序排列，需要怎么做
(24.66 KB, 下载次数: 0)
08:42 上传
阅读权限30
在线时间 小时
wangjguo44 发表于
上面是全表格的数组公式，比较慢，想寻找一列，其数据都是唯一的，可用vlookup取代，运转可以快一点，但是找 ...
零件代号没有办法唯一，但是序号却可以唯一。您是否可以自行将序号直接修改成唯一的。
阅读权限100
在线时间 小时
本帖最后由 wangjguo44 于
18:38 编辑
zhuangyongjin 发表于
零件代号没有办法唯一，但是序号却可以唯一。您是否可以自行将序号直接修改成唯一的。
按理序号的唯一性应该由你自己处理，不应该由我“自行直接修改”，因为局外人不知你们编序号的规则是什么。
我帮你做了个，总体上不改变你的原来序号，只是把原来重复的序号后面添上个&_1&（经查，除了三个原没序号的以外，其余至多重复两个，比如原有两个364，就把第二次出现的改成364_1），这样，你们如果想恢复原来序号的话，便于改回去。此外三个原来是没有序号的，分别用以0开始的序号（0_1、0_2、0_3），这也是为了便于你们核对修改(但是改回去的话，就不是唯一性，也就不能用vlookup了）。
除了第一列用原来公式（为不改变原数据格式，前面加了个if判断）外，其余都用vlookup，从附件效果看，速度要快得多。
看到回复，打开附件看看，居然搞错了，不是这个帖子的内容！重新修改上传
(80.69 KB, 下载次数: 14)
18:36 上传
点击文件名下载附件
阅读权限90
在线时间 小时
& & & & & & & &
本帖最后由 xutianlin 于
14:04 编辑
zhuangyongjin 发表于
谢谢您的解决方案！
但是，我不懂这个VBA代码，那么我想要做些修改，就比较麻烦了。
比如：1.若是在总 ...
Sub 查询()
Dim rg As Range
Sheets(&查询数据&).Range(&a3:s10000&).Clear
i = Sheets(&总表&).Rows.Count
For Each rg In Sheets(&总表&).Range(&e3:e& & i)
m = m + 1
If rg Like Sheets(&查询数据&).Range(&e1&) Then
k = k + 1
Sheets(&总表&).Range(&a& & m + 2 & &:s& & m + 2).Copy Sheets(&查询数据&).Range(&a& & k + 2)
End If
Next
End Sub复制代码
只能加一行表头
排序不会。。。。早知道这样。。。当时我就直接SQL做了。。。也痛快。。。VBA我也是刚学没几天。。。
阅读权限30
在线时间 小时
xutianlin 发表于
只能加一行表头
排序不会。。。。早知道这样。。。当时我就直接SQL做了。。。也痛快。。。VBA我也 ...
请问SQL要怎么做呢。
玩命加载中，请稍候
玩命加载中，请稍候
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！
本站特聘法律顾问：徐怀玉律师 李志群律师
Powered by查看: 1103|回复: 5
请教高手！EXCEL中怎么在原表中，将符合条件的数据自动生成到另一张表并且自动排序？
阅读权限10
在线时间 小时
请教高手！EXCEL中怎么在原表中，将符合条件的数据自动生成到另一张表并且自动排序？
(2.86 KB, 下载次数: 39)
15:16 上传
点击文件名下载附件
阅读权限50
在线时间 小时
本帖最后由 chenyun1234 于
15:38 编辑
用【透视表】，可以解决这问题，你看看【透视表】吧，哈哈
阅读权限90
在线时间 小时
从2个表中分别提取的话，你这个实现不了，能合到一个表中，还能实现！
阅读权限10
在线时间 小时
人贵于自省 发表于
从2个表中分别提取的话，你这个实现不了，能合到一个表中，还能实现！
那如果只是一个数据源表格（即表一），能否将其生成我所要的效果呢？
阅读权限90
在线时间 小时
用一个汇总表的话，用函数可以实现，请从新整理附件！
阅读权限90
在线时间 小时
请按照图示照片压缩后，上传附件！
(375.98 KB, 下载次数: 3)
09:52 上传
玩命加载中，请稍候
玩命加载中，请稍候
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！
本站特聘法律顾问：徐怀玉律师 李志群律师
Powered by

我要回帖

更多关于 函数公式 的文章

 

随机推荐