Você quer que um textbox seja preenchido por uma seleção do listbox quando um usuário clica sobre o listbox. Como você faria isto?
Private sub List1_ click()
Text1.change = List1
End sub.
{TITLE}
{CONTENT}
{TITLE}
Aguarde, enviando solicitação...