Help with textboxes requirements and msgbox
 

I have 3 textboxes lined up horizontally on a sheet... I have a cmd
button on the far right that loses the focus from the textboxes and
saves the workbook. See below....

'....loses focus of textboxes
Private Sub Commandbutton_Click()
Me.TxBName.Enabled = CBool(Me.TxBName.Value = "")
Me.TxBAddress.Enabled = CBool(Me.TxBAddress.Value = "")
Me.TxBCity.Enabled = CBool(Me.TxBCity.Value = "")
'....saves workbook
ActiveWorkbook.Save
End Sub

My question, how do I force the user to fill all textboxes. For example
an user completes the name and address textboxes but fails to complete
the city textbox... then he/she presses the cmd button... I want a
msgbox to pop up "complete all fields before booking" and would not let
him/her save the workbook. How do I accomplish this???


---
Message posted from http://www.ExcelForum.com/