对象'工作簿'的运行时错误'1004'方法'opentext'失败

Question

我正在尝试通过以下代码打开文本文件。我在我的电脑上使用这段代码已经有一段时间了。我将系统升级到Excel 2013并且无法正常工作。

fileToOpen = Application _
    .GetOpenFilename("Text Files (*.txt), *.txt")

Workbooks.OpenText Filename:= _
    fileToOpen _
    , Origin:=1251, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
    xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, _
    Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(1, 1), _
    TrailingMinusNumbers:=True

即使是为其记录的宏也无法在我升级的系统中运行。请帮忙。错误出现在Workbooks.OpenText行。 错误是

  对象'工作簿'的运行时错误'1004'方法'opentext'失败