質問編集履歴
2
追記
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -37,4 +37,12 @@
|
|
|
37
37
|
スライド内にテキストやオブジェクトの追加、削除等が出来てしまいます。
|
|
38
38
|
|
|
39
39
|
そしてその編集した状態で、上書きはできませんが、別名保存は出来てしまいます。
|
|
40
|
-
厳密に読み取り専用で開くとは異なる表示でしたので、解決とはいきませんでした…
|
|
40
|
+
厳密に読み取り専用で開くとは異なる表示でしたので、解決とはいきませんでした…
|
|
41
|
+
|
|
42
|
+
|
|
43
|
+
どうも読み取り専用は2パターンある様ですね。
|
|
44
|
+
・パスワードかかっているのを触れないように見るだけで開くモード
|
|
45
|
+
・誰かが先に開いているファイルを上書きしないように開くモード
|
|
46
|
+
|
|
47
|
+
私がやりたい読み取り専用は前者の方なのですが、
|
|
48
|
+
どうもここでいうReadOnlyというのは、後者の方のことを指しているような気がします。
|
1
回答頂いた内容での確認追記
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -23,4 +23,18 @@
|
|
|
23
23
|
```
|
|
24
24
|
|
|
25
25
|
参考にしたドキュメント
|
|
26
|
-
[https://docs.microsoft.com/ja-jp/office/vba/api/powerpoint.presentations.open](https://docs.microsoft.com/ja-jp/office/vba/api/powerpoint.presentations.open)
|
|
26
|
+
[https://docs.microsoft.com/ja-jp/office/vba/api/powerpoint.presentations.open](https://docs.microsoft.com/ja-jp/office/vba/api/powerpoint.presentations.open)
|
|
27
|
+
|
|
28
|
+
###追記
|
|
29
|
+
jinojiさんから頂いた回答の結果と、そのNG理由を追記致します。
|
|
30
|
+
|
|
31
|
+
```vba
|
|
32
|
+
Set pptRo = Presentations.Open("ファイルパス" & "::::" & "パスワード", ReadOnly:=msoTrue)
|
|
33
|
+
```
|
|
34
|
+
|
|
35
|
+
上記で開くと、たしかに読み取り専用と表示され、上書き保存も出来ないのですが
|
|
36
|
+
この場合だと、選択ダイアログで「読み取り専用で開く」で開いた時と異なり
|
|
37
|
+
スライド内にテキストやオブジェクトの追加、削除等が出来てしまいます。
|
|
38
|
+
|
|
39
|
+
そしてその編集した状態で、上書きはできませんが、別名保存は出来てしまいます。
|
|
40
|
+
厳密に読み取り専用で開くとは異なる表示でしたので、解決とはいきませんでした…
|