Clever-Excel-Forum

Normale Version: Makro auf Doppelklick
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
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!
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 Smile
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