小白贴，修改代码。

看飞鸟的金鱼

1、一个单元格里存放：YZH-350B-8中，怎么在WorksheetFunction.Find（）中找第2个“-”的位置返回数值？比如第2个“-”是在第9位，返回9？
2、一个单元格里同时包含两个字符串的代码：第二张表，新增第四列（模块4），怎么实现同时满足两个条件？即（InStr(Cells(x, "c"), "UCF") And InStr(Cells(x, "c"), "机械桩")  ）即单元格里即要满足包含UCF又要是机械桩，这段代码怎么写？

ww87725244

1问、看了一下代码，楼主只是想提取-后面的8中，建议使用VBA的split函数
    例如：YZH-350B-6中
              可以这样写：Split(s, "-")(2)，结果就是-------6中
2问、看数据源，如果同时满足数据存在"UCF"和"机械桩"这两个字段，似乎没有数据符合要求啊

ykcbf1100

为什么一定要用WorksheetFunction.Find呢？其它方法不行吗？比如：split函数

看飞鸟的金鱼

ykcbf1100 发表于 2024-10-15 21:36
为什么一定要用WorksheetFunction.Find呢？其它方法不行吗？比如：split函数

好的，感谢老师的回复，祝你工作顺利！第2个问题，主要是一个单元格里满足两个条件不会编写代码。（InStr(Cells(x, "c"), "UCF") And InStr(Cells(x, "c"), "机械桩")  ）想表达同时满足UCF和机械桩两个字符串，不会写代码。

看飞鸟的金鱼

ww87725244 发表于 2024-10-15 20:25
1问、看了一下代码，楼主只是想提取-后面的8中，建议使用VBA的split函数
    例如：YZH-350B-6中
        ...

感谢老师的回复，问题二有的，最下面几行，P-UCF-350A-15下 机械桩（母）

ww87725244

看飞鸟的金鱼 发表于 2024-10-16 07:47
感谢老师的回复，问题二有的，最下面几行，P-UCF-350A-15下 机械桩（母）

那就可以使用like函数，例如：P-UCF-350A-15下 机械桩（母）
就可以写成 like *UCF*机械桩*