ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: hbhsfeng

[已解决] 请老师帮我写一个按条件统计的代码

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-10-5 13:01 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
另外,奉劝一句,这东西就是送钱,买彩票还不如直接捐

TA的精华主题

TA的得分主题

发表于 2018-10-5 13:06 | 显示全部楼层
如果最后三位是848,k:t填什么???

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:28 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
统计每一列对应值。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:30 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
20120501 发表于 2018-10-5 12:50
方法如版主的回复,中间加入了清除K2:T2的值,否则会保留上一次的结果。
加入单元格的值转换为字符串,统 ...

我查找900,代码出错。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:31 | 显示全部楼层
20120501 发表于 2018-10-5 12:50
方法如版主的回复,中间加入了清除K2:T2的值,否则会保留上一次的结果。
加入单元格的值转换为字符串,统 ...

我查找900,代码出错。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:34 | 显示全部楼层
本帖最后由 hbhsfeng 于 2018-10-5 13:51 编辑
excelvlookup 发表于 2018-10-5 12:54
777,是统计7还是统计3

777查找它下面的对应值,有7,还有3,等等,然后在每一列从上往下查找,再统计出现7多少次,出现3多少次,出现0多少次。虽然函数公式可以解决,但是太慢了。

TA的精华主题

TA的得分主题

发表于 2018-10-5 13:37 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
hbhsfeng 发表于 2018-10-5 13:31
我查找900,代码出错。

我这边2007、2016的都可以支行,您那边报什么错呢?
2018-10-05_133652.png
详细的数据如下。
行:238,列:4
行:932,列:5
行:1988,列:5
行:651,列:6
行:786,列:6
行:1258,列:6
行:2124,列:6
行:318,列:7
行:1201,列:7
行:2006,列:7
行:2136,列:7
行:1785,列:8
行:1996,列:8
行:2010,列:8
行:433,列:9
行:158,列:10
行:212,列:10

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:40 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-5 13:43 | 显示全部楼层
本帖最后由 hbhsfeng 于 2018-10-5 14:20 编辑

我知道是什么原因?我要查找的是最近三期的对应值(第四期没有开出),因为900下面没有数据,所以你的代码出错。我想查找的是900对应值在以前开了哪些数字?从上往下查找,每列中查找,再统计出现次数。

TA的精华主题

TA的得分主题

发表于 2018-10-5 14:23 | 显示全部楼层
是的,将代码中[b65535].End(xlUp).Row替换为[d65535].End(xlUp).Row就可以了。

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2025-1-16 12:33 , Processed in 0.034075 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表