Excel - 使用完整路径名关闭/保存

时间:2015-06-30 20:30:31

标签: excel vba excel-vba excel-2010

在关闭和保存工作簿时,是否有一种方法可以插入完整路径名而不是文件名

以下

Workbooks("BOOK1.XLS").Close SaveChanges:=true
Workbooks("C:\user\docs\BOOK1.XLS").Close SaveChanges:=true

我问的原因是我已经在字符串中命名了所有完整的路径名

Workbooks(i).Close SaveChanges:=true

所以对于数组中的每个i等

1 个答案:

答案 0 :(得分:7)

可以像在第一个语句中一样使用Workbook对象

function update() {
    var data = getData();

    // Update the SVG with the new data and call chart
    chartData.datum(data).transition().duration(500).call(chart);
    nv.utils.windowResize(chart.update);
};

因为它使用.Name属性(没有完整路径)

另一方面,Workbooks("BOOK1.XLS").Close 方法将完整路径和文件名作为参数:

Workbooks.Open

它也可以是没有路径的文件名,但它会在默认文件夹

中搜索它

我使用两个选项来解决类似问题,其中所有字符串都包含完整路径和文件名:

  1. 在打开工作簿时设置对工作簿的引用:

    Workbooks.Open "C:\user\docs\BOOK1.XLS"

    • 然后你可以像这样关闭它

      <强> Set wb = Workbooks.Open("C:\user\docs\BOOK1.XLS")

  2. 从包含路径和文件名的字符串中提取文件名:

    wb.Close SaveChanges:=True

    • 然后您可以像在第一行中那样关闭它:

      <强> wbName = Mid(fullName, InStrRev(fullName, "\") + 1)