Help getting TextBox's to total a percentage

[Nick Giardelli]

I have a Word 2003 Template that I'm trying to complete. The problem
that I'm having is this.
I have a userform and on this form I have 6 Text Boxes and OK Button
and a Cancel button. These boxes by default need to have a value of 0
in all six. The users need to type in these boxes a number from 1 to
100. The end result will be all 6 boxes have to equal 100%. So when the
user click the OK button if these 6 boxes equal less then 100% a
Message boxes needs to pop up and if its more then 100% the same
message box will pop up telling the user that it does not equal 100%.


This is what I, but it does not work.


Private Sub CommandButton2_Click()
If origattysplit.TextBox8.Value + origattysplit.TextBox9.Value +
origattysplit.TextBox10.Value + origattysplit.TextBox11.Value +
origattysplit.TextBox12.Value + origattysplit.TextBox13.Value = ">100"
Then MsgBox "This must Equls 100%" else origattysplit.Hide
End If
End Sub


So how far am I off on this?


Also How do you make a field required. Example How do I make all of
these field required.


.Bookmarks("bmkName").Range.Te­xt = clientnamebox.Value
.Bookmarks("bmkAddress1").Rang­e.Text = address1box.Value
.Bookmarks("bmkAddress2").Rang­e.Text = address2box.Value
.Bookmarks("bmkAddress3").Rang­e.Text = address3box.Value
.Bookmarks("bmkAddress4").Rang­e.Text = address4box.Value
.Bookmarks("bmkCity").Range.Te­xt = citybox.Value
.Bookmarks("bmkState").Range.T­ext = statebox.Value
.Bookmarks("bmkZip").Range.Tex­t = zipbox.Value


Would someone help me out, I am losing all my hair over this crap...


Thank you for taking the time to read this post.


Nick

 

[Doug Robbins]

A response has been posted to your "Help please post in the vba.beginners ng

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP