Your code works for me in Excel 97 thru 2003:


Dim Txt As String
Txt = "M,F"
On Error Resume Next
Range("E5").Validation.Delete
On Error GoTo 0
Range("e5").Validation.Add Type:=xlValidateList, _
AlertStyle:=xlValidAlertStop, _
Operator:=xlBetween, _
Formula1:=Txt

If you are using a non-USA version of Excel, try changeing "M,F"
to "M;F".

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"ZoomZoom " wrote in
message ...
Thanks very much for the reply.

I have tried deleting the previous validation as you suggest. I
receive
the same error. I've also tried modifying rather than adding
validation
- same applies again.

Cheers,

Justin


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