Sub Query() Dim Conn As Object, Rst As Object Dim strConn As String, strSQL As String Dim i As Integer, PathStr As String Set Conn = CreateObject("ADODB.Connection") Set Rst = CreateObject("ADODB.Recordset") PathStr = ThisWorkbook.Full…

Dim cnn,strSql Set cnn = CreateObject("adodb.connection") cnn.Open "driver={sql server};server=10.2.*.1;uid=xiaoming;database=DBprod;pwd=123456" strSQL = "select top 10 * from usertable " Sheets("TEST1").Range("…

报错: 解决:在语句开头指定SET NOCOUNT ON 就是这么神cao奇dan. -END-…

SQL语句在数据库使用中十分重要. 在EXCEL中可以不打开工作簿,就获取数据,对多工作簿操作很用,也很快. 对大量数据处理,比循环快很多,但是比词典方法还有点距离(可惜我还没有学会词典). 对数据库编程,任何编程语言都要,都支持SQL语言. 借助VBA, 我们也可在EXCEL中使用它,也就是将EXCEL作为数据库 (EXCEL中对SQL功能稍有限制,如:删除数据等,但不影响我对它的推崇) 在斑竹的帮助下,对SQL在EXCEL有了一点点体会,拿出来和大家分享. 斑竹的SQL帮助文件:http:/…

每每提到Excel办公自动化,我们脑海里能想到的就是公式.数据透视表.宏.VBA,这也是我们大部分人数据分析的进阶之路.当我们对于常用VBA技巧已经相当熟练后,往往会有一种"我的VBA知识够用啦"的错觉,其实那只是因为我们收到的实际需求还不够复杂和多样化. 一旦哪天碰到略显复杂的业务需求时,我们才知道VBA变量.循环.条件判断.数组.字典.窗体,这些还只是VBA的基础知识罢了,会了这些,远达不到[蒂花之秀]的水准.我们今天的主角,SQL(结构化查询语言),通过嵌入VBA代码中,就可以解…

如何用SQL语句查询Excel数据?Q:如何用SQL语句查询Excel数据? A:下列语句可在SQL SERVER中查询Excel工作表中的数据. 2007和2010版本: SELECT*FROMOpenDataSource( 'Microsoft.ACE.OLEDB.12.0', 'Data Source="c:\book1.xlsx";User ID=Admin;Password=;Extended properties=Excel 12.0')...[Sheet1$] 复制代码…

小爬在之前的博文中多次提到,可以在VBA中写SQL来操作Excel文件,实现各类数据处理和分析需求.那么,你可能有这样的疑问:Excel原生的VBA,数据透视表,数据分析功能不够吗,为啥一定要用SQL来实现呢?在Excel VBA中使用SQL到底优势在哪儿?今天小爬就来带大家好好捋一捋这些问题. 首先,在VBA中写SQL,这基本算VBA的高阶功能,不是所有人都掌握,因此,上述的场景除了SQL,确实都有其它技术方案.其次,如果我们对别的技术运用的更熟练,我们完全可以用自己最擅长的技术栈来解决问题.…

小爬之前的文章 [Excel VBA中写SQL,这些问题你一定为此头痛过]中详细讲诉了一些常见的VBA 中使用SQL遇到的问题,这里再补充两个常见的问题场景及对应的解决方案,希望你们看了后能够思路开阔些,少走些弯路. 一.数据源Excel文件的工作表有些列的列名相同 我们知道,在商业数据库中创建表时,同一个表名下是不允许创建相同的字段的,且字段名要遵从一定规范.但在Excel文件中则无此限制,同一个工作表下,支持多列的列名相同.那么当我们用SQL来操作这类头疼的Excel文件时,该如何区分不同字…

这两天网络上流传14w条12306账号信息的txt文档,下载下来之后发现在txt文档中看和查询内容都不是很方便. 这里我就记录下如何将txt文档导入到excel和SQL的过程. 导入到excel 1. 新建一个excel,在Ribbon的Data选项中选择From text: 2. 文本转换excel 的向导: step 1:使用默认的选项 step 2:选择分隔符,在txt中的分隔符是---,但这里只能输入一个“-”符号 step 3: 这里从txt导入到excel就结束了,但由于我们输入的分…

Linq to SQL 语法查询(链接查询,子查询 & in操作 & join,分组统计等) 子查询 描述:查询订单数超过5的顾客信息 查询句法: var 子查询 = from c in ctx.Customers where (from o in ctx.Orders group o by o.CustomerID into o where o.Count() > 5 select o.Key).Contains(c.CustomerID) select c; in 操作 描述:查…