komme einfach nicht weiter!
Wie kann ich den Ausgabeort einer Listbox variabel gestalten?
So geht es nicht:
Private Sub ListBox1_Click()
Sheets("Tabelle1").ListBox1.LinkedCell = ActiveCell
End Sub
Danke im Voraus
Rolf
Private Sub ListBox1_Click()
Sheets("Tabelle1").ListBox1.LinkedCell = ActiveCell
End Sub
Private Sub ListBox1_Click()
[h10] = [h10] + 1
Sheets("Tabelle1").ListBox1.LinkedCell = ActiveCell.Address
End Sub
Habe jetzt alles außer Listbox eliminiert.