Ausführen einer VBA-Funktion durch Klicken auf eine Excel-Zelle

Question

Wenn auf eine bestimmte Zelle geklickt wird, muss ich eine Funktion ausführen. Die Funktion ist:

HighlightOnWebsite(url As String, phrase As String) 

Grundsätzlich ist diese Funktion lädt einen Web-Browser-Kontrolle, bringt die aufgerufene Seite und zeigt die erforderlichen Sätze. Die Funktion funktioniert mehr oder weniger gut.

Was ich nicht herausfinden kann ist, wie bestimmte Zellen diese Funktion aufrufen können.

kann sagen, jede Zeile hat drei Zellen, die folgenden Informationen enthalten:

url of some document | some important phrase | will contain call to function 

Nun, ich brauche die Tabelle und in der dritten Spalte jeder Zeile zu scannen, eine anklickbare Zelle machen, die eine Funktion aufruft, wie HighlightOnWebsite (A1, A2).

Wäre so etwas möglich?

Answer 1

Sie müssen das Arbeitsblatt nicht scannen.

Erstellen Sie in jeder Zelle der dritten Spalte einen statischen Hyperlink, der mit derselben Zelle verknüpft ist.
Dann haben Sie einen Handler im Arbeitsblatt:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 
    If Target.Range.Column = 3 Then 
    HighlightOnWebsite Target.Range.Offset(0, -2).Value, Target.Range.Offset(0, -1).Value 
    End If 
End Sub