Listboxes 2

D

Denise

I have two forms each with a listbox on them

How do I get it so that when the user clicks a button on
the first form the second form is displayed which it's
listbox containing the same data as the first

This is what I've got so far
sub Userform1_click()
userform2.show
userform2.listbox1.value = userform1.listbox1.value
end sub
 
B

Bob Phillips

Private Sub CommandButton1_Click()
With UserForm2
.ListBox1.List = Me.ListBox1.List
.ListBox1.ListIndex = 0
.Show
End With
End Sub


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Top