《三日excel编程教程.docxVIP

最近由于要修改一个excel report，见识了vba的强大。 这个report是一个大牛3年前写的，每天只需打开该文件， 就会自动连接oracle的dev和uat数据库读取最新的市场数据， 生成6个透视图，并比较dev和uat的数据的异同。vba操作数据之方便，生成的report之复杂，深深的吸引了我， 于是乎觉得不学点vba真的对不起老本行。花了3天时间学习， 目前觉得基本可以满足大多数需求，即便是有不懂的地方， 也知道在哪里查资料，该怎么查资料。为了防止自己很快忘记， 于是有了vba excel编程3日谈, 内容涵盖对象模型， 基本语法，excel表格基本操作，事件，ADODB连接数据库读取数据， 生成透视图。本人没有学过vb，写出来的东西在过来人看来未免太简单， 但只求对新手有帮助。vba excel编程三日谈(1) vba excel编程三日谈(2)vba excel编程三日谈(3)??准备工作vba是一种寄宿语言，像javascript生存在浏览器中一样，vba生存在office应用程序中。所以请确保你安装了office，本人学习的时候采用的office2007， 版本差异会引起一些问题， 但是office2003和office2007的差异不是很大。新建一个excel文档test.xls， 按alt＋F11进入vba编程界面。双击左面的thisWorkbook，在右边输入：Private Sub Workbook_Open() MsgBox Hello, worldEnd Sub保存并退出excel，然后重新打开该excel，则会看到弹出的消息Hello，world。 如果遇到macro安全警告，请enable。这就是第一个vba程序，Workbook_Open是对事件open的响应函数（关于事件在后面会有更多介绍）。当然你可以把代码写在任何一个sheet里面，也可以就地运行，调试。双击sheet1，在右边输入：Sub test() MsgBox Hello, worldEnd Sub然后把光标移到函数名test上，点击工具栏上的绿色的箭头即可运行测试该函数。我们还可以在excel的工作表上添加一个控件（比如按钮），通过点击控件来执行函数。把菜单切换到Developer标签，如下图点击Insert即可选择插入的控件(如果是office2003则在菜单试图-工具栏-控件工具箱)点击按钮，在工作表的任意位置画一个按钮，同时在选择框中点击你刚编写的函数test，保存。 此时点击按钮即可触发该函数。当然你还可以录制宏， 这也是学习vba的好方法。在这里不做介绍。OK， 至此，我们学会在怎么定义一个过程(函数)， 然后怎么触发运行它(通过事件，通过vba运行调试，通过按钮)，准备工作到此结束。?vba excel对象模型类似javascript中的dom模型, windows编程中的组件对象模型, vba也有自己的对象模型. excel的模型中的对象有很多(自己可以google一下), 但是经常用到的无非这四五个:application - workbooks - worksheets - range -cells. application处于最顶上,表示正在运行的程序(Excel)本身. workbook工作薄, 即一个excel文件单元, 对应着一个xls文件. worksheet是工作表, 新建一个workbook里面默认包含了3个worksheet; range表示工作表中的一块区域, 比如Range(A1:D10)表示A1:D10之间的那块区域, 一个range包含多个Cell,一个cell即worksheet中的一个小格子. 新建一个文件1.xls,并在sheet1的A1单元格中随便输入内容, 下面的程序将更清楚的表明它们之间的关系. 继续在刚才的test.xls的sheet1的代码区中输入如下代码:[vb] view plaincopyprint?Sub?test()???去读本文件的单元格的内容??MsgBox?Application.Workbooks(test.xls).Worksheets(Sheet1).Range(A1).Value???如果是当前的application,则application可以省略??MsgBox?Workbooks(test.xls).Worksheets(Sheet1).Range(A1).Value???如果是当前workbooks,则workbooks可以省略??MsgBox?Worksheets(Sheet1).Range(A1).Value???如果是当前的sheet,则worksheet可以省略??MsgBox?Range(A1).Value???还可以这么