Excel VBA Zellen in ein anderes Tabellenblatt Kopieren wenn Bedingung erfüllt?
Hallo,
ich habe ein problem und habe keine Ahnung von VBA.
Ich habe eine Tabelle in "A" steht der Name in "P" der Kurs und in "Y" ist die Bedingung "ja" oder "nein".
Das war das einzige das ich gefunden habe was auch funktionierte. Allerdings Kopiert es die komplette Zeile.
Sub BedingteKopieZeilen()
Dim Zeile As Long
Dim ZeileMax As Long
Dim n As Long
With Tabelle2
ZeileMax = .UsedRange.Rows.Count
n = 7
For Zeile = 3 To ZeileMax
If .Cells(Zeile, 25).Value = "Kurtaxe" Then
.Rows(Zeile).Copy Destination:=Tabelle10.Rows(n)
n = n + 1
End If
Next Zeile
End With
End Sub
Ich bedanke mich für eure Hilfe
Bernd
Computer,
Microsoft Excel