[[20100917133620]]　『マクロを無効で履歴』（香）　ページの最後に飛ぶ

『マクロを無効で履歴』（香）

 以前教えていただいたものです。
 マクロが入っている共有シ－トで
 開けたら　テキストに履歴が残るようにしています。
 マクロを有効にすると履歴が書き込まれるのですが
 マクロを無効では履歴は書き込まれません
 マクロを無効で開けても履歴が残るようにできないものでしょうか?
 お知恵をお願いします。
 WindowsXP,Excel2003です。

 >以前教えていただいたものです。
 以前の質問内容がわかりませんが、マクロで履歴を残しているんじゃないですか？

 それともマクロ以外で履歴が残るようにしたいってことでしょうか？

 （てつろう）

 てつろう様
 早速の返答ありがとうございます。

 ＞ 以前の質問内容がわかりませんが、マクロで履歴を残しているんじゃないですか？
 各課室で共有しているため、誰が　何時開けたか把握したくマクロで履歴を残していますが、マクロを 無効にて開けると履歴は残らないのです。
 マクロを無効にて開けても履歴が残る方法はないものかと?

 ＞それともマクロ以外で履歴が残るようにしたいってことでしょうか？
 マクロ以外でも履歴が残せるのでしょうか
（香）

 >課室で共有しているため、誰が　何時開けたか把握したくマクロで履歴を残していますが、マクロを 無効にて開けると履歴は残らないのです。
 マクロを無効した場合は履歴を残すマクロが動かないから、履歴は残らないですね。

 >マクロを無効にて開けても履歴が残る方法はないものかと?
 マクロは必ず有効にして開くなど、運用でカバーするしかないでしょう。

 >マクロ以外でも履歴が残せるのでしょうか
 すみませんが、私にはわかりません。。。

 （てつろう）

 山勘。
 ツール→変更履歴の記録　をマクロで操作しているのでは？
 変更履歴の記録なんてことをやったことがありませんが。
 BJ

 てつろう様　考えてくださってありがとうございます。
 BJ様  
 Option Explicit
 Private Sub Workbook_Open()
    Worksheets("sheet1").Select
    Call chk_and_start

     Open "\\○○\共有○○\○○\○○Logシ－ト\○○Log.txt" For Append As #1
     Print #1, Join(Array(Now(), Environ("username")))
 Close #1

 End Sub

 このようなマクロを使っています。
（香）

 >このようなマクロを使っています。
 っていわれても返信に困ってしまいます。

 履歴が残るテキストって
 >\\○○\共有○○\○○\○○Logシ－ト\○○Log.txt
 ですよね。

 で、簡単に書いてあるマクロがやっている事を説明すると。

 該当ブックを開くと自動で、
 >\\○○\共有○○\○○\○○Logシ－ト\○○Log.txt
 に該当ブックを開いた時のＰＣ日時と、開いた時に使った
 エクセルの使用者名を追加して書き込む。
 ってなことをやっています。
 ですから、マクロを無効にすると同じ事は誰もやってくれません。

 で、やった事がありませんが、
 ツール→変更履歴の記録　では、どうでしょうか？
 BJ

コメント返信：

[ 一覧(最新更新順) ]

[[20100917133620]] 『マクロを無効で履歴』（香） ページの最後に飛ぶ

[[20100917133620]]　『マクロを無効で履歴』（香）　ページの最後に飛ぶ