24小时热门版块排行榜    

查看: 2181  |  回复: 10
【悬赏金币】回答本帖问题,作者veritascoco将赠送您 5 个金币
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

veritascoco

新虫 (初入文坛)

[求助] Excel求教:有效数据提取已有1人参与

Excel求教:在excel表格中选择一定区域进行有效数据提取;
例如5×5表格中,在坐标(1,3),(2,2),(2,4)(3,2),(4,3),(5,3)(5,4)有有效数据,如何提取?放在同一行或同一列?
跪求

Excel求教:有效数据提取
4KM6GI8`LYMV8M4YV3MKXKW.png
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by bcsnow at 2017-12-01 09:34:38
用vba,按行列遍历,提取有效数字,存到同一行/列中

vba,需要我单独下载吗?还是在excel里就可以实现啊?可以教一下吗,非常感谢不是很懂
3楼2017-12-01 11:42:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
4楼: Originally posted by bcsnow at 2017-12-01 15:16:49
看你excel菜单上面有开发工具一项不,没有右键在自定义功能区里调出来,点左边的visual basic 就可以了...

找到了,但不是很懂编程,这个需要编程吗?可以指导一下吗?非常感谢
5楼2017-12-01 16:15:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by bcsnow at 2017-12-01 17:22:24
Sub test()'简单写一下,测试通过
k = 6
For j = 1 To 5 '后按列搜索
For i = 1 To 5 '先按行搜索
If (Cells(i, j) <> 0) Then
Cells(k, 1) = Cells(i, j) '第一列第k行开始保存
k = k + 1
E ...

好的,非常感谢
7楼2017-12-01 18:43:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by bcsnow at 2017-12-01 17:22:24
Sub test()'简单写一下,测试通过
k = 6
For j = 1 To 5 '后按列搜索
For i = 1 To 5 '先按行搜索
If (Cells(i, j) <> 0) Then
Cells(k, 1) = Cells(i, j) '第一列第k行开始保存
k = k + 1
E ...

您好,还想请教这个可以用编写一个小程序实现吗?可以求教一下吗?因数据量大,有个程序可能更方便。
vb好久没用都忘记了,非常感谢
8楼2017-12-12 13:41:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
9楼: Originally posted by bcsnow at 2017-12-12 16:48:26
这还能忘?把你表格发给我试试看...

好的,非常感谢,大学学的,好久没用了
10楼2017-12-12 17:36:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

veritascoco

新虫 (初入文坛)

引用回帖:
9楼: Originally posted by bcsnow at 2017-12-12 16:48:26
这还能忘?把你表格发给我试试看...

发给您的是excel表格,非常感谢

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:libolin3@tal.com
  • 附件 1 : 12.12.xlsx
  • 2017-12-12 17:39:12, 14.06 K
11楼2017-12-12 17:39:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 veritascoco 的主题更新
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[有机交流] 车间生产,真空度很高,温度很高,但减压蒸馏速度很慢。 10+12 召唤鬼泣lL 2024-06-13 37/1850 2024-06-17 02:17 by xmclyn
[基金申请] 最新消息:2024国自然下载文件名变了 +9 dream200606 2024-06-16 12/600 2024-06-17 00:34 by kobe0107
[找工作] 江西双非一本和四川双一流高校如何选择? 5+8 寒山敲钟 2024-06-12 25/1250 2024-06-16 22:05 by zhaojiang427
[教师之家] 饶议:什么制度能保障大学普通教师不用为领导拎包,不用看领导脸色 +9 zju2000 2024-06-12 15/750 2024-06-16 20:45 by 北溟鱼1318
[基金申请] F口信息学部拿面上,大概需要什么样的成果 +3 _奋黎_ 2024-06-16 4/200 2024-06-16 20:21 by _奋黎_
[考博] 2025考博 +6 自强不息a?a 2024-06-15 8/400 2024-06-16 19:39 by 鱼翔浅底1
[基金申请] 2024国社科通讯评审 +9 qsd10086 2024-06-13 17/850 2024-06-16 19:14 by onroad24
[找工作] 成都产品质量检测研究院 200+3 鲸鱼663 2024-06-11 9/450 2024-06-16 10:08 by SNaiL1995
[基金申请] 博士后创新人才支持计划公示 +9 aishida144 2024-06-14 15/750 2024-06-16 09:52 by msjy
[文学芳草园] 累并快乐着 +13 MYHLD521 2024-06-14 13/650 2024-06-15 22:59 by zeolitess
[论文投稿] 审稿人含糊拒稿,还需要回复吗?如何回复? 20+3 BruceChum 2024-06-15 17/850 2024-06-15 20:19 by arthas_007
[论文投稿] 投了一篇4区的SCI,审稿人一个拒稿,一个小修,编辑给了大修。 +9 安稳22123 2024-06-13 10/500 2024-06-14 23:45 by jurkat.1640
[食品] 食品博士导师 +6 小李醒yy 2024-06-11 9/450 2024-06-14 23:37 by 小李醒yy
[考研] 物理化学一对一辅导 +3 林大diao 2024-06-12 5/250 2024-06-14 20:57 by 林大diao
[有机交流] ππ堆积会发生在有机溶剂中吗 5+3 zibuyu0420 2024-06-13 4/200 2024-06-14 14:17 by 小肉干
[基金申请] 化学会年会改成一年开一次了? +5 babu2015 2024-06-12 13/650 2024-06-14 10:46 by babu2015
[论文投稿] 文章proof要求使用机构的邮箱 5+3 不可不信缘 2024-06-11 11/550 2024-06-14 07:00 by 3001160025
[基金申请] 博士后面上项目状态还是专家评审吗 10+9 Thatcheremu 2024-06-13 55/2750 2024-06-13 21:23 by 乌合麒麟
[硕博家园] 机械研究生如何拿到年薪40+w +13 阿巴阿巴哦哦 2024-06-11 15/750 2024-06-13 15:40 by 113745685
[论文投稿] water research状态咨询 5+3 Flyyawa 2024-06-10 6/300 2024-06-11 09:45 by bobvan
信息提示
请填处理意见