ich kann leider folgendes makro nicht anpassen
Option Explicit
Sub UmKopieren()
Dim i&, j&, src As Worksheet
Set src = Worksheets("Tabelle1")
Worksheets.Add(after:=src).Name = "tab2"
j = 2
With src
For i = 2 To .Cells(.Rows.Count, 10).End(xlUp).Row
If .Cells(i, 5).Value Like "*Summe" Then
.Range(.Cells(i, 1), .Cells(i, 10)).Copy Cells(j, 1) 'hier aber wo?
j = j + 1
End If
Next
End With
End Sub
es wird von tabelle1 die zeile kopiert und in tab2 eingefuegt
wenn in spalte e "summe" steht.
leider ist in tabelle1 spalte j ein formel
wenn ich jetzt tab2 nachsehe, bekomme eine fehlermeldung
wie kann man die spalte j als "value" in tab2 einfuegen statt formel mit bezug?
dank und gruss
mehmet