ListBox Code for VBA form

Hi,

The way I'd do this is create a dynamic range name for your invoice list. e.g.

lst_inv :

Formula:

 =OFFSET(MasterData!$A$1,0,0,COUNTA(MasterData!$B:$B),7)

change the 7 to change the number of columns you see in the ListBox

Set the RowSource property of the Listbox to lst_inv
Set the ColumnWidth Property to say
30 pt;60 pt;60 pt;60 pt;60 pt;60 pt - change the numbers as necessary to display the number of characters from each field.

Use the

Private Sub FindButton_Click()
Me.InvoiceList.RowSource = Range("inv_list")
End Sub

procedure to list the invoices.

That's a starter for 10.

I'd then use the click event of the listbox to identify the row that's been selected and use that that row number to index the row in the Master Data sheet that contains the details and populate the form fields with the data from that row.


See attached