excel条件格式如何写公式 if语句;我想用条件格式实现这么一个功能:当在单元A1输入一个数,如果输入的数等于B1,即A1=B1,则A1的数值自动变为0;通过vbs可以实现吗?
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/07 23:40:38
excel条件格式如何写公式 if语句;我想用条件格式实现这么一个功能:当在单元A1输入一个数,如果输入的数等于B1,即A1=B1,则A1的数值自动变为0;通过vbs可以实现吗?
excel条件格式如何写公式 if语句;
我想用条件格式实现这么一个功能:当在单元A1输入一个数,如果输入的数等于B1,即A1=B1,则A1的数值自动变为0;
通过vbs可以实现吗?
excel条件格式如何写公式 if语句;我想用条件格式实现这么一个功能:当在单元A1输入一个数,如果输入的数等于B1,即A1=B1,则A1的数值自动变为0;通过vbs可以实现吗?
用条件格式无法实现的,格式是无法改变当前单元格的值的.
应该可以使用VBA来实现.用条件公式也不行的.
VBA的方法如下(Excel 2003):
1)设置安全级别:菜单 ->工具->宏->安全性,将安全性的级别设置为中级.
2)菜单 ->工具->宏->Visual Basic编缉器,打开进行编辑:
在窗口左侧的VBAProject..点击右键,在弹的菜单中选择“插入”->“模块”,然后在右侧中输入以下内容.
Sub a()
If Worksheets("Sheet1").Evaluate("B1") = Worksheets("Sheet1").Evaluate("A1") Then
Worksheets("Sheet1").Evaluate("A1") = "0"
End If
End Sub
然后再双击左侧的Sheet1,再在右侧中填入以下的内容:
Private Sub Worksheet_Change(ByVal Target As Range)
Call a
End Sub
好了,以上的操作就行了,保存退出,重开这个档案,这时注意要启用“宏”