ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
12
返回列表 发新帖
楼主: q3698995

[求助] sql用不熟练求指教。

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-2-17 10:29 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
q3698995 发表于 2023-2-17 10:00
因为之前一直用的数组办法,最近才了解sql,所以想封装一个dll方便调用,考虑到通用性,所以想实现在数据 ...

数据不规范就不要用SQL

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-2-17 10:31 | 显示全部楼层
WANT-T 发表于 2023-2-17 10:29
数据不规范就不要用SQL

感谢,明白了

TA的精华主题

TA的得分主题

发表于 2023-2-17 12:42 来自手机 | 显示全部楼层
本帖最后由 lss001 于 2023-2-20 17:05 编辑

'不打开工作薄获取包含空行数据

f = "'文件夹\[文件名]Sheet1'!" '注意各符号
For i = Rows.Count '获取空行
    j = f & Rows(i).Address(, , xlR1C1)
    k = Application.ExecuteExcel4Macro("CountA(" & j & ")")
    If k > 0 Then Exit For
Next
Set rst = cnn.Execute("SELECT Count(*) FROM [Sheet1$]")
arr = rst.GetRows '获取数据行
'把数据行+空行代入sql
Set rst = cnn.Execute("SELECT * FROM [Sheet1$A1:L"& arr(0, 0) + i &"]")
'获取数组
arr = rst.GetRows

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-2-18 23:41 | 显示全部楼层
本帖最后由 q3698995 于 2023-2-19 00:05 编辑
lss001 发表于 2023-2-17 12:42
'不打开可以使count
'先获取变量
Set rst = cnn.Execute("SELECT count(*) FROM [Sheet1$]")

这样不严谨,sql识别的范围是从第一个非空数据算起。比如数据在c3:d10范围,count返回的是8,代入后参数是C1:D8,实际返回的数据c3:d8的数据范围。能否知道第一个数据所在的位置呢,也就是c3能得到吗?

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-2-19 19:10 | 显示全部楼层
lss001 发表于 2023-2-17 12:42
不打开文件参考楼上更正...

GetObject,这算是在后台打开了。

TA的精华主题

TA的得分主题

发表于 2023-2-19 22:27 来自手机 | 显示全部楼层
q3698995 发表于 2023-2-19 19:10
GetObject,这算是在后台打开了。

不用后台打开,可参考以上楼修正

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-19 03:45 , Processed in 0.029231 second(s), 6 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表