Печат VBA

От Sheet1 трябва да разпечатам колона А с различен брой редове в зависимост от някакви условия.Или получава се от ред I до ред J.Какъв е синтаксиса на командата PrintArea.

Sheet1.Activate
Sheet1.PageSetup.PrintArea = "$a$ & Trim(Str(I)) : $a$ & Trim(Str(J))"
ActiveSheet.PrintOut

Благодаря Ви предварително за помоща.

така както си го написал, никога няма да разбере че в кавичките има и някакви променливи. Изкарай променливите извън кавичките и мисля че ще се получи това което искаш.
успех