Achei este código que quase me atende,

Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 4
ListBox1.RowSource = "Plan1!A1:D40"
ListBox1.Font.Size = 10
ListBox1.Font.Name = "Verdana"
End Sub

Acontece que eu quero que conte debaixo para cima apenas 20 linhas os itens; 'TOMATE - BETERRABA - CENOURA - MANDIOCA - BATATA - REPOLHO, que estão na coluna M5:M10

Boa tarde!!

Para mim está complicado entender sua dúvida.

Você fala de 20 itens mas tem 5, fala da coluna M, mas postou um código implementado as propriedades de uma Lisbox com outro intervalo....

Att

Sim reconheço.
Tenho uma lista grande onde são acrescentados diariamente às verduras legumes e hortaliça, tudo em uma só lista.
Então preciso saber o meu estoque de tomate, repolho, beterraba, batata, cenoura, somente os de maior importância para o comercio. Carregar estas informações no Listbox com as quatro colunas;
Coluna A esta a quantidade de caixa
Coluna B esta o tipo de verdura
Coluna C esta Código de inspeção
Coluna D esta o deposito
Obrigado pela atenção.