Discussion :

[Antichoc]

Bonjour

Je rencontre une difficultés. Je suis récemment passé à Windows 10 / Office 2016 et une macro qui marchait initialement ne fonctionne plus.

A chaque fois que j'ouvre un fichier office de mon SharePoint depuis le navigateur Windows, j'ai toujours un bandeau qui s'affiche (malgré la désactivation de toute option de sécurité !)



Outre le fait de cliquer systématiquement sur le bouton, ce document est également ouvert par un script VBA pour mise à jour. Seulement, lorsque j'éxécute la macro, le fichier est ouvert en lecture seule !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbooks.Open stPathCrah & "\" & stNomFicCraH, 0, False

Y a t il une modification du comportement de la méthode OPEN pour un Workbook ???

Merci pour votre aide

[joe.levrai]

Bonjour,

quel version SharePoint utilises-tu ? Online/365 ou une version hébergée localement ?

ton site SharePoint est bien listé en Site de confiance du côté du navigateur ?
Côté SharePoint, aucune modification quant aux paramètre d'ouverture du fichier ("Ouvrir dans l'application cliente" + habilitation supérieure à "lecture") ?


Je ne penche pas pour un problème côté Excel, nous risquons probablement de te renvoyer sous peu vers le forum SharePoint, mais non sans avoir au préalable identifié sa version et tes paramètres

[Antichoc]

Je vais tenter de te répondre, il s'agit du sharepoint de mon entreprise sur Office 365.

Le scipt VBA ouvre directement le fichier depuis l'URL de partage du site sharepoint.

Mon URL est bien dans la liste des sites de confiance.

Dans le SP, où trouve-t-on les paramètre d'ouverture du fichier ?

Merci à toi pour ton aide.

[joe.levrai]

Je constate avec étonnement que je rencontre le même souci que toi.

J'utilise Office365 et je suis sous environnement Citrix

Quand j'utilise Excel via Citrix (100% des cas où des projets VBA tournent) aucun souci
MAIS, je viens de tester avec un pack office en "lourd" installé sur mon PC, j'ai également la lecture seule qui se présente

[Antichoc]

J'ai cherché en vain comment désactiver cette sécurité mais sur google, rien de probant ...

Ce qui est étrange c'est que cette option apparaît sur tout les documents ouverts depuis le Sharepoint. Que ce soit manuellement depuis l’explorateur de fichier ou en VBA ...

[araigné]

Bonjour,

Avant toute chose, l'adresse stPathCrah est-elle une simple url ou bien inclut-elle la chaîne "davwwwroot" ?
Ensuite je propose de changer l’accès au fichier avec la méthode "ChangeFileAccess".

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub OpenFileSP()
 
    Dim stNomFicCraH As String
    Dim stPathCrah As String
 
    stPathCrah = "http:\\servername.com\DavWWWRoot\...\..."
    'Il faut d'assurer qu'il s'agisse de l'url avec la chaine : davwwwroot
    stPathCrah = "Nom du fichier.xlsx"
 
    Dim Wb As Workbook
    Set Wb = Application.Workbooks.Open(stPathCrah & "\" & stNomFicCraH, , False)
 
    If Wb.ReadOnly Then
        'Switch de mode d'accès au fichier
        Call Wb.ChangeFileAccess(xlReadWrite)
    End If
 
    '...
 
End Sub

@+