Discussion :

[Gilles777]

Bonjour à tous

je souhaite fournir à mes utilisateur un fichier Excel qui importe des fichiers externes xls, mais en masquant cette complexité

Ce qui est fait et qui fonctionne bien:
dans un onglet 'setup' l'utilisateur remplit une liste Table/répertoire/NomFichier chaque cellule étant une cellule nommée et clique sur 'Actualiser tout'
En arrière plan PowerQuery
- récupère le nom des cellules (Source = Excel.CurrentWorkbook(){[Name="RépertoireFichier"]}[Content],), en fait des fonctions
- lance chaque import (Excel.Workbook(File.Contents(GetRépertoire() & "\" & GetNomFichier()), null, true) vers la table cible (chaque import est préalablement défini dans Power Query)

Question:
si le nom ou le répertoire d'un fichier est erroné ou manquant, l'import plante, c'est normal
comment éviter que toute l'actualisation ne se bloque?, comment mettre un message d'erreur?, voire un message de retour sur le nombre de lignes importées, par exemple comme ça

[Raccourcix]

Bonjour

Dans Power Query, ce genre de situation peut être gérée avec try ... otherwise ...

Code :

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

try Excel.Workbook(File.Contents([Répertoire] & "\" & [Nom Fichier]), null, true) otherwise "fichier inexistant"

Sinon, pourquoi GetRépertoire() et non [Répertoire] et GetNomFichier() et non [Nom Fichier] ?

Stéphane

[Promethee25]

Bonjour,

Pour réellement interrompre la requête en renvoyant un message d'erreur à l'utilisateur, il faut modifier le "otherwise" qui en l'état sortira un texte alors que le "try" sort une table (ce qui est compliqué à gérer derrière):

Code :

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

try Excel.Workbook(File.Contents([Répertoire] & "\" & [Nom Fichier]), null, true) otherwise error Error.Record("Fichier inexistant", "Veuillez corriger le chemin dans la case ....")

PS: Je pense que les "Get...()" sont une astuce pour le parefeu.