from help on the clear method:

If the control is bound to data, the Clear method fails.



since you have set the rowsource property of your comboboxes at the point
you call this again, they are "bound".



If you want to clear the selection, write a new routine that just sets the
listindex to -1 (assuming they only allow a single selection).



--

Regards,

Tom Ogilvy



"Profairy " wrote in message
...
I have a problem with my code...

My form contains the following combo boxes and they all work fine until
i use clear form button which re calls the Userform_Initialize sub. It
then highlights the cboCustomer.Clear and says that it is an invalid
property. If i change it to cboCustomer.Value it unhightlights and
highlights the next in list. This is ok until i click clear form and it
says Invalid Property... HELP!


Private Sub UserForm_Initialize()

cboCustomer.Clear
cboSupplier.Clear
cboCommodity.Clear
cboBuyer.Clear
cboIncType.Clear

txtAccount.Value = ""
txtAccountName.Value = ""

ActiveWorkbook.Sheets("Raw Data").Activate



With cboCustomer

cboCustomer.RowSource = ("A6076:A6120")


End With

cboCustomer.Value = ""

With cboSupplier

cboSupplier.RowSource = ("A5937:A6059")

End With

cboSupplier.Value = ""


With cboCommodity

cboCommodity.RowSource = ("A5895:A5934")

End With

cboCommodity.Value = ""



With cboBuyer

cboBuyer.RowSource = ("A6062:A6073")

End With

cboBuyer.Value = ""

With cboIncType

AddItem "Internal"
AddItem "External"


End With

cboIncType.Value = ""

cboSupplier.SetFocus

End Sub


---
Message posted from http://www.ExcelForum.com/