• ベストアンサー

共有Excelファイルを他の人が起動している場合

いつもお世話になっております。 Excelのバージョンは2003です。 ひとつ、サーバー上に「TEST.xls」というファイルがあります。 そのファイルは皆が使うものでして、 他の人が使っていると「読み取り専用」でないと開けません。 そこで、 共有ファイルを使っているときに他の人が使いたいと思い、開いた場合 もともと共有ファイルを開いていた人の画面に 「次に待ってる人が居ます!」というメッセージボックスを出したいと思っています。 VBAでこのようなプログラムは可能でしょうか? 回答よろしくお願い致します。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

こんばんは。 前回の回答も書きましたので、よろしくお願います。 >共有ファイルを使っているときに他の人が使いたいと思い、開いた場合 >もともと共有ファイルを開いていた人の画面に >「次に待ってる人が居ます!」というメッセージボックスを出したいと思っています。 私の記憶の範囲ですが、待っている側へのメッセージは、"Scripting.FileSystemObject"や"WScript.Network"を使って、開放されるまでのチェックは出来るのですが、先に使っている側にメッセージを送る方法は、VBAでは、解決しないと思います。 誰か別のアイデアを持っているかもしれませんが、長年、掲示板を見ていますが、解決した覚えがありません。

satoron666
質問者

お礼

回答ありがとうございます。 私も、色々調べてみたのですが 中々見つからず… まだまだ探してみたいと思います! ありがとうございました^^

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 共有しているエクセルファイルをOffce2003で開こうとすると他で開いていないのに読み取り専用になってしまいます。

    MS VistaでOffice2003Proを使用しています。 MS Windows2000 Serverでエクセルのファイルを共有しているのですが、他のPCで開いていないのにも関わらず、「xxx.xlsは編集のためロックされています。使用中は'xxx'です。[読み取り専用]で開くか、または、読み取り専用で開き、ほかの人がファイルの使用を終了したときに通知を受け取るには、[通知]をクリックします。」と出てしまいます。 毎回ではなく、頻繁にでます。また、すべてのファイルではなく、特定のファイルです。これらのファイルに共通していることは、VBAでマクロが組んであります。 ご回答よろしくお願いいたします。l

  • Excel VBAで読み取り専用ファイルをコピー

    お世話になります。 Excel VBAでサーバーにある共有のExcelファイルを自分のPCにコピーするコードを作りました。 FileCopy "\\Server\サンプル.xls", "\\○○○\Users\Desktop\サンプル.xls" 通常は問題ないのですが、コピーするファイルが誰かに開かれていると、たぶん、読みとり専用となるためにエラーとなります。 読み取り専用の時でもエラーにならずにコピー出来る方法を教えて頂けないでしょうか? よろしくお願いします。

  • エクセルファイルが開かない?

    エクセルの共有ファイルが開けなくなりました。エラーメッセージの内容は「○○xlsにアクセスできません。ファイルは読み取り専用であるか、また読み取り専用の場所にアクセスしようとしています。または、サーバー上に保存されているドキュメントから応答がありません。」となります。どうしてでしょうか?教えて下さい。

  • エクセルファイルが開かない

    エクセルファイルが開けなくなり、下記のような メッセージが出ています。 なんとか開く方法はありませんでしょうか。 エラーメッセージ '***.xls'にアクセスできません。ファイルは読みとり専用であるか、または読みとり専用の場所にアクセスしようとしています。または、サーバー上に保存されているドキュメントから応答がありません。 エクセルのバージョン 97、2000両方でやってみましたが開きません でした。ブリーフケースに入れて複数のバージョン のエクセルで開いて使っていました。 ファイルサイズは500kbと(正常に)表示 されています。 よろしくお願いします。

  • Excel VBAでファイルの制御をしたい

    今、Excel VBAでファイル操作の制御スクリプトをくみたくて 悩んでおります。。 "test.xls"ファイルというエクセルの共有ファイルがあります。 そのファイルは日々様々なユーザーがデータを書き込みます。 この共有ファイルに対し、誰か一人がこのファイルを開いている際に 違う誰かがファイルを開こうとした場合に、警告メッセージを表示した後、強制的にファイルを閉じるというプログラムを組みたいのですが・・。 何せ、VBAでのプログラミングはまったくの初心者の為、 悪戦苦闘しております。 どなたか、良いアドバイスを頂けたら嬉しいです。 是非、宜しくお願い致します。

  • 誰が共有のエクセルファイルを開いているか?

    会社の共有フォルダに入ってるエクセルファイルを開いた時に読み取り専用になる場合、 誰がそのファイルを開いているかをわかる方法ってありますか? Vbaも使えるので、開いている人をvbaで取得する方法でもいいので教えてください。

  • Excelファイルについて

    共有文書サーバ(Windows 2003 Server)にエクセルファイルを保存しています。 このエクセルファイルは共有で使用するファイルのため、誰かが開いていると 別の人がそのエクセルファイルを開こうとすると「読み取り専用」のメッセージが表示されます。 このメッセージで誰が開いているのかがわかるようにしたいのですが、そのようなことは可能なのでしょうか。 もし、可能であれば方法を教えて下さい。

  • 【Excel VBA】ネットワーク上の共有フォルダにあるExcelを開く

    Windows XP Office2003 エクセルVBAにて、ネットワーク上にある共有フォルダ内のエクセルブックを開くコーディングを教えていただけますでしょうか? 開きたいブック:\\共有サーバー\共有\TEST.xls よろしくお願いします。

  • エクセルファイルが壊れた?

    MOの中にあるエクセルファイルを開こうとすると、 「前回開いた時に、重大なエラーが発生しました。このドキュメントを引き続き開きますか?」とのメッセージがで、「はい」と答えると「○○○.xlsにアクセスできません。ファイルは読み取り専用であるか、または読み取り専用の場所にアクセスしようとしています。または、サーバー上に保存されているドキュメントから応答がありません。」とのメッセージ。 開けないので仕方なく、エクセルを閉じると、「プログラム終了。このプログラムは応答していません。」のエラーメッセージが・・・ また、ファイルをコピーして貼り付けようとすると、 「データエラー(巡回冗長検査(CRC)エラーです)」のメッセージが出ます。 このファイルを復旧することはできないのでしょうか? なお、MO内の同じフォルダー内の別のエクセルファイルは全く正常に、開くことができます。

  • エクセルファイル '○○○.xls'にアクセスできません。  →アクセスしたい。

    エクセルファイルを開くと下記のメッセージがでます。 なんとかファイルを開くことができますでしょうか 『'○○○.xls'にアクセスできません。ファイルは読み取り専用であるか、または読み取り専用の場所にアクセスしようとしています。または、サーバー上に保存されているドキュメントから応答ありません。』 いろいろ調べてあらゆる手段を試してみましたがだめでした。 ・他のバージョンで試す ・OoenOfficeで試す ・Accessで試す ・開いて修復 で試す 全てだめでした。何かいい方法があったら教えてください。

専門家に質問してみよう