VBA - Gestion autorisation dossier OneDrive

Bonjour,

Est-ce possible via VBA d'entrer dans les propriétés d'un dossier OneDrive puis d'aller dans sécurité afin de modifier les autorisations d'accès à ce dossier en collant les contacts des personnes présentes dans mon fichier Excel.

En vous remerciant par avance.

Problème résolu, je partage le code si cela intéresse quelqu'un.

Sub ModifierAutorisationDossierV2() ' autorise tout

    Dim dossier As String
    Dim utilisateur As String
    Dim wshShell As Object
    Dim Commande As String

    dossier = "C:\Users\tom\OneDrive"
    utilisateur = ""

    Set wshShell = CreateObject("WScript.Shell")

    Commande = "icacls """ & dossier & """ /grant:r " & utilisateur & ":(OI)(CI)F"

    wshShell.Run Commande, 0, True

    Set wshShell = Nothing

End Sub