Populate UserForm ComboBox with Multiple columns and textbox with selection

[03856me]

I have the following code that works as it is but I have been asked to include 5 columns of data in the comboBox helping the user with their selection. Right now the ComboBox is populating with the p o number only. I know how to do this with a ListBox but not a combobox. Once the user selects an item I would like TextBox1 updated with the p o number only, then the remainder of my code would work properly. Can someone help me with modifying the code for multi columns.

Private Sub UserForm_Initialize()    
     Dim xpo As Range
    Dim ws As Worksheet
    Set ws = Worksheets("matrixWLC")
    For Each xpo In ws.Range("WLCmatrixTable[po]")
        With Me.cbo_po
            .AddItem xpo.Value
        End With
    Next xpo
End Sub

 

[Fluff]

How about

Private Sub ComboBox1_Click()
   Me.TextBox1.Value = Me.cbo_po.Value
End Sub

Private Sub UserForm_Initialize()
   With Me.cbo_po
      .ColumnCount = 5
      .List = Sheets("matrixWLC").Range("WLCmatrixTable[po]").Resize(, 5).Value
   End With
End Sub

 

[03856me]

that worked perfectly, thank you

 

[Fluff]

Glad to help & thanks for the feedback