日期格式阻止更改

时间:2016-07-15 07:23:30

标签: excel excel-vba calendar formatting cell vba

我希望你很好。我有一个excel表发生的小问题。人们倾向于以他们希望的任何格式在单元格中的日期,当我们尝试加载到单独的数据库时会导致问题。 我想做的是不给他们机会选择put有一个方法,他们只能选择该单元格的特定日期格式。就像日历或日期选择一旦单击单元格将弹出。 我附上了我正在考虑的问题的图片,并试图阻止。 enter image description here 您可以给予的任何帮助都非常感激

1 个答案:

答案 0 :(得分:0)

还有另一种方法,让他们放置他们想要的任何日期格式(只要它被识别为日期),然后将其转换为您想要的格式。 请参阅以下代码:

Public Sub Change_DateFormat()

Dim rng1    As Range

' modify to your desired column where you store your dates
Last_Row = Cells(Rows.count, "A").End(xlUp).row

Set rng1 = Range("A2:A" & LastRow)
rng1.NumberFormat = "mm/dd/yyyy"

End Sub