Zellenbezug anders machen
Ronald
Mein Code sieht so aus:
Sub PivWerteFestlegen()
'Für Pivot-Tabelle Wertebereich (Palles) festlegen
LastPalles = [=Max(if(A1:A100000,row(A1:A10000),FALSE))]
Range("A65:F" & LastPalles).Select
ActiveWorkbook.Names.Add Name:="Palles", RefersToR1C1:= _
"='Planung&Status Zahlungsverkehr'!R65C1:R & LastPalles & C6"
Range("Auftragsart").Select
End Sub
Den Teil mit den "komischen Zellenadressen" möchte ich anders ansprechen (diese !R65C1 resp. RxxC6)ActiveWorkbook.Names.Add Name:="Palles", RefersToR1C1:= _
"='Planung&Status Zahlungsverkehr'!R65C1:R & LastPalles & C6"
Lässt sich dies machen?
Vielen Dank
Gruss
Ron