Excel VBA質問箱 IV

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

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


14750 / 76734 ←次へ | 前へ→

【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

1 hits

【67473】リンクダイアログのスルー koke 10/12/8(水) 14:13 質問
【67475】Re:リンクダイアログのスルー Jaka 10/12/8(水) 15:43 発言
【67503】Re:リンクダイアログのスルー sasa 10/12/9(木) 17:26 回答
【67521】Re:リンクダイアログのスルー koke 10/12/10(金) 14:15 お礼

14750 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free