Hallo an alle Helfer und frohes neues Jahr!
Ich habe folgendes Problem: Ich habe eine Arbeitsmappe mit zwei Tabellenblättern. In einem Tabellenblatt stehen Werte, die ich gerne durch Doppelklick in das zweite Tabellenblatt kopieren möchte. Dazu habe ich bereits folgenden Code gefunden:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("B14:M42")) Is Nothing Then Exit Sub
ActiveCell.Copy Worksheets("Dash8 Q400 Checklist").Range("C181")
End Sub
Der funktioniert soweit ganz gut. Das Problem ist nur, in dem Tabellenblatt 1 (Quelltabelle) stehen auch im Breich B48:D54 Werte, die ich ebenfalls durch Doppelklick in das zweite Tabellenblatt, aber an anderer Stelle kopieren möchte. Und das kriege ich nicht hin. Seit zwei Tagen durchforste ich das Internet. Irgendwie muss es doch möglich sein zu bestimmen, dass wenn in den Bereich B14:M42 doppelt geklickt wird, der Wert der aktiven Zelle in die eine Zelle kopiert und wenn ich in Bereich B48:D54 kllicke, dieser Zellenwert dann in eine andere Zelle kopiert wird.
Ich hoffe es kann jemand helfen! Vielen Dank schon mal!
|