Netzwerkpfad auslesen in Excel
Schritt-für-Schritt-Anleitung
Um den Netzwerkpfad eines Verzeichnisses in Excel auszulesen, kannst Du ein VBA-Makro verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:
- Öffne Excel und gehe zu
Entwicklertools > Visual Basic (oder drücke ALT + F11).
- Klicke auf
Einfügen > Modul, um ein neues Modul zu erstellen.
- Kopiere den folgenden Code in das Modul:
Option Explicit
Declare Function WNetGetConnection Lib "mpr.dll" _
Alias "WNetGetConnectionA" ( _
ByVal lpszLocalName As String, _
ByVal lpszRemoteName As String, _
cbRemoteName As Long) As Long
Function GetUNCPath(ByVal sLocalPath As String) As String
Const NO_ERROR As Long = 0
Dim sUNCPath As String
Dim sResult As String
Dim sDrive As String
GetUNCPath = sLocalPath
If Mid(sLocalPath, 2, 1) <> ":" Then Exit Function
sDrive = Left(sLocalPath, 2)
sUNCPath = String(260, 0)
If WNetGetConnection(sDrive, sUNCPath, Len(sUNCPath)) = NO_ERROR Then
sResult = Left(sUNCPath, InStr(sUNCPath, vbNullChar) - 1)
If Len(sResult) > 0 Then
GetUNCPath = sResult & Mid(sLocalPath, 3)
End If
End If
End Function
- Schließe den VBA-Editor und kehre zu Excel zurück.
- Du kannst jetzt die Funktion
GetUNCPath in einer Zelle verwenden, um den UNC-Pfad eines Netzlaufwerks herauszufinden. Zum Beispiel:
=GetUNCPath("K:\Verz1\Verz2")
Häufige Fehler und Lösungen
Alternative Methoden
-
Verwendung von Excel-Funktionen:
Wenn Du nicht mit VBA arbeiten möchtest, kannst Du auch auf externe Tools zurückgreifen, um den Netzwerkpfad anzuzeigen. Es gibt Programme, die die Netzwerkstruktur auslesen können.
-
Power Query:
In Excel 2016 und später kannst Du Power Query verwenden, um Daten aus einem Netzwerkstandort zu importieren, wobei der UNC-Pfad direkt angezeigt wird.
Praktische Beispiele
-
Beispiel: Um den UNC-Pfad für ein Netzlaufwerk zu ermitteln, das als L: gemappt ist, benutze die Funktion:
=GetUNCPath("L:\Daten\Projekte")
-
Um mehrere Netzwerkpfade zu überprüfen, erstelle eine Liste in Excel und wende die Funktion auf die gesamte Liste an.
Tipps für Profis
-
Debugging: Wenn Du mit VBA arbeitest, nutze die Debug.Print-Anweisung in Deinem Code, um Werte in der unmittelbaren Fensteransicht anzuzeigen. So kannst Du Fehler schneller identifizieren.
-
Funktion erweitern: Du kannst die Funktion GetUNCPath erweitern, um auch Informationen über die Netzwerkverbindung zurückzugeben, z.B. ob das Laufwerk verbunden ist oder nicht.
FAQ: Häufige Fragen
1. Was ist ein UNC-Pfad?
Ein UNC-Pfad ist ein einheitlicher Netzwerkpfad, der es ermöglicht, auf Dateien und Verzeichnisse auf einem Server über das Netzwerk zuzugreifen, unabhängig von den Laufwerksbuchstaben, die auf lokalen Rechnern verwendet werden.
2. Kann ich den Netzwerkpfad auch ohne VBA ermitteln?
Ja, Du kannst Tools von Drittanbietern oder Power Query verwenden, um Netzwerkpfade auszulesen und anzuzeigen.
3. Wie gebe ich den Netzwerkpfad richtig ein?
Stelle sicher, dass Du den Pfad im Format \\Server\Freigabe\Verzeichnis eingibst, um sicherzustellen, dass Excel die Adresse korrekt interpretiert.