wie kann ich erreichen, dass bei Mausklick auf eine Zelle eines Bereichs (!), in meinem Fall (W2:W19), der jeweilige Zellwert in die Zelle Y1 des gleichen Tabellenblatts übernommen wird.
Vorab vielen Dank für eure Unterstützung.
mfg
Fritz
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [W2:W19]) Is Nothing Then
Range("Y1") = Target
End If
End Sub