Microsoft Word, Excel を読み取り専用で開くメニューを追加する方法
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
* Excel の場合 [#g02e48e9]
** 簡単な方法 [#bd8f9ddf]
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Excel ワークシート」(拡張子:...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」にエクセル...
例)"C:\Program Files\Microsoft Office\Office\EXCEL.EXE" /r
+ 「OK」で設定を確定する。
** DDE を使う方法 [#bd8d4993]
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Excel ワークシート」(拡張子:...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」にエクセル...
例)"C:\Program Files\Microsoft Office\Office\EXCEL.EXE" /e
+ 「DDE を使う(&U)」チェックをONにする。
+ 「DDE メッセージ(&D)」に次のように入力する。&br;
[open("%1",,True)]
+ 「アプリケーション(&C)」に「Excel」と入力する。
+ 「DDE アプリケーションが実行していないとき(&N)」は空白...
+ 「トピック(&T)」に「system」と入力する。
+ 「OK」で設定を確定する。
以上の操作は、レジストリエディタで一発登録できる。Office ...
実行ファイルやレジストリのパスは Office(Excel)のバージ...
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="\"C:\\Program Files\\Microsoft Office\\Office\\EXCEL....
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="[open(\"%1\",,True)]"
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="Excel"
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="system"
* Word の場合 [#p3ca5fc5]
+ 以下のスクリプトを(適当な名前).vbs としてファイルに保...
#code(VBScript){{
Dim fileName
Dim wordApp
'arguments check
If WScript.Arguments.Count <> 1 Then WScript.Quit
'get filename
fileName = WScript.Arguments(0)
'start Word
Set wordApp = WScript.CreateObject("Word.Application")
wordApp.Visible = True
'read only open
Call wordApp.Documents.Open(fileName,,True)
'finalize
Set wordApp = Nothing
WScript.Quit
}}
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Word 文書」(拡張子:DOC)を選...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」に以下を入...
wscript.exe "(1 で保存したファイルのパス)" %1
+ 「OK」で設定を確定する。
-----
[[MLEXP. Wiki]]
終了行:
* Excel の場合 [#g02e48e9]
** 簡単な方法 [#bd8f9ddf]
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Excel ワークシート」(拡張子:...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」にエクセル...
例)"C:\Program Files\Microsoft Office\Office\EXCEL.EXE" /r
+ 「OK」で設定を確定する。
** DDE を使う方法 [#bd8d4993]
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Excel ワークシート」(拡張子:...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」にエクセル...
例)"C:\Program Files\Microsoft Office\Office\EXCEL.EXE" /e
+ 「DDE を使う(&U)」チェックをONにする。
+ 「DDE メッセージ(&D)」に次のように入力する。&br;
[open("%1",,True)]
+ 「アプリケーション(&C)」に「Excel」と入力する。
+ 「DDE アプリケーションが実行していないとき(&N)」は空白...
+ 「トピック(&T)」に「system」と入力する。
+ 「OK」で設定を確定する。
以上の操作は、レジストリエディタで一発登録できる。Office ...
実行ファイルやレジストリのパスは Office(Excel)のバージ...
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="\"C:\\Program Files\\Microsoft Office\\Office\\EXCEL....
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="[open(\"%1\",,True)]"
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="Excel"
[HKEY_CLASSES_ROOT\Excel.Sheet.8\shell\読み取り専用で開...
@="system"
* Word の場合 [#p3ca5fc5]
+ 以下のスクリプトを(適当な名前).vbs としてファイルに保...
#code(VBScript){{
Dim fileName
Dim wordApp
'arguments check
If WScript.Arguments.Count <> 1 Then WScript.Quit
'get filename
fileName = WScript.Arguments(0)
'start Word
Set wordApp = WScript.CreateObject("Word.Application")
wordApp.Visible = True
'read only open
Call wordApp.Documents.Open(fileName,,True)
'finalize
Set wordApp = Nothing
WScript.Quit
}}
+ エクスプローラの「ツール」→「フォルダオプション」→「フ...
+ ファイルタイプ「Microsoft Word 文書」(拡張子:DOC)を選...
+ 「新規(&N)」ボタンを押して新しいアクションの編集ダイア...
+ 「アクション(&A)」に「読み取り専用で開く(&R)」と入力(...
+ 「アクションを実行するアプリケーション(&L)」に以下を入...
wscript.exe "(1 で保存したファイルのパス)" %1
+ 「OK」で設定を確定する。
-----
[[MLEXP. Wiki]]
ページ名: