关于查找的问题

宝贝万岁 · 发表于 2017-4-27 23:33

本帖最后由宝贝万岁于 2017-4-29 14:05 编辑

Sheet2第二列为单号，格式为KC201704001，KC201704002，。。。

Sheet1.cells(2,1)为单号的前八位：KC201704

想在sheet2第二列中查找是否含有Sheet1.cells(2,1)，如果没有的话，sheet1.cells(2,1)中的内容要重新定义为 "KC" & Format(Now, "yyyymm")

主要是因为跨月要自动重新编单号的原因，哪位大神告诉我如何实现？

DevilW · 发表于 2017-4-28 00:11

If Sheet2.Range("b:b").Find(Sheet1.Cells(2, 1)) Is Nothing Then Sheet1.Cells(2, 1) = "KC" & Format(Now, "yyyymm")

		自动登录	找回密码
密码			免费注册

[已解决] 关于查找的问题

评分

最新热点 /1