作者:乔山办公网日期:
返回目录:excel表格制作
把代码放在Sheet客户产品及价格的
Worksheet_Change(…………)事件中
并判断Target的column=3和row>4是否满足,满足就运行
假设要判断的值在A1,改变单元格后触发事件窗口填写代码e5a48de588b67a686964616f362如下:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" And [A1].Value > [B1].Value Then
Target.Interior.ColorIndex = 3Else
Target.Interior.ColorIndex = xlNone
End If
End Sub
注意一般加个IF来判断当前单元格量是否是指定的单元格,就是执行代码。
扩展资料:
vba中可以触发不同事件的命令:
Publicr/ Private] Const 常量名[As 类型]=表达式Global Const 符号常量名称 = 常量值,定义一个符号常量,并将指定表达式的值赋给符号常量。
常量名指定符号常量的名字。符号常量名可以由字母、数字和下划线组成,但只能以字母开头,不能含有空格,表达式指定符号常量的值。该表达式通常由数值型、字符型、逻辑型或日期型数据以及各种运算符组成,但在表达式中不能出现变量和函数。
public用来表示这个常量的作用范围是整个数据库的所有模块。
private则表示这个常量只在使用该声明常量语句的模块中起作用。
说明:
1、除用户定义的符号常量外,VBA还提供了许多符号常量,我们可以直接使用。
2、对数码比较长,并且在程序中多次使用的常量,通常使用符号常量代替。运行程序时,系统自动把程序中的所有符号常量换为赋给它的值。
参考资料来源:百度百科—VBA
楼主所说的要求实际是EXCEL中输入时逐步提示信息百的方法。
用户在录入数据时,比如在工作表中输入产品名称,除了希望有所有产品名称的下拉度列表供选择外,更希望能逐步给出提示信息。比如在输入一两个字符后把符合条件的数据筛选出问来供选择,最好是中英文、拼音答首字母、大小写能混合查询,这将大大提高录入速度和正确率。
如果要设版置这样的功能,要涉及到众多事件。如工作表Change事件和SelectionChange事件、控件文权本框KeyUp和KeyDown事件、控件列表框GotFocus事件、KeyDown事件和DblClick事件及自定义函数。
获得更改单元格更改之前的值——可以用selectionChang事件
禁止更改可以用该事件及工作表的保护