Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 14:52:26

RoWo

Hallo Herbers Community,

ich habe eine große Tabelle mit hunderten Projekten welche der Benutzer nach entsprechenden Kriterien filtern kann.

In der Spalte B steht hierbei immer die Projektnummer. Mit einem Hyperlink öffnet sich der Netzwerkpfad mit hunderten Unterordnern welche IMMER mit der Projektnummer beginnen und anschließend mit einem unbekannten Text fortgeführt werden. Gibt es eine Möglichkeit den Hyperlink so einzuarbeiten, dass er nicht nur den richtigen Ordner wählt, sondern dass der Windows-Explorer über die bekannte "Projektnummer" in Spalte B zur richtigen Stelle springt?

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 15:01:34

{Boris}

Hi,

Platzhalter / Joker für den "anschließend unbekannten Text" sind imho bei einem Link nicht möglich.
Ohne diesen unbekannten Text wäre es einfach.

VG, Boris

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 15:04:27

Yal

Hallo Rowo,

rechtsklick auf dem Register vom Blatt, "Code anzeigen" wählen,
Du bist im VBA-Editor,
in der gerade geöffnete Codepane, folgende Code copy-pasten:



Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

    Shell "Explorer.exe " & Target.Address, vbMaximizedFocus

End Sub

dann auf dem Link klicken.
Exceldatei anschliessend als ".xlsm" speichern.

VG
Yal

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 17:34:20

Klexy

Wenn alle Unterordner unterhalb des Hauptordners sind und die Nummern absolut eindeutig, dann kannst du eine VBA-Schleife laufen lassen, die den richtigen Ordner findet und seinen tatsächlichen Namen in den Hyperlink der Zelle schreibt.
Wenn die Nummer 243112 ist, darf es aber keine Nummer 2431121 geben. Die Schleife sucht nämlich bis die ersten 6 Zeichen übereinstimmen.
Ist es das, was du brauchst?

Und besser wäre es, wenn du eine Beispieldatei hochlädtst.

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 17:51:03

RoWo

Hallo Klexy,

die ersten 6 Ziffern geben immer die Projektnummer wieder, welche eindeutig ist. Jedoch haben die Projekte mehrere Unterordner.
Also im Beispiel mit der Projektnummer 243112 kann es z.B. folgende Ordner geben:

"243112 - XXXXXXXX"
"243112.010 - YYYYYYYYY"
"243112.020 - ZZZZZZZZ"

Da ein Hyperlink ja nur an einen bestimmten Pfad verweisen kann, wäre das also hier nicht möglich. Ich möchte aber auch nur, dass der Link den Hauptordner öffnet aber im Windows Explorer zum entsprechenden Projektordner springt ohne ihn zu öffnen.

Anbei ein Ausschnitt aus einem der Hauptordner für 2023:

Userbild

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 18:19:01

Klexy

Ist die Ordnerstruktur also so?
C:/Bla/Blub/Hauptordner/2024/123456 bla
C:/Bla/Blub/Hauptordner/2024/123456.010 ding
C:/Bla/Blub/Hauptordner/2024/123456.020 dong
C:/Bla/Blub/Hauptordner/2024/123456.030 tralala
C:/Bla/Blub/Hauptordner/2024/123457 hallo
C:/Bla/Blub/Hauptordner/2024/123457.010 honky
C:/Bla/Blub/Hauptordner/2024/123456.020 tonky

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

26.03.2025 09:38:47

RoWo

Hi Klexy,

ja genau so, siehe auch mein Screenshot vom letzten Beitrag.

mfg

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

26.03.2025 10:38:38

Klexy

Dein Screenshot ist was völlig Anderes als mein Beispiel. Und als deine andere Beschreibung. Sonst hätte ich ja nicht fragen müssen.
1. Was bezeichnest du (in meinem Beispiel) als "Hauptordner"?
2. Was steht (für mein Beispiel) in deiner Referenzzelle in Excel?
3. Welchen Ordner willst du (in meinem Beispiel) als Ergebnis haben?

Bitte verwechsle in deiner Antwort nicht Pfad und Ordner.

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 16:19:38

RoWo

Hallo Yal,

habe ich gemacht. Ändert leider nichts beim Ergebnis bei mir. Die Hyperlinks (Spalte T) werden übrigens so erstellt:

=HYPERLINK(WERTZUTEXT(VERKETTEN("Hauptordnerpfad";VERKETTEN("20";LINKS(B;2))));"Folder")

Wenn also die Projektnummer z.B. 243112 lautet springt der Link zu "Hauptordnerpfad\2024\"
In diesem Ordner soll er dann zum Unterordner "243112 - xxxxxxxxxxxxxx" springen.

AW: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

24.03.2025 17:23:16

Yal

Hallo Rowo,

und wie kommt "das Ding, dass etwas tolles tut" auf dem Projektnummer? Durch Gedankenübertragung?

'Unter Anbindung der Library: Menü "Extras", "Verweise...", library anhaken:

' Microsoft Scripting Runtime

Dim FSO As New FileSystemObject



Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

Dim Projektnummer As String

Dim SF As Folder



    Projektnummer = Target.Range.EntireRow.Cells(3) ' gibt nur eine ganze Zeile zurück. Cells(n) ist dementsprechend Spalte n in dieser Zeile

    Set SF = SubFolder_finden(FSO.GetFolder(Target.Address), Projektnummer & "*")

    If Not SF Is Nothing Then Shell "Explorer.exe " & SF.Path, vbMaximizedFocus

End Sub



Private Function SubFolder_finden(HauptVerz As Folder, Namensteil As String) As Folder

Dim SF As Folder

    For Each SF In HauptVerz.Folders

        If SF.Name Like Namensteil Then

            Set SubFolder_finden = SF

            Exit Function

        End If

    Next

End Function

VG
Yal

Hyperlink zu bestimmten Ordner mit "Sprungmarke"

Forumthread: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Hyperlink zu bestimmten Ordner mit "Sprungmarke"

Forumthread: Hyperlink zu bestimmten Ordner mit "Sprungmarke"

9 Beiträge zum Forumthread Beiträge zu diesem Forumthread

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread