请高手帮忙！怎么在EXCEL中一列挑出相同的字符

请高手帮忙！如何在EXCEL中一列挑出相同的字符！
如何在EXCEL中一列挑出相同的字符！如果有相同的字符提示出字符的直，没有则提示“无相同的字符”。

[解决办法]

VB code

dim blnHave as boolendim i as integerdim j as intgerblnhave=falsefor i=1 to 10   for j=i+1 to 10      if cells(i,1)=cells(j,1) then          blnhave=true          msgbox cells(i,1)      end if   next jnext iif not blnhave then   magbox "not have"end if