AW: markierte zeile
13.04.2010 08:49:58
hary
Hallo
Teste mal so.
hier mit makro:
Sub kopieren()
'--Zeile wird in Tabelle1 ausgewaehlt Zelle aus SpalteA und SpalteD wird nach Tabelle2 kopiert
With Selection
Union(Cells(.Row, 1), Cells(.Row, 4)).Copy Worksheets("Tabelle2").Range("A1")
End With
End Sub
hier mit Doppelklick in die erste Zelle in Spalte. Code gehoert in den Code der Tabelle.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
'--Zeile wird in Tabelle1 ausgewaehlt Zelle aus SpalteA und SpalteD wird nach Tabelle2 kopiert
With Selection
Union(Cells(.Row, 1), Cells(.Row, 4)).Copy Worksheets("Tabelle2").Range("A1")
End With
End Sub
gruss hary