Hi there ,

I found the following code to add items to a combobox in a userform for
Excel 2002 , and works just fine in version 2002.

Private Sub UserForm_Initialize()
'   Executed before the form is shown
   Dim Row As Integer
   Set HelpSheet = ThisWorkbook.Sheets(HelpSheetName)
   TopicCount =
Application.WorksheetFunction.CountA(HelpSheet.Range("A:A"))
   For Row = 1 To TopicCount
       ComboBoxTopics.AddItem HelpSheet.Cells(Row, 1)
   Next Row
   ComboBoxTopics.ListIndex = 0
   CurrentTopic = 1
   UpdateForm
End Sub

Now I've transferred this code (+ all other codes) and the userform to Excel
2003 and it gives an error message when adding items to the combobox.

Error message =
Run-time error '-2147352571 (80020005)
                          Type mismatch

When debugging the code stops at
ComboBoxTopics.AddItem HelpSheet.Cells(Row, 1)

Anyone have an idea where the error comes from ?
Thanks for helping out.
Mario