Doppelklick für 3 Tabellenblätter
chris58
Ich habe ein Formular, wo ich auch Mahnungen drinnen habe. Ich habe diesen Code, der bei doppelklick alle Daten in die erste Mahnung übernimmt. Jedoch habe ich 1. Manung, 2. Mahnung und 3. Mahnung.
Kann man den Code so erweitern, daß die Daten bei allen 3 Tabellenblättern übernommen wird ?
Danke für die Hilfe
chris
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("D2:D50000")) Is Nothing Then
Sheets("1. Mahnung").Range("C30").Value = Target.Value
End If
End Sub
Anzeige