Как задать диапазон страниц в Страничном режиме Excel с помощью VBA

В Excel есть такая возможность как установка области печати.

printAreas = "$B1:$BQ49"
With PrintSheet.PageSetup
  .FitToPagesTall = 1 
  .printArea = printAreas 
 End With

Когда я задаю одну страницу, то все нормально, но если я хочу задать допустим две страницы

printAreas = "$B1:$BQ49,$B50:$BQ98"
With PrintSheet.PageSetup
  .FitToPagesTall = 2 
  .printArea = printAreas 
 End With

Хочу модифицировать скрипт, чтобы увеличивать printAreas через цикл и передавать в PageSetup, но он даже два листа некорректно выводит. Объясните, пожалуйста, куда копать и есть ли решение?