怎样给数据设置条件格式

WYS67 · 发表于 2018-10-18 20:29

lss001 发表于 2018-10-18 10:53
根椐实际问题，作全面总结改进！

如附件A:C的数据源，每一行都是对三个不同数据累计出现6次时作一个周期排位。由于CSPW是区域数组输入的，无法输入公式 { =IF(SUM(A5:C5)=6,CSPW(A5:C1000,D$4),"") ，您有没有办法？还有一个笨办法，是指定“6”为每周期数据个数，作为第三参数，当SUM(A5:C5)=6时，才会显示计算结果，否则为空白；这样，最后那个周期的6个数据没有满额时，就不会被统计在内。

lss001 · 发表于 2018-10-18 21:55

本帖最后由 lss001 于 2018-10-18 22:48 编辑

30楼刚刚更新附件！！

WYS67 · 发表于 2018-10-19 00:27

lss001 发表于 2018-10-18 10:53
根椐实际问题，全面总结改进更新！增加第三参数(可选)，默认为6！

老师：为了和您前几天写的按指定数据个数周期计数过程中的指定周期相契合，需要当第三参数省略后，默认当前工作表H2为指定周期。是不是需要把代码倒数11行的： If nn = "" Then x = 6 Else x = nn 修改为：If nn = "" Then x = h2 Else x = nn ,老师这样可以吗？

lss001 · 发表于 2018-10-19 08:29

本帖最后由 lss001 于 2018-11-16 14:48 编辑

→_→→_→

WYS67 · 发表于 2018-10-19 09:43

lss001 发表于 2018-10-19 08:29
应改为→If nn = "" Then x = rng.Worksheet.Cells(2, "h") Else x = nn

还需要在代码第二行插入

已测试，能够在您先前写的指定周期计数的过程中使用。谢谢老师帮忙！

WYS67 · 发表于 2018-11-16 01:07

本帖最后由 WYS67 于 2018-11-16 01:59 编辑

lss001 发表于 2018-10-18 10:53
根椐实际问题，全面总结改进更新！增加第三参数(可选)，默认为6！

老师：在实际应用中，发现我在30楼里的运算规则有些多余和不便【见上面左图】，恳请您按《简化代码》里新的运算规则，作如下修改：
1.《原代码》中 { =CSPW(需要计算的数据区域,1【或0或-1】,周期数据个数) 的第三参数周期数据个数纯属多余，可在《简化代码》里去掉。
2.《原代码》K14的：
1.当A:C列的数值都相同【即没有众数，指定数据0、1、2在本周期全部出现并且出现次数也全部相同】，则在D:F列的对应位置全部填入3.【见土黄色填充】
修改为按《简化代码》K14的
1.当A:C列的数值都相同【即没有众数，指定数据0、1、2在本周期全部出现并且出现次数也全部相同】，则在D:F列的对应位置全部填入上一行的计算结果.【见土黄色填充】。

《简化代码》的D:G列就是代码修改后输入K25:K28公式后的模拟结果。

恳请老师帮忙修改自定义函数CSPW的代码，不胜感谢之至！

按出现次数的多少排名.zip (47.36 KB, 下载次数: 4)

WYS67 · 发表于 2018-11-16 10:58

lss001 发表于 2018-10-19 08:29
应改为→If nn = "" Then x = rng.Worksheet.Cells(2, "h") Else x = nn

还需要在代码第二行插入

麻烦老师优化和完善46楼里的代码。

WYS67 · 发表于 2018-11-16 13:39

本帖最后由 WYS67 于 2018-11-16 13:44 编辑

lss001 发表于 2018-11-16 13:10
把第19行代码→
If s = 3 Then br(i, 0) = 3: cr(i, 0) = 3: dr(i, 0) = 3
改为→

把第19行代码→
If s = 3 Then br(i, 0) = 3: cr(i, 0) = 3: dr(i, 0) = 3
改为→
If s = 3 Then br(i, 0) = br(i - 1, 0): cr(i, 0) = cr(i - 1, 0): dr(i, 0) = dr(i - 1, 0)后，在D5:D10000里输入公式 { =CSPW($A$5:$C$10000,D$4)或 { =CSPW($A$5:$C$10000,1)，D5:D10000显示空白是怎么回事？右拉至E列后，D:E列都是空白，在G5:G10000里输入{ =CSPW($A$5:$C$10000)，G列也是显示空白啊？

按出现次数的多少排名.zip (249.94 KB, 下载次数: 1)

WYS67 · 发表于 2018-11-16 14:04

本帖最后由 WYS67 于 2018-11-16 14:18 编辑

lss001 发表于 2018-11-16 13:10
把第19行代码→
If s = 3 Then br(i, 0) = 3: cr(i, 0) = 3: dr(i, 0) = 3
改为→

已找到49楼问题的原因：是《原代码》中公式 { =CSPW(需要计算的数据区域,1【或0或-1】,周期数据个数) 有第三参数周期数据个数，可在《简化代码》里不需要第三参数引发的错误。即：
把第19行代码→
If s = 3 Then br(i, 0) = 3: cr(i, 0) = 3: dr(i, 0) = 3
改为→
If s = 3 Then br(i, 0) = br(i - 1, 0): cr(i, 0) = cr(i - 1, 0): dr(i, 0) = dr(i - 1, 0) 只是解决了46楼的问题2，却没有解决46楼里的问题1引发的错误。

所以，必须在代码里去掉公式里的第三参数--周期数据个数，才能显示正确结果。

lss001 · 发表于 2018-11-16 14:27

本帖最后由 lss001 于 2018-11-16 22:33 编辑

附件更新，除去第三参数！！！

		自动登录	找回密码
密码			免费注册

[求助] 怎样给数据设置条件格式

评分

评分