ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 2811|回复: 9

[原创] 用SQL+数据透视表真的不用打开文件吗?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-6-2 22:42 | 显示全部楼层 |阅读模式
网路上有说:
“用多重合并方式要打开源文件
用SQL方式不用打开文件”
这话从狭义上讲是对的,从广义上讲是错的。

我们来看看分析分析
将文件打开属性visible设成false,文件你是看不到得。我们就这个属性来查查某一个文件是否打开
将数据透视表文件中添加一个按钮,在代码区添加这段代码来测试
Private Sub CommandButton1_Click()
On Error Resume Next
Windows("收发存明细.xls").Visible = True
If Windows("收发存明细.xls").Visible = False Then
MsgBox "收发存明细没打开"
Else
MsgBox "收发存明细已打开"
End If
End Sub

程序解释,这里利用了出错执行下一句的语句:On Error Resume Next
1、如果文件没打开
Windows("收发存明细.xls").Visible = True
If Windows("收发存明细.xls").Visible = False Then
这两句都出错,就执行下一句MsgBox "收发存明细没打开"
2、如果文件打开
让文件显示出来:Windows("收发存明细.xls").Visible = True
条件跳转到执行  MsgBox "收发存明细已打开"


你再将源文件打开,就是重新开一个新的excel在新的窗口中打开源文件
点击按钮运行的结果:收发存明细已打开
关掉源文件后运行的结果: 收发存明细没打开

查文件是否打开.jpg

数据透视表不刷新时,文件是没有同源文件关联的,不刷新状态下,你打开或移动源文件都没有影响的。
很明显在数据刷新后,文件是打开的,但测试文件打开状态却显示:收发存明细没打开
这样可以得出结论,文件不是以excel格式打开的。
但会是什么格式打开的呢? 数据库格式: Jet OLEDB:Database
用多重合并方式要人工打开源文件
用SQL方式用连接打开文件


[ 本帖最后由 Scarlett_88 于 2009-6-2 22:47 编辑 ]

数据透视表VBA搜寻路径.rar

31.06 KB, 下载次数: 49

TA的精华主题

TA的得分主题

发表于 2009-6-3 07:11 | 显示全部楼层
Scarlett_88,您太厉害了吧!顶!

TA的精华主题

TA的得分主题

发表于 2009-6-3 17:36 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
很显然,文件肯定要被打开,要不是不可能读得出任何数据的。我们所说的不打开,应该是从可视化、可感知化的角度来说的吧。

TA的精华主题

TA的得分主题

发表于 2009-6-3 22:26 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

回复 3楼 alzeng 的帖子

同意,楼主所说的似乎超出了EXCEL,可归于文件系统的概念。
就像NTFS文件系统中文件的属性:R、W、C等等。

如果此文件不能读取,那么就肯定不知道里面的数据是什么?

大家通常所说的打开,即只指前台打开。

[ 本帖最后由 huanbei 于 2009-6-4 18:20 编辑 ]

TA的精华主题

TA的得分主题

发表于 2009-6-3 22:34 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2009-6-4 09:21 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2009-6-8 17:29 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
谢谢分享,学习

TA的精华主题

TA的得分主题

发表于 2009-6-9 00:09 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2010-2-23 09:18 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2010-3-9 11:42 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-5-13 18:22 , Processed in 0.046872 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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