ich möchte im unten dargestellten Code das "levelwest0-130" hinter SUM gerne durch den string R1 ersetzen.
Wie mache ich das?
Sub Makroneu()
Dim R1 As String
R1 = "levelwest0-130"
Sheets("Stats").Select
Range("A1").Select
ActiveCell.FormulaR1C1 = R1
Range("B1").Select
ActiveCell.FormulaR1C1 = "=SUM('levelwest0-130'!R[1]C[4]:R[9]C[5])"
End Sub
Vielen Dank vorab!Alex