siaojuen大哥你好！很久网上不见，万分想念！！
有时间的话，请帮忙如何用VBA实现：
如下表，B列单元格中的字符串中的各2位数（字体为红色），如果与E1：J1中的任何一个数字相同，则显示为绿色字体。
谢谢谢谢！！！！！

我最近有点忙，没有太热衷于上贴吧。
今天才看到你的贴。
你这问题也可以用公式解决，这方法要在旁边占用一个column，以及i1:j1的数字如属1位数须在前头加0,例如7须写成07。
C1=SUMPRODUCT(1-ISERROR(FIND(E$1:J$1,B1)))
向下拉 (复制公式)
答案会是0至6之简数字
然后用条件式格式设定颜色。
用下拉方法将公式及格式向下复制。

以下方法不须占用另一 column。
直接将B1设定条件化格式：
=SUMPRODUCT(1-ISERROR(FIND(E$1:J$1,B1)))
向下拉 (可复制条件式格式)

siaojun大哥，你好，我的意思可能没表示清，请看下图

衷心感谢siaojuen大哥！！！！