[推荐]隐藏自己的公式绝妙方法

ychexcel

QUOTE:

以下是引用学良在2007-11-24 8:02:26的发言：
2007才能作到；2003的朋友不必再费脑了！

搞了半天，2003达不到啊。唉。

tkgg93

楼主，2003做不出来吗？

封州大少

楼主还是明确一下2003是否能办到吧，我等从未接触过2007，别白费劲，呵呵

哦，不好意思，没注意到这个栏目是2007讨论区，勿怪！

[此贴子已经被作者于2007-11-24 11:31:37编辑过]

nevinslee

我觉得用VBA完全可以实现那效果,只是运行不了,不知道哪错了:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i
i = Target.Row
Range(Target.Row, 3)= Application.WorksheetFunction.LOOKUP(A & i, {0,60,70,80,90,100},{'小于60','大于60','大于70','大于80','大于90','等于100'})"

End Sub

jackysyh

用vba是这样的，但这个不算，那就太简单了，用定义的话按alt160 是可以隐藏名称，但等号怎么隐藏

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i   As Integer
Dim j   As Integer
Dim c   As Integer

i = Target.Row
j = Target.Column
If j = 1 Then
    If CDbl(Cells(i, j)) < 60 Then
        Cells(i, 2) = "不及格"
    Else
        Cells(i, 2) = "及格"
    End If
End If

End Sub

dengruif

QUOTE:

以下是引用dengruif在2007-11-24 1:39:35的发言：

换个思维，不知是否符合题意，纯粹投机取巧

是否符合题意呀

wanglei569

QUOTE:

以下是引用dengruif在2007-11-24 12:48:44的发言：
是否符合题意呀

完全背离。

罗老师已经把答案公布了，是2007的条件格式，不是隐藏公式，罗老师的题目有点偏了

[此贴子已经被作者于2007-11-24 15:02:56编辑过]

黄其宾

??

andysky

2007的基本功能-------条件格式

可以用64个条件

lxm0109

呵呵，有意思，期待答案。