Multiple Columns Including the Header to display in Listbox

Hello Gurus,


Could you please help me with my problem.

I have a userform with Listbox. My problem is, i can't display multiple columns in the Listbox.

I have the below code but it only display only one column and also not displaying the header.

Private Sub UserForm_Initialize()

Dim lngMyRow As Long
     
    For lngMyRow = 2 To Cells(Rows.Count, "B").End(xlUp).Row
        If StrConv(Range("E" & lngMyRow), vbUpperCase) = "WAITING FOR APPROVAL" Then
                        ListBox1.AddItem Range("A" & lngMyRow)
        End If
    Next lngMyRow

End Sub

I want to display Columns A, C & D including the header with 'WAITING FOR APPROVAL' status.
So it will display like this:

Name | Letter | Double
LESS A AA
MORE C CC
EXCLUSIVE D DD
NONE E DD

I have attached my file. Thanks in advance gurus!