vba listbox

Nhờ các cao nhân sửa giúp mình cái code này với.Hiện mình đã tạo listbox, tìm kiếm trên textbox sẽ hiện kết quả trên listbox.Mình đã xuất ra được dữ liệu từ listbox, tuy nhiên chỉ xuất được 1 cột chọn.Giờ mình muốn xuất ra các cột chọn trong listbox theo các cột Loại ,Đơn vị tính, giá.