Assuming you are using the 'Control Toolbox' textbox, in the worksheet module
that the textbox is located [assuming the name of the textbox is TextBox1],
put...

Private Sub TextBox1_Change()
If Len(TextBox1.Value) 600 Then
TextBox1.Value = Left(TextBox1.Value, 600)
End If
End Sub

--
Hope this helps.
If it does, please click the Yes button.
Thanks in advance for your feedback.
Gary Brown



"Tim" wrote:

I have created a text box but I want the text length to be equal to or less
than 600 words.
How do I do that in Excel 2003 please