Power Query, prüfen ob Excel Datei vorhanden ist, andernfalls Fehlermeldung ausgeben anstatt Daten
Parameter
Dateipfad zB D:\Projekte\Microsoft_Power_BI\Test\2021_01.xlsx
InputSheet, zB Tabelle1 oder Sheet1
InputKind = zB Sheet
fxDateiVorhanden
---- SCHNIPP ---
let
Quelle = (InputDateiPfad as text, InputSheet as text, InputKind as text) =>
let
// Pfad zur Datei definieren
DateiPfad = InputDateiPfad,
// Versuche, die Datei zu laden
DateiVersuch = try Excel.Workbook(File.Contents(DateiPfad), null, true),
// Bedingte Logik basierend auf dem Ergebnis des Versuchs
Ergebnis = if DateiVersuch[HasError] then
Table.FromRecords({[Nachricht = "Datei konnte nicht geladen werden. Bitte überprüfen Sie den Speicherort: " & DateiPfad]})
else
let
SheetData = try DateiVersuch[Value]{[Item=InputSheet, Kind=InputKind]}[Data]
in
if SheetData[HasError] then
Table.FromRecords({[Nachricht = "Sheet konnte nicht geladen werden. Bitte überprüfen Sie den Sheetnamen und den Typ: " & InputSheet & ", " & InputKind]})
else
SheetData[Value]
in
Ergebnis
in
Quelle
--- SCHNAPP ---
Kommentare
Kommentar veröffentlichen