如何在VBA中引用控件

Question

I'm having trouble with the following code -

Sub ListBox7_Change()
    With Courses.ListBox7
        .AddItem "Hi"
    End With
End Sub

Whenever I run it, I get an error message that says "Run-time error '424': Object required".

The debugger highlights the 2nd part of the second line, "Courses.ListBox7".

I have a Sheet calles "Courses" and a ListBox on that Sheet called ListBox7. Am I referencing that ListBox incorrectly? What am I doing wrong?

I am (unfortunately) using Excel 2010.

Many thanks, Sam.

Answer 1

It's correct as long as Courses is CodeName of your sheet but I don't think so.

As long as Courses is simple name which you could see in Excel App then you need to change your code into this one:

Sub ListBox7_Change()
    With Sheets("Courses").ListBox7
        .AddItem "Hi"
    End With
End Sub