Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2664|回复: 9

[已解决]求一个小公式

[复制链接]
发表于 2012-1-30 15:57 | 显示全部楼层 |阅读模式
Book2b.rar (11.15 KB, 下载次数: 12)
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2012-1-30 16:23 | 显示全部楼层
加色有什么规则吗?大的也加小的也加
回复

使用道具 举报

 楼主| 发表于 2012-1-30 16:32 | 显示全部楼层
wayy 发表于 2012-1-30 16:23
加色有什么规则吗?大的也加小的也加

有规定,从第八行到第三行全小加色(也就是连续6个,全大要连续7个才加色,都是从第八行向上算)
回复

使用道具 举报

发表于 2012-1-30 16:33 | 显示全部楼层
你看看把,我这个是用两个条件格式弄出来的 Book2b.zip (10.63 KB, 下载次数: 3)
回复

使用道具 举报

发表于 2012-1-30 16:45 | 显示全部楼层    本楼为最佳答案   
oplkj 发表于 2012-1-30 16:32
有规定,从第八行到第三行全小加色(也就是连续6个,全大要连续7个才加色,都是从第八行向上算)

加色的时候是在都在第11行上加吗?还是在数值本身的单元格加?
回复

使用道具 举报

 楼主| 发表于 2012-1-30 16:47 | 显示全部楼层
shejiang88 发表于 2012-1-30 16:33
你看看把,我这个是用两个条件格式弄出来的

没看明白,一到九行的数据是不要着色的,合条件只在下面第11行着上色就行
回复

使用道具 举报

 楼主| 发表于 2012-1-30 16:49 | 显示全部楼层
wayy 发表于 2012-1-30 16:45
加色的时候是在都在第11行上加吗?还是在数值本身的单元格加?

同列第11行加色,上面是不要的
回复

使用道具 举报

发表于 2012-1-30 16:58 | 显示全部楼层
没有读懂题意{:041:}
回复

使用道具 举报

发表于 2012-1-30 17:05 | 显示全部楼层
那就只能用VBA来解决了,
      
回复

使用道具 举报

发表于 2012-1-30 17:22 | 显示全部楼层
  1. Sub wayy()
  2. Dim x, y, mrow, mcol As Long
  3. Dim arr
  4. Rows("11").Interior.ColorIndex = xlNone
  5. arr = Range("A1:Z8")
  6. For mcol = 1 To 26
  7.  For mrow = 8 To 1 Step -1
  8.   If arr(mrow, mcol) < 5 Then
  9.    x = x + 1
  10.   Else
  11.    y = y + 1
  12.   End If
  13. Next
  14. If x > 5 Or y > 6 Then
  15.  Cells(11, mcol).Interior.ColorIndex = 45
  16. End If
  17. x = 0: y = 0
  18. Next
  19. End Sub
复制代码
大概可以,不是很全面。 wayy.rar (11.34 KB, 下载次数: 3)
回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-16 12:30 , Processed in 0.327798 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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