ここまでの会話の流れ要約

風柳：OneDrive上におくとThisWorkbook.PathがURLになってしまうのって未だに抜本的な対策はないんでしたっけ？ https://gist.github.com/furyutei/20902048fe029c169aa29db9ae23f603#3-onedrive-フォルダへのシンボリックリンクジャンクションを作成する
ちゅん：普通のOneDriveフォルダは大丈夫だが、「OneDriveへのショートカットの追加」によって、SharePointの同期フォルダや、他人の共有フォルダをOneDriveに追加した場合、任意の名前に変えたり、リンク（マーク付きの）フォルダを好きな位置に移動できるため対応しておらず、場所の特定が非常に困難
Diary：力業で同名のフォルダ、ファイルを検索して対処しているが･･･
根元：過去にこんな投稿を発見 https://stackoverflow.com/questions/33734706/excels-fullname-property-with-onedrive/73577057#73577057

<aside> 🐤 トグルのON/OFFは Alt+Ctrl+Tで出来ます

</aside>

ライブラリ VBA-FileTools

パスの変換の考え方はただの文字列置換なので、従来手法と大きくは変わらない。

このライブラリの特徴は、OneDriveの設定情報（iniファイル）を読み込むことで置換を実現している。

例："C:\\Users\\kc\\AppData\\Local\\Microsoft\\OneDrive\\settings\\Business1\\e686a7b5-91fc-41bc-b7d9-bd4512b0647a.ini"

そのため、OneDrive Businessで、最近Teams・SharePointに追加された「OneDriveへのショートカットの追加」ボタンや、OneDrive（web）の「[自分のファイル]へのショートカットの追加」によって作成されるリンクフォルダに対応している。

Untitled