如何在VBA中格式化date和时间?

我有一个用户窗体使用OWC Spreadsheet 11.0来显示名为“results”的excel工作表。 步骤可以从这个链接find: https : //stackoverflow.com/questions/17406319/display-a-part-of-an-excel-sheet-on-a-userform-using-vba/17407415#17407415

现在我遇到了一个问题,date,时间(开始,结束)都转换为数字。 因此,是否有办法locking工作表本身的格式或可以相同方式工作的VBA代码。

这是图像的外观

在这里输入图像说明

您需要使用相关的格式来格式化相关的列。 例如

Private Sub CommandButton1_Click() Me.Spreadsheet1.Cells.Range("A1:B3").Value = _ ThisWorkbook.Worksheets("Sheet1").Range("A1:B3").Value Spreadsheet1.Columns("B:B").NumberFormat = "m/d/yyyy" End Sub 

在这里输入图像说明

例1:

 Range("").NumberFormat = "dd-mm-yyyy" 

或“dd / mm / yyyy”或任何其他组合。

例2:

 Range("").Value = Format(Range("").Value, "dd-mm-yyyy") 

或“dd / mm / yyyy”或任何其他组合。