How to clear the interior colour of a textbox

[danbates]

Hi,

I have this following code which is my 'CLEAR' button on a search userform.

Code:

Private Sub CommandButton3_Click()
Dim z As Control
 For Each z In Search.Controls
 If TypeName(z) = "TextBox" Then
 z.Value = ""
 End If
 Next z
 TextBox1.SetFocus
 End Sub

I would like to adapt it so when I press the 'CLEAR' button , not only does it clear the textboxes it also clears the interior colour of textbox7.

Any help would be much appreciated.

Kind Regards

Dan