Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Bei Hyperlink-Klick Mitnahme des Zellwertes

Gruppe

Hyperlink

Problem

Bei Anklicken eines Hyperlinks soll der Cursor unter Mitnahme des angeklickten Wertes in die Zelle Ziel in Tabelle 2 springen. Die Zelle Ziel soll vor sonstigen Eingaben geschützt werden.

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

ClassModule: Tabelle1

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
   With Worksheets("Tabelle2")
      .Unprotect
      .Range("Ziel").Value = Target.Range.Value
      .Protect
   End With
End Sub