Ordner per VBA in SharePoint erstellen
Schritt-für-Schritt-Anleitung
Um einen Ordner in SharePoint mit VBA zu erstellen, kannst du folgende Schritte befolgen. Diese Anleitung ist für Excel-Nutzer gedacht, die Erfahrung mit VBA haben.
-
SharePoint-Pfad ermitteln: Stelle sicher, dass du den korrekten UNC-Pfad zu deinem SharePoint-Verzeichnis hast. Du kannst es so definieren:
Dim Pfad As String
Pfad = "\\herzogelmigerch.sharepoint.com\@SSL\DavWWWRoot\sites\Logistik\Freigegebene Dokumente\01_Test\Ordner_Anlegen"
-
VBA-Code schreiben: Verwende die folgende Struktur, um einen Ordner zu erstellen:
Dim objNetzwerk As Object
Dim sNeuerOrdner As String
Set objNetzwerk = CreateObject("WScript.Network")
sNeuerOrdner = "NeuerOrdnerName" ' Hier den gewünschten Ordnernamen anpassen
If Not CreateObject("Scripting.FileSystemObject").DriveExists("B") Then
objNetzwerk.MapNetworkDrive "B:", Pfad
End If
If Dir("B:\" & sNeuerOrdner, vbDirectory) = "" Then
MkDir "B:\" & sNeuerOrdner
End If
objNetzwerk.RemoveNetworkDrive "B:"
Set objNetzwerk = Nothing
-
Code ausführen: Starte das Makro in Excel, um den Ordner zu erstellen.
Häufige Fehler und Lösungen
-
Fehler: "Pfad nicht gefunden": Überprüfe, ob der Pfad korrekt ist und ob du die richtigen Berechtigungen hast. Achte darauf, dass Leerzeichen im Pfad korrekt behandelt werden (z.B. %20 für Leerzeichen).
-
Authentifizierungsfehler: Wenn du beim Verbinden als Laufwerk B eine Fehlermeldung bekommst, stelle sicher, dass du angemeldet bist und die richtigen Anmeldedaten verwendest.
-
MkDir funktioniert nicht: MkDir kann nicht direkt für SharePoint verwendet werden. Stelle sicher, dass der Pfad als Netzlaufwerk verbunden ist.
Alternative Methoden
Eine alternative Methode, um Ordner in SharePoint zu erstellen, ist die Verwendung von OneDrive:
- OneDrive mit SharePoint verbinden: Synchronisiere dein SharePoint-Verzeichnis mit OneDrive.
- Ordner erstellen: Verwende den Windows Explorer, um Ordner direkt im synchronisierten Verzeichnis zu erstellen.
Eine andere Option ist die Verwendung von REST-API-Methoden über VBA, um mit SharePoint zu interagieren.
Praktische Beispiele
Hier ist ein einfaches Beispiel für das Erstellen mehrerer Ordner aus einer Liste in Excel:
Sub OrdnerErstellen()
Dim sFolder As String, sNeu As String, rngC As Range
With Application.FileDialog(msoFileDialogFolderPicker)
If .Show = -1 Then
sFolder = .SelectedItems(1)
End If
End With
With Sheets(1) ' Hier das entsprechende Arbeitsblatt auswählen
For Each rngC In .Range(.Cells(1, 1), .Cells(Rows.Count, 1).End(xlUp))
If rngC.Value <> "" Then
sNeu = sFolder & "\" & rngC.Value
If Dir(sNeu, vbDirectory) = "" Then
MkDir sNeu
End If
End If
Next
End With
MsgBox "Ordner wurden erfolgreich erstellt."
End Sub
Tipps für Profis
-
Verwendung von "DriveExists": Überprüfe, ob das SharePoint-Verzeichnis als Netzlaufwerk verbunden ist, bevor du versuchst, Ordner zu erstellen. Dies verhindert Fehler und verbessert die Effizienz.
-
Fehlerbehandlung einbauen: Verwende On Error Resume Next, um dein Makro robuster zu machen und unerwartete Fehler zu vermeiden.
-
Dokumentation: Halte dich über die neuesten Änderungen in SharePoint und Excel VBA auf dem Laufenden, um immer die besten Praktiken zu kennen.
FAQ: Häufige Fragen
1. Kann ich Ordner in SharePoint ohne VBA erstellen?
Ja, du kannst Ordner direkt im SharePoint-Webinterface oder über OneDrive erstellen.
2. Warum funktioniert der UNC-Pfad nicht?
Stelle sicher, dass du den Pfad korrekt formatiert hast und dass du die notwendigen Berechtigungen besitzt, um auf den SharePoint-Ordner zuzugreifen.
3. Was ist die beste Methode, um mit SharePoint in Excel zu arbeiten?
Die Verwendung der SharePoint REST-API kann eine effiziente Methode sein, um Daten zu lesen und zu schreiben. VBA bietet jedoch eine einfache Möglichkeit, grundlegende Aufgaben wie das Erstellen von Ordnern zu automatisieren.