View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.misc
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default VBA code for empty txt field

Nothing to do with your code...

But you may want to consider using a checkbox--checked means yes, unchecked
means no. As a user, I would find that more consistent with other forms I have
to fill out.

And it may make the code slightly easier, too.

If Me.chkbxYESNO.Value = true Then
'ok???
else
if trim(txtifnowhy.value) = "" then
me.txtifnowhy.setfocus
MsgBox "PLEASE ENTER REASON REVERSAL WAS NOT SAVED"
Exit Sub
end if
end if

===
You could use a pair of optionbuttons if you wanted, too.



"AccessUser777 via OfficeKB.com" wrote:

Hi all,
New to VBA, so forgive my ignorace.

I have the following:
user form
combo box: cmbYESNO
text field: txtIFNOWHY

What I'm trying to accomplish is making sure that the user doens't forget to
populate the cmbYESNO and depending on the value of this combo box, whether
or not txtIFNOWHY needs to be filled out. I have the following code which i
picked up from a differnt thread on this site, which works for ensuring that
the cmbYESNO is filled out, but i can't seem to get the second part of the
code. Any help is appreciated. Thanks
Here is my code:

If Trim(Me.cmbYESNO.Value) = "" Then
Me.cmbYESNO.SetFocus
MsgBox "PLEASE INDICATE IF REVERSAL WAS SAVED"
If Trim(Me.cmbYESNO.Value) = "NO" Then
Me.txtIFNOWHY.SetFocus
If Trim(txtIFNOWHY.Value) = "" Then
MsgBox "PLEASE ENTER REASON REVERSAL WAS NOT SAVED"
Exit Sub

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...excel/201001/1


--

Dave Peterson