ブックを開くときにComboBoxの値を消去できません

Question

ブックを開くと、やりたいことがいくつかあります。それらの1つは、私のActivexコントロールからすべての値をクリアすることです。以下は、それはそれはオブジェクトは、このメソッドやプロパティをサポートしていません "と言って私たちのエラーを吐くws.ComboBox8するために取得するいくつかの理由のために私のコード

Public Sub Workbook_Open() 

Application.EnableEvents = True 
Application.ScreenUpdating = False 

Set wb = Application.Workbooks("Incident_Form v11") 
Set ws = wb.Sheets("Error Form") 

ws.Range("D5").Value = "F&C-3000" &  (Application.WorksheetFunction.RandBetween(1, 1000000000)) 

ws.ComboBox2.Value = Null 
ws.ComboBox3.Value = Null 
ws.ComboBox4.Value = Null 
ws.ComboBox5.Value = Null 
ws.ComboBox6.Value = Null 
ws.ComboBox7.Value = Null 
ws.ComboBox8.Value = Null 
ws.ComboBox9.Value = Null 
ws.ComboBox10.Value = Null 
ws.ComboBox11.Value = Null 
ws.ComboBox12.Value = Null 
ws.ComboBox13.Value = Null 
ws.ComboBox14.Value = Null 
ws.ComboBox15.Value = Null 
ws.ComboBox16.Value = Null 
ws.ComboBox18.Value = Null 

End Sub 

です。誰でも知っている理由は？

Answer 1

ws.ComboBox8は他のものと同じにすることはできません。削除し、ws.ComboBox7をコピーして貼り付け、ComboBox8に名前を変更します。