Wie programmiereich einen Druckbereich?

Hallöchen

Ich weiss, dass man einen Druckbereich folgendermassen programmiert:

Range(„A1:C50“).Select
ActiveSheet.PageSetup.PrintArea = „$A$1:blush:C$50“

Nun habe ich aber das Problem, dass das Ende meines Druckbereichs durch die Zelle "Cells(b,3) definiert ist. Wobei b eine Variable ist die durch die Anzahl Produkte definiert ist.

Wie kann ich nun den Druckbereich festlegen?

Danke für eure Hilfe

ActiveSheet.PageSetup.PrintArea = „$A$1:blush:C$50“

Nun habe ich aber das Problem, dass das Ende meines
Druckbereichs durch die Zelle "Cells(b,3) definiert ist. Wobei
b eine Variable ist die durch die Anzahl Produkte definiert
ist.
Wie kann ich nun den Druckbereich festlegen?

Hallo Jochen,

ActiveSheet.PageSetup.PrintArea = „$A$1:blush:C$“ & b

Gruß
Reinhard

Habe die beste Antwort noch gefunden.

ActiveSheet.PageSetup.PrintArea = Range(cells(1, 1) , cells(a, 4)).Address

so bin ich in jeder hinsicht unabhängig.