VBA, Excel, dynamisch Funktionen zuweisen

[Jörg]

Moin Robert,

Ja, aber ich bin ja in Ausgabe.xls in der Tabelle Ausgabe. Und habe dort eine Liste generiert, in Spalte A stehten die Workbooks, in B die darin enthaltenen Tabellen. Ich dachte erst mit Klick auf sagen wir B5 in dem "Produkt123" steht, eine Funktion aufrufen zu können. Vermutlich aber geht das so nicht (a la HTML-Javascript einen Event einer Zelle zuzordnen).

doch.

Klicke im VBA-Editor doppelt auf die Tabelle Ausgabe. Dann hast Du ein Klassenmodul dieser Tabelle, in die Du eintragen kannst:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)  
  
End Sub

In diesem Code kannst Du dann den Target abfragen, zum Beispiel:

• Target
• Target.Address
• Target.Row
• Target.Column
• usw.

Aus diesen Angaben kannst Du Dir alles zusammenbasteln, was Du brauchst.

Füge aber am Anfang eine Abfrage ein, dass wirklich nur eine Zelle markiert ist, weil es sonst Fehlermeldungen gibt, zum Beispiel:

if selection.cells.count > 1 then exit sub

Viele Grüße

Jörg