[[20151001200652]] 『ショートカットだけを読み取り専用で開きたい』(アンジェリカ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『ショートカットだけを読み取り専用で開きたい』(アンジェリカ)

皆のスケジュールが記入されてるショートカットのエクセルファイルがあります。
皆がしょっしゅう修正するので開いたとしてもすぐに閉じてください。と言われます。
私はそのファイルを見るだけなので開いたとしても読み取り専用で開きたいのです。
なぜなら開きっぱなしでそのまま閉じなくて皆に迷惑をかけることもしばしば....。

ショートカットだけを読み取り専用で開くことって出来ますか?

< 使用 Excel:Excel2007、使用 OS:Windows7 >


 実際には試していないので、だめだったらスルー願います。

http://edutainment-fun.com/excel/edit/tipReadOnly.html

 こんなページがありました。

 アンジェリカさんのケースでは、ショートカットでいったん開いた後、読み取り専用にすればいいみたいです。

 >>(2)ツールバーで 読み取り専用の設定/解除ボタンで切り替え可能です。 
 >>ファイルを開いたまま切り替えられるので、便利です。
 >>excel 2007以降:クイックアクセスツールバーの追加

 と書いてありますので試してみられてはいかがでしょう。

(β) 2015/10/01(木) 20:41


 読み取り専用ではないのだが…

 ショートカットを右クリック→新規作成
 で、元のファイルのコピーを開いてくれる。

 コピーなので仮に保存しても元のファイルには影響しないし、
 元ファイルを誰かが開いても問題ない。

 っていうのはどうかな?

(1111) 2015/10/01(木) 21:05


β様、1111様 ありがとうございます。
いろいろなやり方ってあるのですね。
 

(アンジェリカ) 2015/10/01(木) 22:59


私の場合、Shiftを押しながらファイル名を右クリックし、読み取り専用で開く、というのをよく使いますね。
(???) 2015/10/02(金) 09:15

 あ、???さん、教えてください。
 Win7でExcel2010だとそれで読み取り専用にならんのです。
 Wordでもならんですが。
 これ動けば便利なのにとずっと思ってんです。
 どの組み合わせだと出来ます?

(1111) 2015/10/02(金) 09:48


 検索したところレジストリの設定に問題があるらしく以下にあるようにレジストリの変更が必要なようだ。
 (他のOS,Excelのバージョンの組み合わせでは確認していない)
http://answers.microsoft.com/ja-jp/office/forum/office_2010-excel/excel-shift/cf5c70ea-4695-4ddf-b261-d86feac50eac?auth=1
(ねむねむ) 2015/10/02(金) 10:01

 おー! ねむねむさん、ありがとうございます。
 レジストリっすか。そりゃいくらやっても駄目なわけです。
 ちゃっちゃと直してきます。

 アンジェリカさん、場所借りちゃってすみませんでした。

(1111) 2015/10/02(金) 10:14


 VBSで開けば?
 ファイルパスは適当に直してください。
 BJ

 Dim OPFL,EXApp

 OPFL=CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\サンプル.xls"

 On Error Resume Next
 Set ExApp = GetObject(, "Excel.Application" )
 If ExApp Is Nothing Then
   Set ExApp = CreateObject("Excel.Application")
 End If
 On Error Goto 0

 EXApp.Visible = True
 EXApp.WorkBooks.Open(OPFL).ChangeFileAccess 3   'xlReadOnly
 CreateObject("WScript.Shell").AppActivate EXApp.Caption
 WScript.Quit
(BJ) 2015/10/02(金) 15:10

regeditでレジストリを確認すると、例えばHKEY_CLASSES_ROOTにある.xlsxは、既定値が「Excel.Sheet.12」になっています。
「Excel.Sheet.12」以下の「shell」のエントリを見ると、「Open」の他に「OpenAsReadOnly」というエントリがあります。
これがあれば、Shift+右クリックで「読み取り専用」が出てくるのですが…。
(Wordも同様で、「Word.Document.12」以下にあります)

ちなみに、私の環境はExcel2010+Win7(32bit)ですよ。
(???) 2015/10/02(金) 18:11


 ???さん、ありがとうございます。
 PCはおんなじ環境でした。

 Shift+右クリックで「読み取り専用」って文字は出てくんですけど、動かないんですよね。

 どうやら環境の違いじゃなく、バグなんすね。
 他の人のPC直しにくくて困りますな。

 いろいろ助かりました。ありがとうございました。

(1111) 2015/10/05(月) 09:19


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.