I don't know what is wrong here.
I get a can't find project or library error.
Any suggestions peeps?
Private Sub TextBox1_AfterUpdate()
Dim st As String
st = TextBox1.Value
UCase (st)
TextBox1.Value = st
End Sub
Thanks for looking
CAA
---
Message posted from
http://www.ExcelForum.com/