Validate Email address entry

[Rayasiom]

Hi All,

How can I validate data entry into a spreadsheet for a specific cell where
an email address is typed into? One of the common errors my data capturers do
is using a comma instead of a full-stop.
Thanks

 

[Jim Cone]

This may come close...
Right-click the sheet tab, select View Code and paste the following
code in the big white window...
'--
Private Sub Worksheet_Change(ByVal Target As Range)
If Target(1, 1).Address = Me.Range("C5").Address Then
If InStr(1, Target(1, 1).Value, ",", vbTextCompare) > 0 Then
MsgBox "Don't do that. "
Application.Undo
End If
End If
End Sub
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware



"Rayasiom" <[email protected]>
wrote in message
Hi All,
How can I validate data entry into a spreadsheet for a specific cell where
an email address is typed into? One of the common errors my data capturers do
is using a comma instead of a full-stop.
Thanks

 

[Rayasiom]

Hi Jim,
Thanks - it does work.