dim thefirstvalue
dim thesecondvalue
thefirstvalue = thisworkbook.worksheets("sheet1").range("A1").value
thesecondvalue = thisworkbook.worksheets("sheet2").range("A1").value
if thefirstvalue = thesecondvalue then
'do something great here!!!
end if
thevariable = "cccnnnnn-abc"
Splitvariable = Split(thevariable,"-")
'now you look at the delimited value in an array of splitvariable, as in
msgbox(Splitvariable(1)) ' returns abc
DON'T MISS