Thema Datum  Von Nutzer Rating
Antwort
04.07.2017 14:56:15 Oliver
*****
NotSolved
Blau Macro welches aus einer Excelzelle (Excelzeile) Links in einen Ornder erstellt
 05.07.2017 11:05:56 Gast3521
NotSolved

Ansicht des Beitrags:
Von:
Gast3521		 Datum:
05.07.2017 11:05:56		 Views:
469		 Rating:
     
Antwort:
  Ja
Thema:
Macro welches aus einer Excelzelle (Excelzeile) Links in einen Ornder erstellt

Hallo! Hier mal ein Codebeispiel. Dabei wird im aktuellen Tabellenblatt die Zeile 1 durchgegangen. Zu jeder Zelle mit einem Inhalt wird in der Zelle darunter der Link erstellt. Pfad und Anhang sind wie in deinem Beispiel könnten aber auch noch angepasst werden. VG

 

Sub hyperlinks()
Dim ende As Long
Dim spalte As Long
Dim pfad As String
Dim anhang As String

ende = ActiveSheet.Cells(1, Columns.Count).End(xlToLeft).Column
pfad = "C:\Users\oliver.boeckle\Desktop\Zeichnungen\Test"
anhang = "_01DE.pdf"

For spalte = 1 To ende
    If ActiveSheet.Cells(1, spalte) <> "" Then
        ActiveSheet.Cells(2, spalte).hyperlinks.Add Anchor:=ActiveSheet.Cells(2, spalte), Address:=pfad & "\" & ActiveSheet.Cells(1, spalte) & anhang, TextToDisplay:=ActiveSheet.Cells(1, spalte) & anhang
    End If
Next spalte
    
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
04.07.2017 14:56:15 Oliver
*****
NotSolved
Blau Macro welches aus einer Excelzelle (Excelzeile) Links in einen Ornder erstellt
 05.07.2017 11:05:56 Gast3521
NotSolved