MSアクセスのファイルバックアップのコード実行時に、PC環境によってエラーが発生し、コピーできない場合がある。

Question

MS 365 のアクセスでデーターベースを作成しています。

フォーム内のボタンをクリックすることで、現在開いているデータベース自身を、

別の名前を付けて同じフォルダーへコピーしバックアップするようにしたいと思っています。

コピーするための主なVBAコードは次のとおりです。

Set fso = CreateObject("Scripting.FileSystemObject") 

fso.CopyFile before, after, True 

自宅のPCで実行するとエラーにならず、思い通りにバックアップできますが、

職場のPCで実行すると、CopyFile　メソッドのところで

「エラー70　書き込みできません」　の　エラーとなります。

PC環境は、双方とも

Windows11　23H2　64bitOS

MS365Personal（同一MSアカウントでインストール）　

テストするために、USBメモリにアクセスデーターベースファイルを格納し、

同一USBで双方のPCでテストしてますので、フォルダーの属性は問題ないと思っています。

（少し自信がありませんが）

原因を特定し解決するには、どうすればよいのでしょうか？

ご教示のほど、よろしくお願いします。

<モデレーター注>

この質問は、「Windows」のカテゴリに投稿されましたが、内容から判断してこちらのカテゴリに移動しました。

サブカテゴリーは不明な為、仮設定しています。

適切なカテゴリに投稿すると、返信や回答が得られ易くなり、同じ質問を持つ他のユーザーの参考にもなります。

Answer 1

件の現象が発生するPCでAccessファイルを 排他モード で開いてるからだと想定してみます。

Accessのオプションには「クライアントの設定」というクライアント毎に（要はPC単位で）設定されるタブ項目があり、そこに

既定の開くモード

の設定項目が存在していて「排他(X)」がチェックされているものと思われます。

Answer 2

ご回答ありがとうございました。早速試したところ、即解決しました。

最悪、PCリセットを考えていましたが、やらなくて済みました。助かりました。

Answer 3

サイトを見て質問しようとしましたが、かなりハードルが高いです。

ご回答ありがとうございました。

Answer 4

VBA(マクロ)の公式サポート場所は、海外コミュニティとなっています。

有識者が集まっている所の方が、適切なアドバイスを受けやすいでしょう。

・Stack Overflow(VBA)

　　[VBA プログラミングに関する質問]

　　Stack Overflow には、説明的なタイトル、完全で簡潔な問題ステートメント、問題を再現する
　　ための十分な詳細の要求などのガイドラインがあることに注意してください。
　　機能要求または過度に広範な質問は、トピック外と見なされます。
　　新しいユーザーの場合は、Stack Overflow ヘルプ センター にアクセスして詳細を確認して下さい。

※ 閲覧者・回答者が多い公式サポートサイトをお勧めします。

　 英語で質問を送信してください。