error message macro userform combobox

[MaartenRo]

Hi,

I want the user to select a textstring in a combobox that should be displayed in range("I2"). Somehow i get an error message. What am i doing wrong?

Sub Tekstvak2_Klikken()
Opvoerder.Show
End Sub

Private Sub OpvoerderOptionButton1_Click()

sheet1.Activate
Cells(2, 9).Value = OpvoerderCombobox.Value

End Sub

Private Sub OpvoerderOptionButton2_Click()
Unload Me
End Sub

Private Sub UserForm_Initialize()
OpvoerderCombobox.Clear
With OpvoerderCombobox
    .AddItem "WK"
    .AddItem "MB -D"
    .AddItem "AM"
    .AddItem "AB"
    .AddItem "BK"
    .AddItem "EL"
    .AddItem "AJM"
End With
End Sub

[6StringJazzer]

First, Cells(9, 2) is B9, not I2. If you want to refer to I2 use one of these:

Cells(2, 9)
Cells(9, "I")
Range("I2")

When the error occurs, what line of code is highlighted when you enter Debug? What is the error message?

[MaartenRo]

Thank you for your comment on the cell reference.
The error occurs at:

Sub Tekstvak2_Klikken()
Opvoerder.Show'error message: Error -2147467259 (80007005) runtime error: not specified error (translated from dutch)
End Sub

How can i solve this problem?
Any input is much appreciated!

[MaartenRo]

Thanks for your reply I solved it by copying the macro's to a new workbook. I guess it has something to do with security of the Excel sheet that i got from someone else.