Zelle kopieren, wenn Bedingung erfüllt
05.08.2019 13:06:01
Sammy
ich bräuchte mal eure Hilfe.
So sieht mein Code bisher aus:
Sub Test()
If Workbooks("Kopie 4 (2).xlsx").Sheets("SRS").Range("B4").Value = "FSP473372(D)" Then
Workbooks("Kopie 3 (1).xlsx").Sheets("SRS").Range("T119").Copy
Workbooks("Kopie 4 (2).xlsx").Sheets("SRS").Range("T119").PasteSpecial xlPasteValues
End If
End Sub
Ich möchte bestimmte Zellen von "Kopie 3 (1).xlsx" in "Kopie 4 (2).xlsx" kopieren.
Ich habe verschiedene Testfälle z.B.: FSP473372(D). Dieser ist in Tabelle 4 in der Zeile 4 (B4), aber in der Tabelle 3 in einer anderen. Ich möchte also aus der Tabelle 3 die Zelle "T119" kopieren, das soll aber nur geschehen, wenn in Zeile 4 der oben genannte Testfall steht. Es gibt nämlich über 150 Testfälle und es soll nur der bestimmt Testfall kopiert werden, wie er in der if-Abfrage drin steht.
Also könnte mir jemand helfen, in meiner if-Abfrage, eine weitere if-Abfrage einzufügen, um die Spalte zu kopieren, die in der Zeile 4 der gleiche Testfall steht, wie in "B4" (wie in meinem Beispielcode).
ich hoffe mir kann einer helfen.
Gruß
Sammy
Anzeige