用SQL+数据透视表真的不用打开文件吗？

Scarlett_88

网路上有说：
“用多重合并方式要打开源文件
用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在新的窗口中打开源文件
点击按钮运行的结果：收发存明细已打开
关掉源文件后运行的结果： 收发存明细没打开



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

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

fdd

Scarlett_88，您太厉害了吧！顶！

alzeng

很显然，文件肯定要被打开，要不是不可能读得出任何数据的。我们所说的不打开，应该是从可视化、可感知化的角度来说的吧。

huanbei

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

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

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

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

bibisin

谢谢分享,学习

开心萝卜惠州

呵呵，太厉害了

wbinglong

谢谢分享,学习

xowi99

_88 的脑袋是怎么长的，
太厉害了

wenkal

不得不再仰慕下楼主

任我逍遥

恭敬的仰视并学习着