Accessvba编程(我想学EXCEL的VBA)
1.我想学EXCEL的VBA基础知识
VBA概述：VBA是Visual Basic For Application的缩写，是VB在office中的运用。
是基于Visual Basic For Windows发展而来的，VB For Windows是Microsoft于1992年推出的开发Windows应用程序的程序设计语言，由于基语法简单，易学易用，所以深受用户的欢迎。而VBA和VB For Windows大体相似。
在Office2000之前，VBA在Word,Excel,Access等Office系统软件中的运用有些有同，但是到Office2000就统一起来了。Excel是第一个包含有VBA的应用程序，自Office2000以后，Eexel,Word,PowerPoint,Access中已经有了统一标准的宏语言VBA，其中Excel和Access的VBA最为成熟。
在Excel中VBA程序即可以存放有.xls中，也可以单独以文本形式存放。对VBA的学习，用户首先必须VB有一定的了解（不过不必很专业，毕竟经常用Excel的用户一般是办公人员，不可能是专业编程人员），然后结合宏记录器学习。
因为，宏记录器可以记录宏，用户可以非常清楚了然VBA的很多知识。另外，如果不是功能很强大的VBA程序，那么用宏记录器就足够了。
打开密码记录器的方法，通过“工具->宏->录制新宏”。另外，用户可能用“工具->宏->宏。”
来管理宏。用“工具->宏->VB 编辑器”或Alt+F11可以打开VB编辑器，在VB编程器，可以很方便地整个VB工程进行管理，可以方便地编写VBA代码，另外，用户可以再点击Alt+F11切换到Excel窗口。
VBA的使用过程： 1、创建一个Excel文件。 2、创建一个控件，然后双击控件或是右击该控件，点击“查看代码”，就可以对该控件的某个事件，如click,keydown等。
进行编写执行代码了。创建控件的方法是，点击“视图->工具栏->控件工具箱”，打开“控件工具箱”栏，然后就可以直接拖动某个控件到Excel单元格中去。
在Excel中窗口，添加的控件一般是处于执行状态的，如果要对这个控件进行编辑，除了第一次建立的时候可以对它进行属性编辑外，打开“控件工具箱”，也可以使控件处于编辑状态，如果还不行，可以再添加一个控件，然后已有的控件绝对会处于编辑状态。当然，对控件修改完毕后，别忘了删除刚才新添加的没有用的控件。
在编辑状态中，你可以右击该控件，点击“属性”，那么就可以打开属性窗口，在这个窗口里，你可以很方便的对这个控件的名字，标题，大小等属性进行编辑。 3、手动或用宏记录器对该控件的某个事件进行编码。
宏记录器简单易用，不过强大的功能还是必须手动编写VBA。VBA对象介绍： 编写VBA代码的最关键在于灵活运用VBA对象，对这些VBA对象的属性或方法进行操作。
另外，你也可以创建自定义函数，来对某些操作进行封装。既然是VBA，编码风格当然和VB相同，如果会VB，那么只要对VBA的对象比较了解，就可以编写功能强大的VBA程序；同样，如果不会VB，那么，只需要了解VBA的对象就够了，因为它比较简单易学。
以下分别讨论VBA各对象对其属性与方法： 在一些可以包含其他对象的窗口对象中，有几个特殊的属性，其属性值是当前活动对象，对它们，可以直接引用。表1 一些特殊的属性 对象名 含义 ActiveWorkbook 当前工作簿，即如果你打开了几个Excel文件，那么你当然正在编辑的Excel文件即ActiveWorkbook ActiveSheet 当前工作簿中的当前工作表，即当前编辑的Excel文件中正在编辑的工作表 ActiveCell 当前工作表中活动单元格 ActiveChart 当前工作簿中的活动图表 Selection 当前被选定的对象 下面详谈各对象及它们的属性和方法 一、Application对象 此对象指Excel应用程序的工作环境。
属性 1.Caption属性 含义：Excel应用程序标题栏显示的文本。 举例：Application.caption=“船员管理系统”，如赋值Empty，则恢复Excel默认的标题栏。
2.Cursor属性 含义：Excel中鼠标的形状。 表2 Cursor属性 属性值 鼠标形状 xlDefault 缺少型值，鼠标呈缺少形状 xlWait 等待型值，鼠标呈不断翻转的沙漏形状 xlNorthwestArrow 箭头型值，鼠标呈标准箭头形状 xlIBeam 文本型值，鼠标呈“I”字形以等待用户输入文本 操作：Application.Cursor=xlWait等。
3、DisplayAlerts属性 含义：用以确定是否显示系统的应用提示和警告信息，如果不想显示，则把些属性设为false，反之亦然。4、DisplayFormulaBar属性 含义：用以确定是否显示公式编辑栏 5、DisplayScrollBars属性 含义：用以确定是否显示Excel的滚动条 6、DisplayStatusBar属性 含义：用以确定是否显示Excel的状态栏 7、EnableCancelkey属性 含义：用以确定是否允许用户中断正在执行着的VBA程序。
缺省情况下，在VBA程序执行过程中，用户按下Ctrl+Break能够中断VBA程序的执行。此时此属性即值为xlInterrupt。
若要禁止中断VBA程序，由赋值为xlDisabled；若需要VBA执行过程中遇到错误进中止，由赋值为xlErrorHandler8、ScreenUpdating属性 含义：用以确定是否显示VBA程序的中间运算结果。 9、StatusBar属性 含义：设置状态栏的文本 10、ActiveWorkbook属性 含义：如表1介绍。
11、ActiveSheet 含义：如表1介绍。 12、ActiveCell属性 含义：如表1介绍。
13、ThisWorkBook属性 含义：用以返回正在执行着VBA程序。
2.Access的VBA编程问题,在线等
“计算”按钮的_onclick事件程序
With Me
If Not IsNull(.Tt1.Value) Then
If IsNumeric(.Tt1.Value) Then
If Not IsNull(.Tt2.Value) Then
If IsNumeric(.Tt2.Value) Then
.Tt3.Value = Val(.Tt1.Value) + Val(.Tt2.Value)
End If
End If
End If
End If
End With
“关闭”按钮的_onclick事件程序
docmd.close acform, me.name, acsaveyes
3.Access2007入门详细教程
《Access 2007 教程》【珍藏版】[PDF]作者美国）（michael R.）迈克尔 译者：谢俊 出版社：人民邮电出版社 出版日期：2008年 内容简介 Access是面向个人用户及小型公司的数据库开发工具，Microsoft Access 2007是该工具的最新版本。
这一版本不仅提供了很多全新的功能，最重要的是提供了全新的界面，因此与过去所有的Access版本都不同。本书分为6个部分，包括Access的组成部分、Microsoft Access编程、更高级的Access技术、专业数据库开发、作为企业平台的Access以及附录，从而由浅入深地介绍了Access 2007的所有功能。
本书由经验丰富的Access专业人士编写，并且在随书光盘中提供了几乎所有章节都用到的示例数据库，让读者可以边操作边学习。 全书图文并茂，语言简练，是Access初学者、中高级用户和数据库开发人员的必备书籍。
编辑推荐 Access是面向个人用户及小型公司的数据库开发工具，Microsoft Access 2007是该工具的最新版本。这一版本不仅提供了很多全新的功能，最重要的是提供了全新的界面，因此与过去所有的Access版本都不同。
本书分为6个部分，包括Access的组成部分、Microsoft Access编程、更高级的Access技术、专业数据库开发、作为企业平台的Access以及附录，从而由浅入深地介绍了Access 2007的所有功能。 本书由经验丰富的Access专业人士编写，并且在随书光盘中提供了几乎所有章节都用到的示例数据库，让读者可以边操作边学习。
全书图文并茂，语言简练，是Access初学者、中高级用户和数据库开发人员的必备书籍。 目录 第1部分Access的组成部分 第1章数据库开发简介 第2章创建Access表 第3章出色的数据库设计 第4章使用查询选择数据 第5章在Access中使用运算符和表达式 第6章使用“数据表视图” 第7章创建基本的Access窗体 第8章在Access窗体上处理数据 第9章使用Access报表呈现数据 第2部分Microsoft Access编程 第10章VBA编程基础 第11章掌握VBA数据类型与过程 第12章了解Access事件模型 第13章在查询和VBA代码中使用表达式 第14章使用VBA代码访问数据 第15章使用VBA调试工具 第3部分更高级的Access技术 第16章使用外部数据 第17章导入和导出数据 第18章高级Access查询技术 第19章高级Access窗体技术 第20章高级Access报表技术 第21章构建多用户应用程序 第22章将Access和其他应用程序集成 第23章将Access和SharePoint集成 第24章使用ActiveX控件 第25章处理错误和异常 第4部分专业数据库开发 第26章优化Access应用程序 第27章利用VBA进行高级数据访问 第28章出色的Access应用程序 第29章保证Access应用程序的安全性 第30章使用Windows API 第31章使用Access复制功能 第32章使用VBA的面向对象编程 第33章借助库重用VBA代码 第34章自定义Access功能区 第35章发布Access应用程序 第36章使用Access宏 第5部分作为企业平台的Access 第37章在Access 2007中使用XML 第38章作为数据源的SharePoint 第39章客户端/服务器概念 第40章作为Access伙伴的SQL Server 第41章将Access数据库升迁到SQL Server 第6部分附录 附录AAccess 2007规范 附录B光盘上的内容 附录CAccess 2007中的新增功能 Size: 149.71 MB 地址：。
4.Access窗体操作及VBA或宏编写
1. 需要建一个用户表，表中要有用户名和密码字段，只建一个用户表就可以；
2. 登陆按钮的单击事件代码：
Private Sub 登陆_Click()
if isnull(me.用户名) or isnull(me.密码) then
msgbox "请输入正确的用户名和密码！"
elseif isnull(DLookup（"用户名"，"用户表"，"用户名='" & me.用户名 & "'"）) then
msgbox "用户名不存在！"
elseif DLookup（"密码"，"用户表"，"用户名='" & me.用户名 & "'"）=me.密码 then
docmd.openform 个人信息窗体
docmd.Close acForm,me.name
else
msgbox "密码错误！"
end if
end sub3. 重置按钮的点击事件代码：
Private Sub 重置_Click()
me.用户名=null
me.密码=null
me.用户名.SetFocus
end sub
祝你成功！
5.一个ACCESS的VBA编程
s=0 '把0赋值给变量s For i=1 To 10 step 2 'FOR循环，步长为2，即每循环一下，i的值加2,1为i的初始值，当i超过10时退出循环 s=s+1 's的值增加1 i=i*2 'i的数值扩大1倍 Next i '循环详细过程如下：s=0,i=1，执行第一次循环后，s=1,i=2next i，即i=i+2 s=1,i=4，执行第二次循环后，s=2,i=8next i，即i=i+2 s=2,i=10，执行第三次循环后，s=3,i=20next i，即i=i+2 s=3,i=22,i此时>10，退出循环最后s=3,i=22。
