knuefi
Goto Top

Aus Excel Hyperlink eine Verknüpfung erstellen

Hallo zusammen,

ich benötige euren Fachmänischen Rat. Ich habe eine Excel Liste mit Namen mit einen Hyperlink bzw. Pfad und möchte davon mehre Verknüfungen erstellen. Da es jede Menge sind, würde ich es gern per Script machen oder gibt es eine andere Möglichkeit?
Prio 2:
Kann ich zudem hinter eine Verknüpfung mehre Pfade erzeugen?

Content-ID: 290907

Url: https://administrator.de/forum/aus-excel-hyperlink-eine-verknuepfung-erstellen-290907.html

Ausgedruckt am: 22.12.2024 um 15:12 Uhr

122990
Lösung 122990 18.12.2015 aktualisiert um 17:40:40 Uhr
Goto Top
Moin,
vielleicht wäre eine gründlichere Beschreibung hilfreicher, ich zumindest verstehe hier überhaupt nicht was gefordert sein soll.
Excel Liste mit Namen mit einen Hyperlink bzw. Pfad
Ja wat nun Namen oder Hyperlinks oder Pfade ?? Präzise Formulierungen helfen hier ungemein, da es hier ja anscheinend um Programmierung gehen soll.
Kann ich zudem hinter eine Verknüpfung mehre Pfade erzeugen?
hä ??

Gruß grexit
Knuefi
Knuefi 18.12.2015 um 17:50:27 Uhr
Goto Top
Hallo Grexit,

1.
ich habe eine Excel Liste mit mehren Pfade (c:\neu\beispiel\maxmustermann insgesamt 660 stück), nun benötige ich ein Script das aus dem Pfad eine Verknüpfung erzeugt.

2.
ist es möglich hinter eine Verknüpfung meher Ziel Pfad zu machen, Beispiel: Beim anklicken Verknüpfung Mitteilung komme ich an c:\neu\beispiel\maxmustermann und an c:\neu\beispiel\maikschmit und an c:\neu\beispiel\hansmueller u.s.w ?
122990
122990 18.12.2015 um 18:15:34 Uhr
Goto Top
Zu 1:
Hatten wir schon hier
Excelspalte mit 2.000 Webadressen zu Hyperlinks machen

Zu 2:
Versteh ich so leider immer noch nicht ...Schreib doch mal vernünftige Sätze!
Knuefi
Knuefi 18.12.2015 um 18:22:01 Uhr
Goto Top
ich benötige keinen Hyperlink, sonder eine Verknüpfung (ink) und das auserhalb der Excel Liste, die Quelle der Pfade sind in einer Excel Liste. Den Hyperlink kann ich doch einfach per Formel erstellen.
122990
122990 18.12.2015 aktualisiert um 18:56:43 Uhr
Goto Top
Dann schreib das doch gleich so ..
Findest du an jeder Ecke wie du mit VBA/VBS Verknüpfungen erstellst
Verknüpfung mit VBScript erstellen
Das einfach mit der Schleife aus obigem Link verknüpfen und schon hast du was du willst.
Knuefi
Knuefi 18.12.2015 um 19:06:15 Uhr
Goto Top
klappt leider nicht face-sad
122990
122990 18.12.2015, aktualisiert am 02.01.2016 um 14:30:56 Uhr
Goto Top
Zitat von @Knuefi:
klappt leider nicht face-sad
Was klappt nicht ????

Funktioniert nicht ist keine Fehlermeldung in einem Admin Forum!! face-sad

Und sicher geht das ....

Hier ein simples VBA Beispiel für die Verwendung in Excel VBA:
In Spalte A stehen alle Pfade als Plaintext in der Zelle und in Spalte B steht der dazugehörige Name welchen der Link erhalten soll.
Dann passt du noch den Pfad in Zeile 2 an wo die Verknüpfungen landen sollen, feddich.
Sub MakeLinks()
    Const PATH = "C:\Users\Knuefi\Desktop"  
    Set objShell = CreateObject("Wscript.Shell")  
    With Worksheets(1)
        For Each cell In .Range("A1", .Range("A1").End(xlDown))  
            Set objShortcut = objShell.CreateShortcut(PATH & "\" & cell.Offset(0,1).Value & ".lnk")  
            objShortcut.TargetPath = cell.Value
            objShortcut.Save
        Next
    End With
End Sub
Knuefi
Knuefi 18.12.2015 um 19:39:48 Uhr
Goto Top
Hier die Fehlermeldung
Fehlermeldung
122990
122990 18.12.2015 aktualisiert um 19:55:46 Uhr
Goto Top
Och da fehlt doch nur ein Punkt ...siehe oben. Hätte man eigentlich auch selber sehen können ...
Knuefi
Knuefi 18.12.2015 um 20:06:13 Uhr
Goto Top
Perfekt!!!!, jetzt klappt es.
VIELEN DANK für deine Fachmänische Hilfe und sehr schnellen Antworten. Ein Top Forum, zum wiederholten male wurde mir hier geholfen. Ein Forum ist nur so gut wie seine Mitglieder.
122990
122990 18.12.2015 um 20:10:34 Uhr
Goto Top
Na dann kann das Fest ja kommen.

Schönes letztes Adventswochenende face-smile
grexit
Knuefi
Knuefi 23.12.2015 um 00:03:35 Uhr
Goto Top
Hallo grexit,
ich benötige noch mal deine Hilfe. Die erstellten Verknüpfungen gehen leider doch nicht, im Pfad wird immer am Anfang und am Ende des Pfad " gesetzt. Hier ein Beispiel Pfad : "\\www.beispiel.com\maxmuxtermann\mitteilung". Die "" lassen sich auch nicht Entfernen.
Hast du eine Idee?
122990
122990 23.12.2015 aktualisiert um 00:09:49 Uhr
Goto Top
Dann schreib Zeile 7 so
objShortcut.TargetPath = cell.Value
Die Anführungszeichen waren da ja meine ich auch gar nicht nötig.
Knuefi
Knuefi 02.01.2016 um 14:25:01 Uhr
Goto Top
Danke , jetzt läuft es