Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

14754 / 76738

←次へ　｜　前へ→


	【67473】リンクダイアログのスルー

koke - 10/12/8(水) 14:13 -


	引用なし

	パスワード

下記のVBAを作成し、動かしているのですが、
Office2002以降では、問題なく動くのですが、Office2000では、コピー先のファイルを開く際に、リンクのダイアログが表示されます。
コピー先ファイルのリンクを削除したらよいのですが、どうしても見つかりません。
なので、下記のマクロにリンクダイアログをスルーするようにしたいのですが、どのようにすればよいか教えてください。

Private Sub CommandButton1_Click()

Dim wb As Workbook
Application.ScreenUpdating = False

Set wb = Workbooks.Open(Filename:=ThisWorkbook.Path & "\AAA.xls")
ThisWorkbook.Sheets("BBB").Range("E4:AR4").Copy wb.Sheets("CCC").Range("E4:AR4")
Application.DisplayAlerts = False
wb.Close (True)
Application.DisplayAlerts = True
Application.ScreenUpdating = True

End Sub

0 hits

▼

【67473】リンクダイアログのスルー koke 10/12/8(水) 14:13

≪