Thema Datum  Von Nutzer Rating
Antwort
Rot Powerquery Modell mit VBA entfernen
06.06.2023 11:26:51 Kai
NotSolved
07.06.2023 14:00:28 Gast17737
Solved

Ansicht des Beitrags:
Von:
Kai
Datum:
06.06.2023 11:26:51
Views:
297
Rating: Antwort:
  Ja
Thema:
Powerquery Modell mit VBA entfernen

Hallo,

ich bin auf der Suche nach einem VBA Code, welches alle Powerquery-Abfragen und Verbindungen sowie vorhandene Powerquery-Modelle einer Arbeitsmappe löscht oder alternativ  alle Daten aus dem Powerquery-Modell entfernt.

Hintergrund ist, dass die Empfänger der Arbeitsmappe keinen Zugriff auf die im PowerQuery enthaltenen Informationen, erhalten dürfen.

Über Chat GPT bin ich auf folgenden Code gestoßen:

_

Sub DeletePowerQueryDataModel()
    Dim wb As Workbook
    Dim mdl As Model
    
    Set wb = ThisWorkbook
    Set mdl = wb.Model
    
    If Not mdl Is Nothing Then
        mdl.DataModelConnection.Delete
    End If
    
End Sub

_

Leider führt der Code zu folgenden Fehler: "Laufzeitfehler '5': Ungültiger Prozeduraufruf oder ungültiges Argument

Da ich nur rudimentäre VBA-Kenntnisse habe und bei der Suche im Internet nichts Hilfreiches finden konnte, hoffe ich auf eure Unterstützung.

Auch zu Hinweise über ähnliche Beiträgen wäre ich sehr dankbar.

Ich verwende Office 365 auf einem Windows 64bit System.

 

Viele Grüße,
Kai

 


 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Powerquery Modell mit VBA entfernen
06.06.2023 11:26:51 Kai
NotSolved
07.06.2023 14:00:28 Gast17737
Solved