Unable to display 3 columns in same row in printed page using bootstrap

/* hide the page footer on screen display */
.page-break { display: none; }

@media print {
  /* make a 10-inch high block that sits on top of the page content */
  .page-break {
    page-break-before: always;
    display: block;
    position: absolute;
    height: 720pt;
  }

  /* stick the contents of .page-break to the bottom of the 10 inch block */
  .page-break .copyright {
    position: absolute;
    bottom: 0px;
  }
}

Footer A : Remainder(RecordNumber, 6) >= 2 or
           Remainder(RecordNumber, 6) = 0

Footer B : Remainder(RecordNumber, 6) >= 3 or
           Remainder(RecordNumber, 6) = 0

Footer C : Remainder(RecordNumber, 6) >= 4 or
           Remainder(RecordNumber, 6) = 0

Footer D : Remainder(RecordNumber, 6) >= 5 or
           Remainder(RecordNumber, 6) = 0

Footer E : Remainder(RecordNumber, 6) = 0

LastColOnP1 = Worksheets(1).VPageBreaks(1).Location.Column - 1

Sub FindFirstVPageBreak()
Dim LastColOnP1 As Long

With ActiveSheet
    'Ensure there is more than one page by puting something in last column
    .Cells(1, .Columns.Count) = 1
    LastColOnP1 = .VPageBreaks(1).Location.Column - 1
    'Delete the last column to allow UsedRange to be reset
    .Cells(1, .Columns.Count).EntireColumn.Delete
End With
'Save to workbook to commit the reset UsedRange
If Not ActiveWorkbook.ReadOnly Then
    ActiveWorkbook.Save 'assumes workbook has been saved previously.
End If
End Sub