[[20220919094945]]　『SharePointからデスクトップアプリで開いた際の「』（SP）　ページの最後に飛ぶ

『SharePointからデスクトップアプリで開いた際の「読み取り専用」解除方法』（SP）

お世話になっております。
SharePointに保存されたExcelBookをデスクトップアプリ(Excel)で開いた際に、「読み取り専用」として開かれます。

これを、マクロで解除しようと試みましたが解除出来ませんでした。

Aブックから、SharePoint内のアドレスを指定して Bブックを開く(デスクトップアプリで)
↓
Bブックが「読み取り専用」で開かれる
↓
Aブックのマクロで「Bブック」を指定して「読み取り専用」解除を実行

※Bブックを手動でアクティブ化して、Aブックのマクロで解除を試むもエラー

sub test()

Application.EnableEvents = True'マクロ停止

Dim WbB As Workbook
Set WbB = ActiveWorkbook'Bブック指定
WbB.ChangeFileAccess xlReadWrite, Notify:=False'解除

end sub

↓

実行時エラー 1004
ChangeFileAccess メソッドは失敗しました Workbook オブジェクト

すみませんがアドバイスのほどよろしくお願いします。

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

追加

Excelファイル自体には、読み取り専用などの設定はしていません。
おそらく、SharePointにあるファイル自体を開く際に、自動的に読み取り専用となっていると思います。
（SP） 2022/09/19(月) 10:22

 >自動的に読み取り専用となっていると思います。
 そうではないと思いますよ。
 作成者に問い合わせてみたらどうですか。
 パスワードを設定している可能性もありますよ。
（0TOY） 2022/09/19(月) 10:57

0TOY さん
ありがとうございます。

ファイル自体は、自身が作成しパス・読み取りなど設定はしておらず
SharePointにアップロードしております。
（SP） 2022/09/19(月) 11:38

とりあえず解決したので報告です。

SharePointファイルの読み取り専用の解除
→SendKeysで解除することでとりあえず対応しました。
（SP） 2022/09/21(水) 12:47

コメント返信：