Office中国论坛/Access中国论坛

标题: [求助]条件语句 [打印本页]

作者: Bluelost 时间: 2005-3-21 19:27
标题: [求助]条件语句
worksheet_change()事件中

对某一单元格(由几个单元格合并而成)进行操作:

if target.value<>"" then

'操作1：根据输入的值不同的情况对range(x)进行操作

else

'操作2:清空range(x)的值

end if

我目的是当输入值不为空时进行操作1给range(x)赋值，当输入内容为空或删除目标单元格的内容时清除range(x)的内容，上面的代码中为什么操作2没有得到执行啊？要实现我的目的应该怎么写啊

作者: 情比金坚 时间: 2005-3-21 22:56
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range("target").Value <> "" Then

Range("b1") = "xx"

Else

Range("b1") = ""

End If

End Sub

作者: Bluelost 时间: 2005-3-22 00:02
谢谢！

可是if target.value<>"" then 本来就没错啊，操作一一直都没问题，我试了下range("target").value的写法反而不行了。

问题是在else这里，应该怎么样判断target的内容被删除了？

作者: 老鬼 时间: 2005-3-24 05:27
Range("target").Value指的应该是目标单元格的区域，而不是直接这么写

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)