基于VBA的EXCEL生成英文单词测试表方法
文章通过对Excel VBA的设计实现在工作表中输入单词,利用单元格按行比较的功能,比较输入单词的正确性并做出判读,掌握自动判断单元格的步骤。对Excel中某些非常规用法但是实用的功能进行一个延伸,为将来对系统进行扩展打下坚实的基础,为拓展Excel的使用范围起一个引导作用。
标签:Excel;VBA;数据库
1 概述
Excel VBA可以实现在工作表中输入单词后,比较两个单元格中的字符串是否完全相同。如果完全相同,则返回正确的信息,如果错误,则返回错误的信息[1]。这个功能的实现中应用到了单元格按行比较的方法,回退修改数据的方法,隐藏数据的简便方法,自动判断单元格的方法。通过这种比较,可以知道对单词的掌程度,以达到学习的目的。
2 具体操作
步骤1、新建一个Excel工作簿,在工作表的A列中键入需要记忆的单词,在B列中键入该单词的词义。
vba编程技巧步骤2、单击主菜单上的“工具Excel>宏>Visual Basic编辑器”选顼,再单击“Visual Basic编辑器”主菜单上的“視图>代码窗口”选项[2]。在打开的“代码窗口”中选择Worksheet对象的Change方法过程,编辑其响应代码如下所示:
Option Explict
Dim AlterFlag As Boolean
Private Sub Worksheet_Change(ByVal Target As Rang)
If (Target.Column =3 And (Not AlterFlag) ) Then
If Target.Value = Cells(Target.Row, 1).Value Then
Cells(Target.Row, 4).Value =“True”
Cells(Target.Row, 4).Font.ColorIndex =3
Else
Cells(Target.Row, 4).Value =“False”

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。