カテゴリ:Excel&Word,VBA
久しぶりにお仕事での話題です. 勤め人なので,平日は *大体* 出社してます. #出社してても,ちゃんとお仕事をしているのか?...... さて, 社内イントラの共有のフォルダに保存してある Excel Book で,共有設 定にしていない Excel Book を,閲覧状態で長い時間放置(割り込み業 務対応や,内線電話の対応で,閉じるのをつい忘れたりとかで...)して いると,編集作業したいから一度 Book を閉じて欲しいと,苦情連絡を 度々受けたりします......最近,物忘れも酷いのですけど... なので, Excel Book を「読み取り専用で開きたい」と思うのですけど, Book を開くときには,通常は,Book 側で,「読み取り専用を推奨する」 の設定に,チェックを{入れた設定|入れた状態}にしておかないとダ メ(※)なのですけど,右クリックからのコンテキストメニューに「読 み取り専用で開く」を作っておけば便利ってことで,イロイロ調べて, 上手く作ることが出来たレジストリ設定が下記になります. 設定を読み込ませた後,チョッと癖がある操作「Excel ファイルをダブ ルクリックで開くと "My.xls が見つかりません" エラー メッセージが 表示される」が必要ですけど,作ってしまえば,かなり楽. ※各ファイルのプロパティの「属性」設定の「読み取り専用(R)」他に, 「ファイル」-「名前を付けて保存」-「ツール」-「全般オプショ ン」から設定出来るのですが,Book 毎に設定する必要があるので, どちらもかなり面倒ですね. :[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\shell\OpenAsReadOnly] :@="読み取り専用で開く" : :[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\shell\OpenAsReadOnly\command] :@="\"C:\\Program Files\\Microsoft Office\\OFFICE11\\EXCEL.EXE\" /e" : :[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\shell\OpenAsReadOnly\ddeexec] :@="[open(\"%1\",,1)]" : :[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\shell\OpenAsReadOnly\ddeexec\Application] :@="Excel" : :[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Excel.Sheet.8\shell\OpenAsReadOnly\ddeexec\Topic] :@="system" でも, レジストリ(※)を書き換えるので,不測の事態に備えて事前に上記部 分のオリジナルのレジストリを残す(エクスポート)必要があります. ※レジストリが「何」や,エクスポートが「何」とか,上記部分の残す 場所の起点が解らないヒトは,レジストリの書き換えはヤメましょう. © 6ちゃん@ズボラな仕事の進め方に一段と磨きが掛った感じ...... お気に入りの記事を「いいね!」で応援しよう
Last updated
2012.11.15 22:26:34
コメント(0) | コメントを書く
[Excel&Word,VBA] カテゴリの最新記事
|
|