Thema Datum  Von Nutzer Rating
Antwort
Rot Datei als Admin öffnen
 05.06.2018 13:10:38 Selina
NotSolved

Ansicht des Beitrags:
Von:
Selina		 Datum:
05.06.2018 13:10:38		 Views:
995		 Rating:
     
Antwort:
  Ja
Thema:
Datei als Admin öffnen
Hey Leute, 
habe ein wahrscheinliches ziemlich einfaches Problem, finde aber keine passenden Lösungen im Netz.
Der Code funktioniert einwandfrei, ich würde nur gerne die Datei, die geöffnet werde soll mit Administratorrechten öffnen lassen, da diese im späteren Verlauf bearbeitet wird, und das ohne die passenden Berechtigungen nicht geht...
 
Public Sub openWB()
    Dim sOpenFileName
    
    'Pfad definieren, welcher geöffnet werden soll
    sWbQuellePfad = ThisWorkbook.Path
    ChDir (sWbQuellePfad)
    
    'Den im Dialogfeld ausgewählten Namen auslesen, Filter definieren
    sOpenFileName = Application.GetOpenFilename(FileFilter:="CSV-Dateien (*.csv), *.csv")
    
    'Prüfen ob eine gültige Datei ausgewählt wurde
    If sOpenFileName = False Then
       Log "Datei konnte nicht geöffnet werden. Bitte öffnen Sie die Datei als Administrator."
       Exit Sub
    End If
    
    'Gewählte Datei öffnen
    Set wbQuelle = Workbooks.Open(sOpenFileName, Local:=True)
    wbQuelle.Activate
End Sub
 
Danke und Grüße
Selina
 

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 Datei als Admin öffnen
 05.06.2018 13:10:38 Selina
NotSolved