如何打开指定其路径的工作簿 [英] How to open a workbook specifying its path

查看:231
本文介绍了如何打开指定其路径的工作簿的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

  Sub openwb()
ChDirE:\sarath\PTMetrics\20131004\D8 L538-L550 16MY
工作簿(D8 L538 -L550_16MY_Powertrain Metrics_20131002.xlsm)打开
结束子

这里,我正在第三行错误说下标超出范围。打开指定路径的工作簿应该怎么办?

解决方案

Workbooks.open(E:或者,以更结构化的方式...

  Sub openwb()
Dim sPath As String,sFile As String
Dim wb As Workbook

sPath =E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY\
sFile = sPath& D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm

设置wb = Workbooks.Open(sFile)
End Sub


Sub openwb()  
    ChDir "E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY"
    Workbooks("D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm").Open    
End sub

Here, I am getting an error saying Subscript out of range on 3rd line. What should I do to open a workbook specifying its path?

解决方案

Workbooks.open("E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY\D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm")

Or, in a more structured way...

Sub openwb()
    Dim sPath As String, sFile As String
    Dim wb As Workbook

    sPath = "E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY\"
    sFile = sPath & "D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm"

    Set wb = Workbooks.Open(sFile)
End Sub

这篇关于如何打开指定其路径的工作簿的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆