userform control backcolour.

[MattShoreson]

code is as follows:

Dim cbobox As Control

With ufrmRepoData
For Each cbobox In .Controls
If Right(cbobox.Name, 1) = 2 Then
If blnEnable Then cbobox.Interior.ColorIndex = vbWhite
End If
Next cbobox
End With

interior.colorindex doesnt work, how do I set the back colour via
code?
any help gratefully appreciated.
Matt.

 

[Geoff]

Try:
If blnEnable Then cbobox.BackColor = vbWhite

hth

Geoff

 

[Bob Phillips]

Dim cbobox As Control

With ufrmRepoData
For Each cbobox In .Controls
If Right(cbobox.Name, 1) = 2 Then
If blnEnable Then cbobox.BackColor = vbWhite
End If
Next cbobox
End With


--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"MattShoreson" <[email protected]>
wrote in message
news:[email protected]...

 

[MattShoreson]

I believe the phrase ' the answer's in the question' applies.

 

[Bob Phillips]

aah, but you mis-spelt it (or rather MS did) <G>

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"MattShoreson" <[email protected]>
wrote in message
news:[email protected]...

 

[MattShoreson]

I think it's a bug in their software.