Excel 本质上是数据处理软件,无论是表格多么复杂,对于数据的运算是最基本的一个内容。
本节深入学习一下,如何运用ADO类进行数据操作方法。
ADO是英文ActiveX Data Object缩写,是一个数据对象。
应用之前要进行一项前期绑定,先添引用---"Microsoft ActiveX Data Objects 6.1"。
步骤:在Excel中按下Alt+F11键,打开VBE编辑器-工具-引用中添加"Microsoft ActiveX Data Objects 6.1"。
下图为本节示例:
编辑了一个窗体对话框,可实现对工作表的修改操作。
如下图所示:
下面介绍编辑流程:
首先新建一个连接对象Con,建立工作表和对象连接,这样就可以通过这个对象变量来访问和修改工作表。
Dim con As New ADODB.Connection '新建连接对象
Dim str As String
str = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & xlsmWorkBook & _
";Extended Properties=""Excel 12.0"";"
'设置连接字符串
con.Open str '打开连接
接下来,进行数据修改操作。
Dim sql As String
sql = "Update [Sheet1$] set " & ChFildes & "='" & Chstr & "' where " & SName & "=@name"
'设置查询条件
Dim cmd As New ADODB.Command '新建Command对象
cmd.CommandText = sql'参数赋值
cmd.ActiveConnection = con
cmd.Parameters("@name").Value = SChname
cmd.Execute
数据操作使用了SQL语句,这个要对SQL数据库操作要有一个基本的语法了解,具体语法可以上网查询。
本节只应用了Update 语句。可理解为更新数据。
设置sql查询语句之后,新建一个Command对象,它是我们新建的连接对象之下的一个子对象。
Command之下有一些方法需要执行,执行之后才能完成一系列的操作。具体怎么执行,代码已经被写好了,不用知道。
直接拿来使用就可以,就像买回来一盒快递,不用管它是怎么制作的,只需要张开嘴吃就行了。
Command对象用于执行面向数据库的简单查询,此查询可执行诸如增删查改等动作,所以十分有用。
Command里有一些参数需要赋值,最后使用Execute执行,具体可参考代码理解。
总之,ADO应用是一个特别的对象,无论是VBA还是C#或其它编程语文,Windows系统基本通用,所以有必要做一个总结练习。
联系客服