Здравствуйте.
Не подскажете, как поменять вторую единицу на значение из ячейки А1 активного листа?
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1
Спасибо.

Здравствуйте.  
Не поможете?  
 
Как сделать код    
Rows("3:1000").Select  
 
по выделению строк более гибким?  
Чтобы началом диапазона был номер активной строки,а окончание диапазона  
можно было бы всегда задавать разное в открывающемся окошке, либо указывая к-во выделяемых строк, либо указывая номер последней выделяемой строки.  
Спасибо.