List Box

S

Steven

I have 2 questions about ListBoxes:

Question 1)
Why with the following code does the LisBox1 always display in Design Mode?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 4 Then
ActiveSheet.Shapes("ListBox1").Visible = -1
ActiveSheet.Shapes("ListBox1").Select
Else
ActiveSheet.Shapes("ListBox1").Visible = 0
End If
End Sub

Question 2)
Will the list box always show in the same spot on the screen regardless of
which line on the worksheet I am on. For example. If I am on row 10 and the
ListBox shows in the middle of the screen then if I am on row 100 will the
ListBox still show in the same postion on the screen when I click on a cell
in column D.

Thank you for your help.

Steven
 
Top