Discussion :

[Fabien DELATRE]

Bonjour,

J'ai trouvé quelques lignes de code me permettant de télécharger un fichier Excel sous team. Le soucis est que je ne peux pas ouvrir ce fichier qui a été téléchargé sur mon poste. Message : "format ou extension non valide."

Je ne vois pas ce qui cloche.

Quelqu'un pourrait-il m'éclairer ?

Merci

Voici mon code :

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
21
22
23
24
25
26
27
Option Explicit
 
Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
                                           "URLDownloadToFileA" ( _
                                           ByVal pCaller As Long, _
                                           ByVal szURL As String, _
                                           ByVal szFileName As String, _
                                           ByVal dwReserved As Long, _
                                           ByVal lpfnCB As Long) As Long
 
 
Sub recaplot1()
 
 
    Dim CheminDestination As String
    Dim ValeurRetour As Long
 
    'l'adresse url du fichier sur Sharepoint
    Const URLSharePoint As String = "https://liensharepoint/Seclin du jour.xlsx"
 
    'chemin et le nom de la destination
    CheminDestination = "C:\Macro\Seclin du jour.xlsx"
 
    'lance le téléchargement
    ValeurRetour = URLDownloadToFile(0, URLSharePoint, CheminDestination, 0, 0)
 
End sub

[Fabien DELATRE]

Finalement j'ai contourné mon soucis. Je ne télécharge plus le fichier.

Par contre je ne trouve aucune commande sur le net permettant de publier des fichiers sous teams en vba excel.

Quelqu'un pourrait-il m'aider ?

Merci


Bonne journée

[Jean-Philippe André]

Bonjour Fabien,

je m'attaque à un problème similaire dans le cadre d'une étude de faisabilité.

Il apparaitrait que ca se découpe en 3 étapes :
- enregistrer le classeur sur ton SharePoint
- publier le classeur sur ton SharePoint
- écrire un message ou mettre une piece jointe


La piste du moment est la suivante
https://docs.microsoft.com/fr-fr/graph/use-the-api

Si jamais j'arrive à quelque chose de probant, je te tiens informé.

[Pierre Fauconnier]

Ca me conforte dans l'idée que Teams est une merde infâme.

Dans l'école de mon épouse, ils avaient des fichiers Excel sur sharepoint, et on savait créer un chemin dans l'explorateur vers le sharepoint... Du coup, on pouvait travailler les fichiers en VBA comme s'ils étaient locaux.

Avec Teams, c'est fini, apparemment.

Et dire qu'il paraît que ça améliore "l'expérience utilisateur"...

[joe.levrai]

Bonjour,

désolé du déterrage, je viens de répondre à un sujet similaire et cette discussion non résolue était en suggestion.


Ici, une méthode pour ouvrir un fichier déposé sous Teams : https://www.developpez.net/forums/d2.../#post11677752

[Pierre Fauconnier]

Salut Joe,

Merci pour ce suivi

J'espère juste que ça se passe bien niveau versioning, mais je ne sais pas pourquoi, j'ai un doute à ce sujet...

Autrement dit: Si quelqu'un modifie le fichier dans Teams via Teams et que quelqu'un l'ouvre en local en VBA, je pense que ça va bien merder.

Perso, je serais pour considérer qu'un excel Teams est simplement un fichier contenant des tableaux structurés permettant la saisie des données, et que ce fichier nourrira un fichier d'analyse au travers d'une récupération (VBA ou Power Query (??) )

[joe.levrai]

Bonjour Pierre,

les modifications réalisées Online (Sharepoint ou Teams) se propagent automatiquement sur le fichier stocké, car c'est en fait physiquement un seul et même fichier partagé

Tu m'as mis le doute (faible doute, car sinon j'aurai eu des problèmes depuis pas mal de temps ), mais je viens de tester :

1) ouverture du fichier sur Teams Online
2) J'ai ajouté une connerie
3) Appel du fichier depuis VBA Excel (en utilisant l'URL Sharepoint récupérée via la méthode proposée dans mon lien)

ça s'ouvre bien avec la modification, et côté Sharepoint j'ai bien une incrémentation du Versionning

[Pierre Fauconnier]

[...]
les modifications réalisées Online (Sharepoint ou Teams) se propagent automatiquement sur le fichier stocké, car c'est en fait physiquement un seul et même fichier partagé [...]

Oui, ça je sais. Si ce n'était pas le cas, ce serait catastrophique.

C'est dans l'autre sens que le doute m'habite...

Une modification faite par le VBA alors que le fichier est modifié dans Teams au travers de l'application. Je serais pour ma part extrêmement prudent avec des manips de ce genre (en cas de téléscopage^*, par exemple) car je doute que les mécanismes de verrous gèrent les modifs apportées en VBA.

^* Si un code vba est en train de modifier une ligne d'un tableau (par exemple en "forçant" un tri) alors que dans Teams on modifie la ligne. Suis pas certain que j'ai envie de devoir remettre le fichier en ordre par la suite

[joe.levrai]

Effectivement, on va avoir un conflit à l'enregistrement : on garde nos modifs ou les modifs déjà adressées au serveur par la modification dans Teams.

Mais cela est également déjà le cas avec Sharepoint, on modifie sur un Excel en lourd via VBA alors qu'un utilisateur a le documents ouvert en modification online.

Il n'y aura jamais de solution idéale, chacune aura ses inconvénients (désactiver le online par exemple)

Après, certains construisent des bazookas pour zieuter les utilisateurs online mais c'est uniquement sur les versions office 365 il me semble.

[Pierre Fauconnier]

C'est pour cela que je préconise que les fichiers Excel "online" ne soient que des conteneurs de données au travers de tableaux structurés, et que le traitement des données soit réalisé sur un fichier Excel qui récupère les données du fichier Online (par power query ou vba). C'est également le cas avec Power Apps.

J'ai développé quelques solutions Power Apps chez des clients, et l'application alimente simplement des tableaux structurés du fichier online. En Backend, je récupère les données du fichier dans un fichier d'analyse qui contient les TCD, le VBA, les formules, etc...