Sub requestFileAccess()
'Declare Variables_
    Dim fileAccessGranted As Boolean
    Dim filePermissionCandidates As Variant
'Create an array with file paths for the permissions that are needed.
    filePermissionCandidates = Application.Transpose(Worksheets("First").Range("W8:W200"))
'Request access from user.
    fileAccessGranted = GrantAccessToMultipleFiles(filePermissionCandidates)
End Sub