Makro auf Doppelklick

[Matthaeus]

Hallo zusammen,
 
ich habe ein Excel Sheet mit zwei Reitern in Reiter A sind in jeder Zeile Benutzerdaten eingetragen und ich möchte das bei Doppelklick in die Spalte H aus derselben Zeile die Werte von Spalte A + B + C kopiert werden, dann in Reiter B gesprungen wird und dort die Daten in Spalte A + B + C kopiert werden. Die Zeile in Reiter B bleibt jedoch immer dieselbe.
 
Kann mir jemand bei der Lösung meines Problems helfen?

Vielen Dank im Voraus!

[schauan]

Hallo Mattheus,

hast Du schon mal mit dem Makrorekorder gearbeitet? Damit könntest Du erst mal das Kopieren aufzeichnen. Sieht ungefähr so aus:

Code:

Sub Makro4()
'
' Makro4 Makro
'

'
   Sheets("Tabelle1").Select
   Range("A1:C1").Select
   Selection.Copy
   Sheets("Tabelle2").Select
   Range("A11").Select
   ActiveSheet.Paste
End Sub

Mit etwas Hintergrundwissen kommt dann so was raus - Der Code gehört in das Tabellenblattmodul wo Du klicken willst

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Wenn Klickbereich Spalte 8 (H) ist dann  
If Target.Column = 8 Then
   'In Klickzeile von A bis C kopieren und in Tabelle2 A11 einfuegen
    Range("A" & Target.Row).Resize(1, 3).Copy Sheets("Tabelle2").Range("A11")
    'Kopiermodus aus
   Application.CutCopyMode = False
    'Bearbeitungsmodus der Zelle aus
   Cancel = True
'Ende Wenn Klickbereich Spalte 8 (H) ist dann  
End If
End Sub