habe von Euch vorgestern dieses tolle Tool bekommen:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("E8:Q8")) Is Nothing Then
Range("E4") = Target
End If
If Not Intersect(Target, Range("S8:AE8")) Is Nothing Then
Range("S4") = Target
End If
End Sub
Hier wird also abgewartet, ob ich eine Zelle im Bereich E8:Q8 aktiviere und dieser Wert wird dann in Zelle E4 eingetragen.
Ebenso S8:AE8 in S4.
Funzt wie Sau :-)))
Nur wie gesagt, ich habe es nicht selbst geschrieben und nun meine Frage:
Ich habe 3 Arbeitsblätter, Tabelle1, Tabelle2, Tabelle3. In jedem Arbeitsblatt möchte ich obiges ausführen, der Wert soll aber nur in Tabelle 1 in Zelle E4 bzw. S4 eingetragen werden.
Für Euch sicherlich ein Pups, aber für mich :-(((
Vielen Dank im Voraus
Helga