マクロでリンクを更新しないで開く

解決済

質問者：gx9wx
質問日時：2014/09/03 10:16
回答数：2件

エクセル2013です。
リンクを更新しないで開く
ネットで調べて

Workbooks.Open Filename:="C:\作業用フォルダ\更新データ名.xls", UpdateLinks:=0

に行きつきました。
私の構文は

MsgBox "編集したいデータを選択してください", vbInformation, "手順"
MsgBox "ファイル選択画面を開きます", vbInformation, "ファイル選択"
選択ファイル = Application.GetOpenFilename

If 選択ファイル = False Then
MsgBox "中止します", vbExclamation
Exit Sub 'キャンセル選択時
Else
Workbooks.Open 選択ファイル
End If

というふうに、作業者が開くbookを選択する為、対象のドライブが固定できません

Workbooks.Open Filename:="C:\作業用フォルダ\更新データ名.xls", UpdateLinks:=0

をどのように応用すればいいかわからず
いろいろ試したのですが駄目です。
（上記構文中のcはcドライブの事だと思っています？）

とりあえず★の部分を2行追加して

MsgBox "編集したいデータを選択してください", vbInformation, "手順"
MsgBox "ファイル選択画面を開きます", vbInformation, "ファイル選択"
選択ファイル = Application.GetOpenFilename

If 選択ファイル = False Then
MsgBox "中止します", vbExclamation
Exit Sub 'キャンセル選択時
Else
Workbooks.Open 選択ファイル
Application.AskToUpdateLinks = False '★メッセージを表示しない
ActiveWorkbook.UpdateLinks = xlUpdateLinksNever '★リンクの自動更新を行わない
End If

のようにしてみたのですが

ブック内の一部のリンクはすぐに更新できません
「更新」「接続」

と警告メッセージが出てしまいます。

アドバイスをお願いいたします。