Permission Denied Error

[AlexanderBB]

Guessing a bit with this, but get the above error

Private Sub listY_Click()
    listY.Enabled = True
    listY.List = Worksheets("Sheet1").Range("C20:C40").Value
End Sub

Am I on the right track, or not possible and I must use AddItem?

 

[RoryA]

Do you have a rowsource set? If so, you need to clear that first.

 

[AlexanderBB]

Hi Rory thanks for the reply, but I'm still struggling.
No rowsource was set in Properties and instruction listY.RowSource = "" kept the same permission error.
Then i tried listY.RowSource = Worksheets("Sheet1").Range("C20:C40").Value but that gave Type Mismatch error.

 

[RoryA]

Rowsource needs an address, not an array of values.

Why are you enabling a listbox when you click on it?

 

[AlexanderBB]

Oops, I was so busy trying to work out the error I overlooked I was addressing the wrong listbox.
Now Msg1 works. Sorry.... first time using this range-fill method instead of additem.