マクロでリンクを更新しないで開く
エクセル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
のようにしてみたのですが
ブック内の一部のリンクはすぐに更新できません
「更新」「接続」
と警告メッセージが出てしまいます。
アドバイスをお願いいたします。