Table of contents

Demande d’accès à plusieurs fichiers

office 365 dev account|Dernière mise à jour: 04/10/2017
|
1 Contributeur

Utilisez la commande GrantAccessToMultipleFiles pour demander l’accès à plusieurs fichiers à la fois dans votre solution Office 2016 pour Mac.

Dernière modification : 26 janvier 2016

S’applique à :Excel pour Mac | PowerPoint pour Mac | Word pour Mac | Office 2016 pour Mac

Contrairement aux macros VBA dans Office pour Mac 2011, les macros VBA dans Office 2016 pour Mac n’ont pas accès aux fichiers externes par défaut. Étant donné que les applications Office 2016 pour Mac sont des applications bac à sable (sandbox), elles ne sont pas autorisées à accéder aux fichiers externes.

Les commandes de fichier macro existantes demandent l’autorisation à l’utilisateur d’accéder à un fichier si l’application n’y a pas accès. Cela signifie que les macros qui accèdent à des fichiers externes ne peuvent pas être exécutées sans assistance. L’utilisateur doit approuver l’accès au fichier la première fois que chaque fichier est référencé. Vous pouvez utiliser la commande GrantAccessToMultipleFiles pour réduire le nombre d’invites, afin d’améliorer l’expérience utilisateur.

Commande GrantAccessToMultipleFiles

Utilisez la commande GrantAccessToMultipleFiles pour entrer un tableau de chemins de fichier et demander à l’utilisateur l’autorisation d’y accéder.

    Boolean  GrantAccessToMultipleFiles(fileArray) 
ParamètreDescription
fileArrayTableau de chemins de fichier POSIX

La commande renvoie une valeur indiquant si l’utilisateur a accordé ou non l’autorisation.

Valeur renvoyéeDescription
TrueL’utilisateur accorde l’autorisation pour les fichiers.
FalseL’utilisateur refuse l’autorisation pour les fichiers.

Remarque : une fois que l’utilisateur accorde des autorisations, celles-ci sont stockées avec l’application. L’utilisateur n’a pas besoin d’accorder à nouveau une autorisation pour le fichier.

Exemple

    Sub requestFileAccess()  

    'Declare Variables  
    Dim fileAccessGranted As Boolean  
    Dim filePermissionCandidates 
  
   'Create an array with file paths for the permissions that are needed.  
    filePermissionCandidates = Array("/Users//Desktop/test1.txt", "/Users//Desktop/test2.txt") 
  
    'Request access from user.  
     fileAccessGranted = GrantAccessToMultipleFiles(filePermissionCandidates) 
    'Returns true if access is granted; otherwise, false. 
    End Sub
© 2018 Microsoft