Werte von einem sheet auf ein anderes übertragen - makro
04.12.2019 15:34:57
einem
gibt es die Möglichkeit, solch Code:
Sheets("Sheet2").Range("BA4").Value = Sheets("Sheet1").Range("G14").Value
Sheets("Sheet2").Range("BA5").Value = Sheets("Sheet1").Range("F13").Value
Sheets("Sheet2").Range("BA6").Value = Sheets("Sheet1").Range("E12").Value
Sheets("Sheet2").Range("BA7").Value = Sheets("Sheet1").Range("D11").Value
Sheets("Sheet2").Range("BA8").Value = Sheets("Sheet1").Range("C10").Value
in eher solch code zusammenzufassen:
Sheets("Sheet2").Range("E4:E8").Value = Sheets("Sheet1").Range("C10, D11, E12, F13, G14").Value
würde gerne den oberen code noch weiter verringern. :)
Danke für eure Ideen.
Viele Grüße
Marc-David