关于VBA多条件判断单元格是否存在值，执行语句问题

[morliz子轩]

情况是这样：
有表数据如下－－
带座轴承 UCF205
带座轴承 UCF206
轴承 UCF207
轴承 UCF208
轴承 UCF209
带座轴承 UCF210
轴承 UCF212
轴承 UCFA207
带座轴承 UCFA208
轴承 UCFA209/可调菱形座
带座轴承 UCFB205/悬挂三孔座
带座轴承 UCFB206
轴承 UCFB207/带座
轴承 UCFB208/带座
轴承 UCFB209
轴承 UCFB209/悬挂座
轴承 UCFB210
带座轴承 UCFC205/圆形座
带座轴承 UCFC207
轴承 UCFC208
带座轴承 UCFC209/凸台圆形座
带座轴承 UCFC210
带座轴承UCFC214 UCFC214
带座轴承 UCFL205/带菱形座
带座轴承 UCFL206
带座轴承 UCFL206
轴承 UCFL207/外球面轴承/带菱形座
带座轴承 UCFL207/外球面轴承/带菱形座
轴承 UCFL208
轴承 UCFL209/带菱形座
轴承 UCFL210
带菱形座轴承 UCFLU206/带菱形座
轴承 UCFLU209/菱形座
带座轴承 UCFU207
带座轴承 UCFU208
轴承 UCFU210
带方形座轴承 UCFU215
轴承 UCHA208
轴承 UCHA209
带座轴承 UCP205/立式座
带座轴承 UCP206/带座
轴承 UCP207/带座
轴承 UCP208/带座
轴承 UCP209/带座
轴承 UCP210
轴承 UCP212
带座轴承 UCT208
带座轴承 UKF210
带座轴承 UKFC218/普通碳钢
带座轴承 带座/UCPH-208
连座轴承 连座轴承UCFK-207
连座轴承UCFK208 连座轴承UCFK208

假设左列为B，右列为C。判断条件是这样的：
1、当C列中
a. 匹配UCF，则将C列值，写到E列，尾部添加“/带方形座”；
b. …………（请见下图表，和a条件一样写到E列）

2、碰到条件不符的，忽略不写。
3、碰到尾部加了"/"的字符，尾部不做任何添加。

请大神给一组可实现的代码出来，非常感谢！！！

[舉杯邀明月]

这其实并不难，主要讲求一个“判断方法”： 因为这个“型号标识”有部分包含关系，因此在判断时要讲“顺序”， 　　先判断“前4个字符”；没有符合的，再判断前“3个字符”；没有符合的，再判断前2个字符（只剩1种了）。 　这样“型号标识”与“型号的中文描述”就能精确匹配了。 既然“C列尾部是 / 时不添加内容”，那么“总流程”就是先判断C列文本结束是否为/，再按上面所述判断型号…… 搞定…………

[脆皮大雪糕]

dim i as integer
for i = 1 to 记录行数
    if instr(activesheet.cell(i,2),"UCF")>=1 and right(activesheet.cell(i,2),1) <> "/"  then 
        activesheet.cell(i,4).value = activesheet.cell(i,3).text & "/带方形座"
    end if 
next

[赵4老师]

Orz 楼上都是大神！