excel 查寻单元格内包含某值

920168

excel 查寻全部单元格，把包含123的单元格，输出如图所示 A7中，a7值是A列值+包含有123单元格的小数点后面数值，
123后面的数值可能不只三位，123是变量。
把一个符合条件的值作为一行个输到a7中，比如说B8符合，C9也符合，那么输到a7单元格应该分二行
注：123关键字并非只会存在B列，但绝不会在a列,
不要告诉我用CTRL+F   呵呵！

[ 本帖最后由 920168 于 2011-2-18 21:45 编辑 ]

gufengaoyue

Sub Cok()
Dim rng As Range
Dim i%: i = 1
For Each rng In Range("b1:b" & [b65536].End(xlUp).Row)
    If rng.Value Like "*123*" Then
        Cells(i, 4) = Cells(rng.Row, 1) & "," & Right(rng, 3)
        i = i + 1
    End If
Next
End Sub

920168

能不能简单的！公式

920168

求修改！

wangguominx

公式怎么运行不了