Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1884to1888
1884to1888
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Pfad von Sharepoint Folder

Forumthread: Pfad von Sharepoint Folder

Pfad von Sharepoint Folder
18.05.2022 10:12:14
Sharepoint
Hallo zusammen
Ich würde gerne den Pfad der geöffneten Datei auf Sharepoint als Speicherort für die Erstellung von pdfs verwenden.
Den Befehl für die pdf-erstellung habe ich, nur der Speicherort weiss ich nicht, wie ich den definiere.
Filname=activeworkbook.path\"(etc.)" funktioniert hier leider nicht. (CurDir auch nicht)
Wie kann ich das in Sharepoint lösen?
Gruss André



mypath = curdir
Sheets("Beleg XY").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
mypath & Range("H2") & "\Belege\Beleg XY" & Range("H2") & ".pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pfad von Sharepoint Folder
18.05.2022 10:21:41
Sharepoint
Hallo
hilft dir das?

Sub OneDriveName()
Dim FullN As String, Datei As String, Pfad As String
With CreateObject("Scripting.FileSystemObject")
FullN = .GetAbsolutePathName(ThisWorkbook.Name)
Datei = ThisWorkbook.Name
Pfad = Replace(FullN, Datei, "")
End With
End Sub
LG UweD
Anzeige
AW: Pfad von Sharepoint Folder
18.05.2022 12:16:08
Sharepoint
Nach dem öffnen vom Excel-File, welches auf dem Sharepoint liegt, wird es im Folder System32 temporär gespeichert.
So nimmt vba also diese lokale Adresse (C:\Windows\system32\...) und nicht die von Sharepoint...
Ich kann auch nicht im Browser arbeiten, da die Webversion von Excel VBA nicht unterstützt.
Anzeige
AW: Pfad von Sharepoint Folder
18.05.2022 12:53:39
Sharepoint
Hallo also ich speichere z.B in One Drive mit diesem Code. Du müsstest nur das Verzeichniss anpassen! hoffe es hilft Dir etwas weiter
'Speichern in OneDrive

Private Sub CommandButton1_Click()
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="C:\Users\Dein Name\OneDrive\Beispiel.xlsm"
Application.DisplayAlerts = True
End Sub
Gruß
Oraculix
Anzeige
AW: Pfad von Sharepoint Folder
18.05.2022 13:26:28
Sharepoint
Hallo
ich habe ein ähnliches Problem gehabt und es (etwas umständlich) so gelöst.
Du kennst den sharepoint -Pfad und den Pfad der lokale Syncronisation
Im hinteren Teil sollten die Verzeichnisse identisch sein.
bei mir ist das z.B. so...
Für den http Link trenne ich dort und nehme nur den Rest

    'Der Benutzerabhängige Sync-Pfad
AufrufPfad = Environ("Userprofile") & "\Firma\Standort - Documents\Abteilung\&quot
&nbsp&nbsp&nbspTrenn1 = &quothttps:\"
Trenn2 = "\Abteilung\"
Set FSO = CreateObject("Scripting.FileSystemObject")
'Gesamtpfad sharepoint
Pfad = FSO.GetAbsolutePathName(ThisWorkbook.Path)
'für späteren Link
httpPfad = Trenn1 & "\" & Split(Pfad, Trenn1)(1)

Beispiel:

AufrufPfad = C:\Users\NameMein\Firma\Standort - Documents\Abteilung\
Pfad=C:\Users\NameMein\Firma\Standort - Documents\Abteilung\99 Temp\Name\https:\Firma.sharepoint.com\sites\Standort\Shared Documents\Abteilung\99 Temp\Name
http s:\\Firma.sharepoint.com\sites\Standort\Shared Documents\Abteilung\99 Temp\Name
LG UweD
Anzeige
AW: Pfad von Sharepoint Folder
20.05.2022 09:17:15
Sharepoint
Der Ansatz von Uwe ist richtig. Leider funktioniert es bei mir nicht.
Auf C: ist die Adresse nur bis zum Ordner System32 vorhanden. und beim Sharepoint scheint sich alle Paar Tage irgendwie die Adresse zu ändern. die scheint irgendwie dynamisch zu sein. Ich denke, auf Sharepoint über vba direkt zu speichern ist eher unerwünscht von Microsoft...Muss das ablegen auf Sharepoint wohl manuell machen.
Danke aber euch für die Hilfe und die Ideen.
Gruss André
Anzeige
;

Forumthreads zu verwandten Themen

VBA Datei speichern gleich wieder öffnen
Timonski

Servus
ich habe eine Exceldatei mit viel VBA und bei einem Tabellenblatt wird die Datei sehr langsam,
dann speicher ich und lad sie gleich wieder...
und diesen Befehl würde ich gern als Icon in der Symbolleiste hinterlegen...
hätte mir da einer einen Vorschlag?
vielen Dank
21.10.2009 09:36:11
Thread-ID: 1110986
4 Beiträge
Mit VBA Datei auf Server öffnen
egon.kernien@online.de

Hallo Experten!
Ich lasse mit diesem Code eine Exceldatei pda.xls die auf einem Server liegt so öffnen, Daten aus einer Tabelle lesen-kopieren, schliessen.:
ChDir Pfad
strFile = Application.GetOpenFilename
If strFile = "Falsch" Then Exit Sub
Set wbSource = Workbooks.Open(Fi...
03.12.2009 11:32:17
Thread-ID: 1121538
3 Beiträge
Anzeige
vba Datei öffnen, Erweiterung unbekannt
Daniel

Hallo VBA - Experten,
Wie öffne ich in vba eine Exceldatei, ohne dass ich die Dateierweiterung kenne? Mein Problem: ich habe ein Makro erhalten, welches Dateien im Excel 2003 - Format öffnet. Das Öffnen sollte auch funktionieren, wenn die Dateien in einem neueren Format mit anderer Erweiter...
09.04.2011 16:16:22
Thread-ID: 1209733
4 Beiträge
Öffnen einer Datei per VBA
Christian

Hallo Forum,
ich möchte per VBA eine Datei öffnem, deren Pfad und Namen als Text in einer Zelle steht.
in A1 steht "D:\test.xls"
dann will ich im Macro den Befehl:
Datei$ = Cells(1, 1).Select
verwenden, um den Namen in der Variablen Datei$ zu speichern.
Das geht nicht....
18.08.2011 12:48:10
Thread-ID: 1226611
4 Beiträge
xldialogprintersetup beim öffnen der Datei per vba
Marcel

Hallo zusammen,
Ich habe folgendes Problem:
Beim öffnen meiner Exceldatei öffnet sich das Dialogfenster "Printersetup".
Ich möchte das dieser Vorgang per VBA-Code abgebrochen wird.
Könnt Ihr mir helfen?
Gruß Marcel
09.01.2013 07:21:01
Thread-ID: 1293347
4 Beiträge
Anzeige
Öffnen von Excel-Dateien mittels VBA
Excel-Dateien

Folgendes Problem:
Ich habe die Möglichkeit geschaffen über einen Button verschiedene Anwendungen zu starten (unter anderem auch einfache Excel-Dateien), die Datumsangaben, Wochentage etc. enthalten. Wird nur eine Datei geöffnet, funktioniert alles normal; nur in manchen Fällen erscheint da...
13.05.2013 13:25:48
Thread-ID: 1312694
7 Beiträge
VBA Datei öffnen und darin 1. leere Zelle finden
Steve

Hello ihr Profis,
ich stehe irgendwie auf dem Schlauch und hoffe ihr könnt helfen. Es soll einfach nur geprüft werden of eine Datei vorhanden ist. Wenn diese NICHT vorhanden ist, soll eine bestimmte Excel Tabelle geöffnet und in dieser nach der ersten freien Zelle gesucht werden. Ich dachte...
07.02.2014 12:46:16
Thread-ID: 1348494
9 Beiträge
Anzeige
VBA Dateien öffnen, editieren, speichern
Tim

Hallo zusammen,
ich hoffe ihr könnt mir weiterhelfen.
Ich habe folgende Aufgabe:
- Ordner mit monatlich wechselnder Anzahl von CSVs
- Diese müssen geöffnet, formatiert u. als xls mit dem Namen aus Zelle "B5" abgespeichert werden
Mein Ziel ist es diesen Prozess zu automatisie...
25.08.2014 18:10:20
Thread-ID: 1378118
9 Beiträge
VBA Datei öffnen in zweiter Instanz
Matthias

Hallo zusammen
Ich habe ein Script gefunden, das es verbietet, in einer bestehenden Excel-Instanz, eine Datei zu öffnen. Sie öffnet sich in einer zweiten Instanz.
Könnte man dieses Script womöglich vereinfachen?
Dieser "Schreibschutz" verwirrt mich etwas, die Datei wird nämlich zuer...
03.10.2014 21:36:42
Thread-ID: 1384734
7 Beiträge
VBA Exceldatei öffnen und bearbeiten
Nico

Hey ho :)
ich hoffe Ihr könnt mir helfen.
Erstmal was vorhanden ist:
Ich habe eine Datei dort habe ich die Tabellenblätter Rechnungen und Kalender, diese Datei soll sozusagen als Hauptdatei fungieren.
Nun habe ich Ordner die nach Jahren gegliedert sind 2013,2014 etc. in diesen O...
28.01.2015 20:59:14
Thread-ID: 1405876
2 Beiträge
VBA-Abfrage bei Datei-öffnen?
Stephan

Hallo an alle VBA-Profis,
kurz zu meiner Person:
Ich bin Stephan, neu hier und habe nur durch den Macrorecorder und durch gewisse Stöbereien auf Onkel-Google etwas Kenntnis vom VBA-Programmieren.
Getreu dem Motto "Learning by doing" krieche ich durch die Foren, versuche Codes zu ver...
09.10.2015 09:10:38
Thread-ID: 1451506
6 Beiträge
Mit VBA eine externe Datei öffnen
FrodoBodo

Hallo zusammen,
ich habe eine Datei mit zwei Blättern(Reitern).
Blatt 1 enthält chaotisch erfasst (Zeile für Zeile) Daten und Mengenangaben.
Blatt 2 enthält die Grunddaten (Basisdaten).
Wenn ich nun den Gesamtbestand meiner Sammlung wissen möchte, starte ich ein Makro das fol...
22.10.2015 17:46:36
Thread-ID: 1453843
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Pfad von SharePoint-Ordner in Excel VBA abfragen und nutzen

Schritt-für-Schritt-Anleitung

  1. Ermitteln des Pfades: Um den Pfad einer geöffneten Datei in SharePoint zu ermitteln, kannst du die FileSystemObject verwenden. So gehst du vor:

    Sub GetSharePointPath()
   Dim FullN As String, Datei As String, Pfad As String
   With CreateObject("Scripting.FileSystemObject")
       FullN = .GetAbsolutePathName(ThisWorkbook.Name)
       Datei = ThisWorkbook.Name
       Pfad = Replace(FullN, Datei, "")
   End With
   MsgBox "Der SharePoint-Pfad ist: " & Pfad
End Sub

  2. Speicherung von PDFs: Um PDFs im SharePoint-Ordner zu speichern, kannst du den ermittelten Pfad verwenden. Beispiel:

    Sub ExportPDF()
   Dim mypath As String
   mypath = GetSharePointPath() 'Rufe die Funktion auf, um den Pfad zu bekommen
   Sheets("Beleg XY").Select
   ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
   mypath & "Belege\Beleg XY.pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub

Häufige Fehler und Lösungen

  • Problem: ActiveWorkbook.Path gibt einen falschen Pfad zurück.
    Lösung: Verwende ThisWorkbook.Path anstelle von ActiveWorkbook.Path, um den tatsächlichen Speicherort der Datei zu erhalten, da ActiveWorkbook möglicherweise auf eine temporäre Datei verweist.

  • Problem: PDF wird nicht im richtigen Ordner gespeichert.
    Lösung: Stelle sicher, dass der Pfad korrekt zusammengesetzt ist. Überprüfe die Struktur des SharePoint-Ordners und passe den Dateinamen entsprechend an.

Alternative Methoden

  1. Verwendung von Application.ActiveWorkbook.SaveAs: Um eine Datei direkt in OneDrive oder SharePoint zu speichern, kannst du diesen Befehl verwenden:

    Private Sub CommandButton1_Click()
   Application.DisplayAlerts = False
   ActiveWorkbook.SaveAs Filename:="C:\Users\Dein Name\OneDrive\Beispiel.xlsm"
   Application.DisplayAlerts = True
End Sub

  2. Pfad manuell anpassen: Wenn der dynamische Pfad von SharePoint Probleme bereitet, kannst du den Pfad manuell in deinem VBA-Code festlegen.

Praktische Beispiele

  • Beispiel 1: Exportiere eine Excel-Tabelle als PDF in einen bestimmten SharePoint-Ordner.

    Sub ExportToSharePoint()
   Dim Pfad As String
   Pfad = "https://deinunternehmen.sharepoint.com/sites/deinordner/"
   ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Pfad & "ExportierteTabelle.pdf"
End Sub

  • Beispiel 2: Auslesen eines SharePoint-Pfades:

    Sub ReadSharePointPath()
   Dim myPath As String
   myPath = ThisWorkbook.Path ' Nutze thisworkbook.path sharepoint
   MsgBox "Der aktuelle Pfad ist: " & myPath
End Sub

Tipps für Profis

  • Nutze die Environ-Funktion, um den Benutzerpfad dynamisch zu erfassen, besonders wenn du in einer Unternehmensumgebung arbeitest.

    Dim SyncPath As String
SyncPath = Environ("USERPROFILE") & "\OneDrive\"

  • Teste deinen Code immer in einer sicheren Umgebung, um sicherzustellen, dass keine Daten verloren gehen.

FAQ: Häufige Fragen

1. Wie kann ich den SharePoint-Pfad programmgesteuert ermitteln?
Du kannst die FileSystemObject-Bibliothek verwenden, um den absoluten Pfad der Datei zu erhalten.

2. Funktioniert dieser Code auch in der Webversion von Excel?
Nein, VBA wird nicht von der Webversion von Excel unterstützt. Du musst die Desktop-Version verwenden.

3. Wie gehe ich mit dynamischen SharePoint-Pfaden um?
Es kann hilfreich sein, den Pfad manuell zu speichern oder regelmäßig zu überprüfen, ob sich der Pfad geändert hat.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige