Hi,

I want to setup one ComboBox per WorkSheet at startup.
For this I have the following code:
Private Sub Workbook_open()
Worksheets("I_Calc").ComboBox1.List = Array("Alfa", "Beta", "Gamma",
"Delta")
Worksheets("I_Calc").ComboBox1.Value = "Gamma"
Worksheets("V_Calc").ComboBox1.List = Array("Alfa", "Beta", "Gamma",
"Delta")
Worksheets("V_Calc").ComboBox1.Value = "Gamma"
Worksheets("F_Calc").ComboBox1.List = Array("Alfa", "Beta", "Gamma",
"Delta")
Worksheets("F_Calc").ComboBox1.Value = "Gamma"
Worksheets("T_Calc").ComboBox1.List = Array("Alfa", "Beta", "Gamma",
"Delta")
Worksheets("T_Calc").ComboBox1.Value = "Gamma"
End Sub

But when I start up the file I get "Permission denied (Error 70)" at line 4.
The setup of the ComboBox1 at WorkSheet(I_Calc) is done correctly by the code.
But for the other WorkSheets it does not work.

What have I done wrong?
I have checked the name of the ComboBoxes and all of them is called ComboBox1.

Br.