Hi all

can any one let me know the vb code to check if the content of a cell is a part of the content of an other cell

for eg.

if cell (1,1)="LAN_ENV"
  cell (2,1)="LAN_TEST,LAN_ENV"

my vba code should check if "LON_ENV" exists in "LAN_TEST,LAN_ENV" I need the entire sting "LAN_ENV" to be compared with "LAN_TEST,LAN_ENV" and perform an action that is append to cell (2,1) the contents of cell(1,1) if the content of cell(1,1) does not exist in cell(2,1).

Thanks in advance.

Hi

try something like this...

Range("A1").Select
On Error Resume Next
i = WorksheetFunction.Search(ActiveCell.Text, ActiveCell.Offset(1, 0).Text)
on error goto 0
If i = False Then ActiveCell.Offset(1, 0).Value = ActiveCell.Offset(1, 0).Value & ActiveCell.Value


cheers

Matt