Microsoft 365 vba : récupérer chemin local et chemin onedrive

[ERIC S]

Bonjour à tous

mon problème du moment concerne les fichiers stockés sur onedrive ou onedrivepro ou sharepoint
je souhaiterais pouvoir récupérer le nom local et le nom onedrive du fichier ouvert, via vba.

une méthode simple pourrait être d' "utiliser les boutons disponibles dans l'onglet fichier du ruban menu information" (copier le chemin d'accès et copier le chemin d'accès local

j'ai fait un premier test avec senkeys :

Sub test()
Range("D17").Select
Application.SendKeys ("%fxc")
'Application.SendKeys ("%l")
'MsgBox ActiveSheet.Name
ActiveSheet.Paste
End Sub

cela semble fonctionner mais je me retrouve sur l'onglet fichier et je ne vois pas de code me permettant de simuler la flèche de retour pour revenir sur l'affichage des feuilles.
Si quelqu'un a une idée sur ce point ce serait super.

edit: le retour peut se faire au moins par {ESC} mais pour l'instant pb de synchro (sendkeys peut être capricieux)

Je reste à l'écoute d'autres solutions, sachant que je cherche une solution globale (onedrive, pro et sharepoint) car les http sont différents

Merci d'avance