在技巧102 中，我们在TextBox1、TextBox2中输入完数据后，利用文本框的Change事件使TextBox3显示其两者相乘的金额，但是如果窗体中有多个文本框，需要在每一个文本框的Change事件中写上相同的重复代码，因此使用类模块可以简化代码。 在附件的窗体有七个文本框，其中六个用...

在使用文本框输入数据时，可能希望限制能输入的字符长度，即只能输入一定长度的字符，超过设置数值就不能输入，这时可以通过设置文本框的MaxLength属性来实现，如下面的代码所示。 复制内容到剪贴板 代码: #001Private Sub Worksheet_Activate() #002 Me.TextBox1.MaxLength...

在使用使用文本框显示或录入一段很长的文本时，需要将文本框设置成多行显示，否则文本内容只能在一行中显示，示例代码如下： #001Private Sub UserForm_Initialize() #002 With TextBox1 #003 .WordWrap = True #004 .MultiLine = True #005 .Text = Space(4) VBA(Visual Ba...

在用文本框往工作表录入数据时，一般会在录入到工作表前验证输入的数据是否正确，如果错误，则清空文本框内容，提示用户重新输入。但此时光标已经不在文本框中，需要重新选择文本框才能输入。 可以在Exit事件中可以设置Cancel参数值使光标停留在当前文本框中，如下面的代码...

在使用文本框输入数据时，可能希望限制能输入的字符长度，即只能输入一定长度的字符，超过设置数值就不能输入，这时可以通过设置文本框的MaxLength属性来实现，如下面的代码所示。 #001Private Sub Worksheet_Activate() #002 Me.TextBox1.MaxLength = 6 #003End Sub 代码解...

文本框在用来输入数据时，除了限制输入的数据类型外，还可以设置文本框的数据格式，如下面的代码所示。 复制内容到剪贴板 代码: #001Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) #002 TextBox1 = Format(TextBox1, 0.00) #003End Sub #004Private Sub...

文本框在用来输入数据时，除了限制输入的数据类型外，还可以设置文本框的数据格式，如下面的代码所示。 复制内容到剪贴板 代码: #001Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) #002 TextBox1 = Format(TextBox1, 0.00) #003End Sub #004Private Sub...

VBA中的控件没有提供右键快捷菜单，用户可以使用Excel 中的命令栏自已添加右键快捷菜单。 步骤1：按Alt+F11组合键进入VBE窗口，单击菜单插入模块，在其代码窗口输入以下代码： 复制内容到剪贴板 代码: #001Private ActiveTB As MSForms.TextBox #002Public Sub CreateShortCu...

用户在使用文本框输入数据时，往往希望能限制输入数据的类型，比如只能输入数字。但是没有内置的属性能限制在文本框中只能输入数字，只能在文本框的事件过程中使用代码来测试输入的是哪类字符，然后只允许输入数字字符和一个-号、一个.号，如下面的代码所示。 复制内容到剪...

如果用户经常添加、删除Excel的菜单和工具栏而又没有及时恢复的话，有时会破坏Excel默认的用户界面，即使用Reset方法也不能恢复成初始状态。 此时可以在电脑的本地硬盘中查找扩展名为*.xlb的文件，该文件在电脑中的位置会因Excel版本的不同而不同，在XP操作系统中，该文件位...