在其他工作表中查找date

我有个问题！ 即使我的Vlookup的date似乎没有问题，当我运行macros，而不是显示date，它显示了一些随机数字！ 以下是vlookup的代码！ 我没有包含代码的其余部分，因为它与这部分无关！ 该查找是正确的，因为它是指和工作人员在工作表中它是完美运行的公式，只有在一个macros内不工作！ 我是否应该在下面的代码中添加任何内容来表明这是一个date，以使macros的行为有所不同？ 请帮帮我 ：）

Sheets("Tracker1").Select lastrow = Range("B" & Rows.Count).End(xlUp).Row Range("G2:G" & lastrow).Formula = "=VLOOKUP(B2,'Programare'!C:F,4,FALSE))" 

Answer 1

您可以将格式显式设置为所需的数据格式。 即

 With Worksheets("Tracker1") lastrow = .Range("B" & .Rows.Count).End(xlUp).Row With .Range("G2:G" & lastrow) .Formula = "=VLOOKUP(B2,'Programare'!C:F,4,FALSE))" .NumberFormat = "d/m/yy" ' <---------------------- Set the date format explicitly End With End With