[印刷範囲] 改ページを挿入する<サンプル>’36行目で改ページを行うRows(36).PageBreak = xlManual’シート内の改ページを解除するCells.PageBreak = xlNone