VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Hyperlink aufteilen

Gruppe

Link

Bereich

Hyperlink

Thema

Hyperlink aufteilen

Problem

Wie kann ich die Informationen einer Zelle mit einem Hyperlink so aufteilen, daß in einer Zelle der Text und in einer anderen die Adresse der Hyperlinkzelle stehen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




ClassModule: Tabelle3

Private Sub CommandButton1_Click()
    Call LinkAufteilen
End Sub

StandardModule: basMain

Sub LinkAufteilen()
   With Range("A1")
      .Offset(0, 1) = .Value
      .Offset(0, 2) = .Hyperlinks(1).Address
   End With
   Columns("A:C").AutoFit
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Link und Hyperlink