VBA在目录名称中格式化显示的date

我已经准备了一个代码，通过这个代码可以读取不同的单元格，以确定可以在其中find源代码的文件的名称。 随后打开的文件取决于活动工作表的单元格S2中指定的date，格式为“mm.dd.yy”。

代码似乎读取大多数单元格罚款，但是当谈到date时，它是恢复到“dd \ mm \ yyyy”，我不知道我要去哪里错了。

我所做的研究表明，清晰区分单元格内容和显示格式非常重要，我认为这就是我使用NumberFormat所做的工作，但似乎没有奏效。

这是我正在使用的代码;

Dim ws1 As Excel.Worksheet Set ws1 = ActiveSheet ws1.Range("S2").NumberFormat = ("mm.dd.yy") Workbooks.Open Filename:= _ "Q:\Accounts Department\DF Period End ADI\Security Plus Reconciliation\Historical Data\2015 - 2016\P" & ws1.Range("S3").Value & "\Securiy Plus Data\W" & ws1.Range("S4").Value & "\FileName " & ws1.Range("S2") & ".xls" 

任何帮助，一如既往，非常感谢。

Answer 1

尝试将ws1.Range("S2")更改为Format(ws1.Range("S2"), "mm.dd.yy")

Answer 2

使用.Text ：

 Dim ws1 As Excel.Worksheet Set ws1 = ActiveSheet ws1.Range("S2").NumberFormat = ("mm.dd.yy") Workbooks.Open Filename:= _ "Q:\Accounts Department\DF Period End ADI\Security Plus Reconciliation\Historical Data\2015 - 2016\P" & ws1.Range("S3").Value & "\Securiy Plus Data\W" & ws1.Range("S4").Value & "\GO NORTH EAST " & ws1.Range("S2").Text & ".xls"