質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.30%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Q&A

解決済

1回答

5152閲覧

vba Updatelinkで「実行時エラー'1004'」

takumisato

総合スコア5

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

0グッド

0クリップ

投稿2022/04/15 02:21

コード”renshu2”なのですが実行するとUpdatelink~の行で
「”Updatelink”メソッドは失敗しました:’workbook’オブジェクト」
と表示され実行されません。
ただ単に開くopenコード(”renshu”のコード)は実行可能でした。
なにがもんだいなのでしょうか?

VBA

1コード 2```Sub renshu() 3Workbooks.Open "\\192.168.1.46\国道除雪\R04 国道除雪\07_ 応急日報(現道)\応急処理指示書・確認簿_4月.xlsm" 4 5End Sub 6 7Sub renshu2() 8 Application.ScreenUpdating = False 9 10 With UserForm1 11 .Label1 = "              " 'リセット 12 .Show vbModeless 'フォームを処理続行モードで開く 13 .Repaint '強制表示 14 15 ActiveSheet.Unprotect 16ActiveWorkbook.UpdateLink Name:= _ 17 "\\192.168.1.46\国道除雪\R04 国道除雪\07_ 応急日報(現道)\応急処理指示書・確認簿_4月.xlsm", Type:=xlExcelLinks 18 .Label1 = "■■■■■■■■■■■■■ " 19 .Repaint 20 .Hide 21 End With 22End Sub

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

退会済みユーザー

退会済みユーザー

2022/04/15 02:53

再現しないので回答のしようがないですね。 新しいブックで作り直してみるとか...
xail2222

2022/04/15 03:39 編集

回答に記載しなおします。
guest

回答1

0

ベストアンサー

そのファイルに対するリンクがActiveWorkbookにないのでは?

リンクしているファイルと違うファイルで実行すると同じ、エラーが出ましたよ

ネットワークドライブで開いたファイルに対してリンクを張って、¥¥192.168.1.46¥~でupdatelinkしてもエラーになります。

投稿2022/04/15 03:39

編集2022/04/15 03:51
xail2222

総合スコア1525

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

takumisato

2022/04/15 04:57

ご回答ありがとうございました。 今回のコードはやめていった先輩の書いたコードです。無知な私はいろいろ調べながら四苦八苦している状態です この掲載したコードは一部で本当は11月から4月まであってその順番に処理されてきています。 最後の4月だけエラーが出ます。 「そのファイルに対するリンクがActiveWorkbookにないのでは?」 とおっしゃられましたがそのリンクをActiveworkbookにつくるにはどうすればいいのでしょうか? 調べてみてそれらしい説明がありましたがまったく理解できませんでした
takumisato

2022/04/15 05:18

エクセルのデータタブ→リンクの編集から状態を見てみたら4月の分だけが前年になっていました。そこを修正したら動きました!いただいた回答がヒントになりました!大変助かりましたありがとうございます。
xail2222

2022/04/15 05:20

そうですね。リンクの編集の所を見て下さい。と書こうとしていたところでした。 動くようになって良かったです
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.30%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問