ich wollte mit:
Worksheets("Auswertung2").PageSetup.PrintArea = "$A$1:$T$40, $A$214:$T$272, $A$300:$T$322"
DREI Bereiche in den Druck geben.
Kann es sein, dass VBA hier nur ZWEI Bereiche unterstützt ?
Vielen Dank!
Range("L6").FormulaLocal = "=somefunctions_in_local_language"
Range("L6").FormulaArray = "=COUNT(MATCH({1,2,3}&""*"",C6:H6&"""",))
sERVUS
Sub BereichsNamen_erstellen()
Dim sBereichsName$, Zell_Bereich As Range
sBereichsName = "Print_Area"
Set Zell_Bereich = Range("$A$1:$T$40,$A$214:$T$272,$A$300:$T$322")
ActiveWorkbook.Names.Add Name:=sBereichsName, RefersTo:=Zell_Bereich
End Sub
Servus