GET.CELL函数不能返回条件格式值

bibisin

原帖由 shangyu 于 2004-12-17 16:50 发表
这是参考chenjun版主提供的链接修改的自定义函数，修改的内容主要是对条件格式公式中使用相对引用时，取得的公式是当前活动单元格的相对引用，而非条件格式所在单元格的公式（已使用ConvertFormula方法修改）。其中比 ...

谢谢版主分享

hwb_101

妙！谢谢！

jade8833dn

怎么在excel 2007 中不起作用？

xiaozhu117

非常感谢 这么使用 以前对excel不是很了解

fish_gz

thank thank you.

zhaozyuan

好 谢谢shangyu

gz999

谢谢！

[ 本帖最后由 gz999 于 2009-11-16 18:12 编辑 ]

lb_bn

确实不错谢谢了。

bibisin

谢谢分享,好好学习

gz999

55楼：
Sub 返回指定单元条件格式公式()
Range("A2") = Range("A1").FormatConditions(1).Formula1
End Sub

也可用于筛选 介于，不介于
row2 = 14
        col2 = 6
                 Cells(1, 2) = Cells(row2 + k, col2).FormatConditions(1).Formula1
                 Cells(1, 3) = Cells(row2 + k, col2).FormatConditions(2).Formula2
          Cells(1, 2) = Cells(1, 2).Value
          Cells(1, 3) = Cells(1, 3).Value

         For k = 0 To 27
         Cells(row2 + k, col2).Select
           
           If Cells(row2 + k, col2) <= Cells(1, 2) Or Cells(row2 + k, col2) >= Cells(1, 3) Then
         Cells(1, 1) = 3
           End If
           Cells(1, 2) = Null
          Cells(1, 3) = Null
         Next