Sub empRecListDisplay()
    Dim empMasterList As Worksheet
    Dim last_rowMasterlist As Long
    
    Set empMasterList = ThisWorkbook.Sheets("EMPLOYEE MASTERLIST")
    last_rowMasterlist = empMasterList.Cells(Rows.count, 2).End(xlUp).Row
    
    With mainForm.EmpRecListBox
        .ColumnHeads = True
        .ColumnCount = 9
        .ColumnWidths = "100,350,100,100,100,100,100,100,100"
        .RowSource = empMasterList.Range("B1:K1").Address
    End With
End Sub