EXCEL 中的SQL有数据库sql是什么意思用么??


这个问题,系列文的第1章咱们就讲过了,然而后台总是收到类似的提问,所以今天就再集中说一次。一般有三种方法▼第一种是MS Query法,很少用,越来越少用,略。第二种是OLE DB法。在Excel的【数据】选项卡下单击【现有链接】命令,在弹出的【现有链接】对话框中,单击【浏览更多】,选取目标文件后,依次单击【确定】,得到下面的【导入数据】对话框。单击【属性】按钮,打开【连接属性】对话框,切换到【定义】选项卡,即可在【命令文本】编辑框中编写SQL语句,并【确定】执行。如下图所示。这种方法通常搭配数据透视表(图一的显示方式选择【数据透视表】),此时SQL获取的记录集会自动成为透视表的缓存数据源。此外也可以搭配Power Pivot(高级版本Excel(2013及以上)勾选图一的【将此数据添加到数据模型】)。对于没有VBA基础的朋友来说,通常推荐这种方法,只要会写SQL查询语句,就可以直接使用了。下面是一个操作过程示例动画:咱们的系列文章【零基础学SQL in Excel教程合集】主要是使用的第3种方法,也就是VBA+ADO+SQL。和第2种方法相比较,该法的优点在系列文里已经说过很多了,其实最重要的其实就两点,掰手指头,啊,我的手指头好白——想念故乡的雪。1▼借助VBA,SQL语句可以使用变量,更加灵活自由。2▼借助ADO,对数据,SQL除了查询以外,还可以增改删。对于VBA代码连面都不熟的朋友而言,是不是就不能使用VBA执行SQL了呢?并不是。VBA执行SQL语句有一个固定的套路。哪怕你连VBA代码一句都看不懂也没关系,只要知道如何复制运行VBA代码(如何运行VBA代码?其实很简单),以及知道在哪里写入SQL语句就可以了。也就是下列代码第11行处。代码如看不全,可以左右拖动..▼Sub ByADO_SQL()
Dim cnADO As Object
Dim rsADO As Object
Dim strSQL As String
Dim i As Long
Set cnADO = CreateObject('ADODB.Connection')
Set rsADO = CreateObject('ADODB.Recordset')
cnADO.Open 'Provider=Microsoft.ACE.OLEDB.12.0;' _
& 'Extended Properties=Excel 12.0;' _
& 'Data Source=' & ThisWorkbook.FullName
strSQL = 'SELECT *
FROM [A$] ' '//此处写入SQL代码
Set rsADO = cnADO.Execute(strSQL)
Cells.ClearContents
Range('A1').CopyFromRecordset rsADO
rsADO.Close
cnADO.Close
Set cnADO = Nothing
Set rsADO = NothingEnd Sub小贴士▼在以上VBA代码中输入的SQL语句,双引号应改为单引号,这是因为SQL语句作为字符串,外围已经存在一对双引号了。当处理的文件跨工作薄时,SQL语句的书写和OLE DB法稍有不同,具体请参考:Excel VBA+ADO+SQL入门教程004:SQL中的Excel表没了,晚安。

我要回帖

更多关于 数据库sql是什么意思 的文章