1.读取sheet页【原始数据】中的B列只取唯一值,并将维一值写入到sheet页【批量处理】A列中 Subonly_data() DimmRng$,D,c SetD=CreateObject("scripting.dictionary")'因MSSQL防注入安全问题，这里的Create与Object之间是没有空格才是正确 ForEachcInSheets("原始数据").Range("B2:B9999") IfNotD.exists(c.Value)ThenD.Addc.Value,"" Nextc Sheets("批量处理").Range("

1.　未在本地计算机上注册“Microsoft.Ace.OleDb.12.0”提供程序。 a.请您在Project->属性->Build->目标CPU设置为X64位。 b.SQL导入excel数据：baidu下载AccessDatabaseEngine.rar 2.查询MSSQL端口 方法一： 新建查询->执行：　execsys.sp_readerrorlog0,1,'listening' 2017-12-2813:56:56.750服务器Serverislisteningo

在Windows事件查看器应用程序日志中，您可能会看到下面的错误： SQLServerevaluationperiodhasexpired. 解决方法：(我的是Windows2003) 转到:C:\DocumentsandSettings\AllUsers\「开始」菜单\程序\启动就是开始菜单的启动项那里, 创建一个文件:启动SQLSERVER.Bat 右键.bat文件-->编辑-->输入: date/t>temp.txt date2011-08-16 netstartmssqlserver @for/f"tokens=1"%%ci