在磁盘上有一个已做好格式的EXCEL文件book1和一个WORD文件test1,希望用SHELL调用,怎么实现?谢谢.
解决方案 »
- 请有经验的朋友指点迷津,关于数据表删除记录的问题
- 抢分了。。如何在当前程序中禁用键盘和鼠标右键
- Text1.Text = rs1.Fields(1) ,rs1.Fields(1) 为空怎么办。
- Help!!需要一个输入控件,类似Combox,但输入一个字就能引出含该字的值,如,要输入Apple, 输完a即显示apple...
- 代码求助!!!
- 提问!
- 在VB里执行SQL脚本文件,客户进行升级时,只需要在VB里点一个按钮,而不需要让用户执行查询分析器来执行SQL脚本
- vb如何从内存中显示图片
- 数据库高手必看
- 公用对话框的flag常数如cdlOFNAllowMultiselect如何查找?
- 存储过程语句执行问题?高手请进。
- mshflexgrid的问题
Shell "D:\Program Files\Microsoft Office\Office\EXCEL.exe", vbNormalFocus 其解释为第一个参数是想要调用的可执行文件的路径和文件名,第二个参数为文件打开时窗体的状态(例如是最大化,还是最小化,还是标准模式)。
'如果在你的系统中安装了Excel,你就可以使用OLE Automation来控制Excel,打开VB.
'点击Project | Reference项,在References列表中应该有一项:
'Microsoft Excel x.x Object Library ,其中x.x是不同Excel的版本号.选中该项,点击确定键.
'就可以将Excel的说明库加入到工程中了,下面是利用Excel打开工程的例子:Dim x As New Excel.ApplicationPrivate Sub Command1_Click()
Dim shtTemp As Worksheet
Dim wbtemp As Workbook
x.Visible = True
Set wbtemp = x.Workbooks.Open("E:\Efile\12\MsgboxCrus0050.xls")
Set wbtemp = Nothing
Set x = Nothing
End Sub
Shell "D:\Program Files\Microsoft Office\Office10\EXCEL.exe E:\book1.xls",vbNormalFocus
Shell "D:\Program Files\Microsoft Office\Office10\WINWORD.EXE E:\test1.doc",vbNormalFocus