Workbooks.Open中的相对路径

标签： , ,

标题: Workbooks.Open中的相对路径
作者: Demon
链接: https://demon.tw/programming/workbooks-open-relative-path.html
版权: 本博客的所有文章，都遵守“署名-非商业性使用-相同方式共享 2.5 中国大陆”协议条款。

很少用到excel.application对象，所以不是很有研究。

碰到Workbooks.Open打开文件时使用相对路径会出错的问题，例如包含下面代码的VBS文件和data.xls在同一目录下

Dim oExcel
Set oExcel = CreateObject("excel.application")
oExcel.Visible = True
oExcel.Workbooks.Open "data.xls"

运行却会报错

无法找到“data.xls”。请检查文件名的拼写，并检查文件位置是否正确。

如果您正试图从“文件”菜单上最近使用的文件列表中打开文件，请确认文件未被重命名、移动或删除。

看来相对路径相对的不是vbs文件的路径，那么到底是相对哪里的路径呢？答案是“我的文档”，把data.xls放到“我的文档”根目录下再运行代码就不报错了。

赞赏

微信赞赏支付宝赞赏

相关文章:

  1. VBS调用Windows API函数
  2. 用VBS控制鼠标（获取鼠标坐标、鼠标移动、鼠标单击、鼠标双击、鼠标右击）
  3. 实现简单的VBS加密
  4. 用Data URI Scheme嵌入内联图像
  5. 利用WMI打造完美“三无”后门-Downloader and Uploader

随机文章:

  1. VBScript编译器(VBS也疯狂)
  2. 用VBS实现PHP的basename函数
  3. 使用Image Generator (Image Builder)生成OpenWrt固件
  4. 用VBS创建环境变量
  5. 人人网日志导出工具

这篇文章发布于 2010年09月16日，星期四，17:39，归类于 程序设计。 您可以跟踪这篇文章的评论通过 RSS 2.0 feed。 您可以留下评论，或者从您的站点trackback。

一条评论 发表在“Workbooks.Open中的相对路径”上

  1. shiow1984说道：
    2011年10月16日 21:35

    可能我的文档是默认的相对路径吧，相对路径的用法是App.Path & “\date.xls”
    所以最后一句改为oleExcel.Workbooks.Open FileName:=App.Path & “\值班表.xls” ，就可以将你的vbs和date.xls文件放到同一个文件夹下就可以了

    回复

留下回复