HELP!! Doing A Level ICT finished my project, just adding
the final touches i.e validation.

I have data entry in a userform via textboxes and comboboxes. I need to
validate these under specific criterias. How do I go about doing this?

Any help greatly appreciated.

Thanks
Kate


--
kjenner7
------------------------------------------------------------------------
kjenner7's Profile: http://www.excelforum.com/member.php...o&userid=32216
View this thread: http://www.excelforum.com/showthread...hreadid=519656

Kate,
Can you give example(s) of validation(s) required as there are a
number of ways of doing these e.g IF ..THEN .. ELSE, CASE ...

"kjenner7" wrote:


HELP!! Doing A Level ICT finished my project, just adding
the final touches i.e validation.

I have data entry in a userform via textboxes and comboboxes. I need to
validate these under specific criterias. How do I go about doing this?

Any help greatly appreciated.

Thanks
Kate


--
kjenner7
------------------------------------------------------------------------
kjenner7's Profile: http://www.excelforum.com/member.php...o&userid=32216
View this thread: http://www.excelforum.com/showthread...hreadid=519656

Its things like only allowing the user to enter a number with no mor
than 2 decimal places. I think the code for VBA is something like:

a = Format(TextBox1.Value, "#,###.00")

but that doesn't seem to be working.
I had some other validation issues aswell but i've been able to wor
those out now, just having trouble with this decimal one and also s
that they can only enter numbers not text

--
kjenner
-----------------------------------------------------------------------
kjenner7's Profile: http://www.excelforum.com/member.php...fo&userid=3221
View this thread: http://www.excelforum.com/showthread.php?threadid=51965

You want to use the change action of the combo box/text box then use
something like this to check the value entered.

I would not try to force the user to 2 decimals, but instead round
whatever they enter to two decimals.

Private Sub ComboBox1_Change()
'check that is a number
If Not IsNumeric(Me.Value) Then
MsgBox "Must be a number"
'check for decimal count
Else
Me.Value = Round(Me.Value, 2)
End If
End Sub

:) Yep, thanks for the help i've sorted it all out now. Cheers.
Kate


--
kjenner7
------------------------------------------------------------------------
kjenner7's Profile: http://www.excelforum.com/member.php...o&userid=32216
View this thread: http://www.excelforum.com/showthread...hreadid=519656