Excel VBA查找()与date问题
我在B
列中有一组date,如06/03/2017
格式化为自定义dd-mmm
格式,给我06-Mar
输出。
如果我手动执行查找/replace并search06-Mar
并selectLook In: Values
,它认为没有问题,但通过VBA做同样的工作。
Dim Source as Worksheet, Dest as Worksheet Dim mDate as String, copyRow as Integer Set Dest = ThisWorkbook.Sheets("Weekly Updates") Set Source = ActiveWorkbook.Sheets("Weekly Updates") mDate = Dest.Range("B2").Text copyRow = Source.Range("B:B").Find(What:=mDate, LookIn:=xlValues).Row
我试图让mDate
作为一个值和search公式和值,但似乎没有任何工作。
在线debuggingcopyRow = Source.......
然而,如果我手动打开查找/replace窗口在这一点上,它填写search栏“06三月”,并find列中的值没有问题。
如果我用stringreplacemDate
我知道有,例如Find(What:="W/C".....
它将copyRow
返回为1(因为它的列的标题)。
任何build议我在这里失踪?
编辑
要覆盖下面的一些评论:
是的工作表命名相同,只是在不同的工作簿(主文件从多个相同的来源拉动数据)
在格式方面,我从06/03/2017
的真实值中获得search条件,格式为dd-mmm
,在数据范围内search06/03/2017
格式为dd-mmm
。
尝试给variablesmDate相同的date格式:
copyRow = Source.Range("B:B").Find(What:=Format(mDate, "dd-mmm"), LookIn:=xlValues).Row