2012-03-02 3 views
3

Я делаю некоторые проверки в ячейке, где пользователь вводит значение даты. Правильный формат, который я ожидаю, это «m/d/yyyy», поэтому мне нужен способ проверить, что пользователь вводит дату в этом формате.Проверьте определенный формат даты в vba excel 2010 64-bit

Как я могу это достичь?

вот некоторые из валидаций я сделал:

Dim StartDate As String 
Dim EndDate As String 
With Sheet1 
    StartDate = WorksheetFunction.Trim(.Range("F2").Value) 
    EndDate = WorksheetFunction.Trim(.Range("F3").Value) 
End With 

'Dates validations 

If StartDate = "" Or EndDate = "" Then 
    MsgBox ("Dates can't be empty") 
    Exit Sub 
End If 

If Not IsDate(StartDate) Or Not IsDate(EndDate) Then 
    MsgBox ("Please check dates format") 
    Exit Sub 
End If 

If CDate(StartDate) > CDate(EndDate) Then 
    MsgBox ("Start Date can't be greater than End Date") 
    Exit Sub 
End If 
+3

Почему бы не использовать встроенную проверку данных Excel? Таким образом, вам не нужно писать код;) Пользователь не сможет вводить ничего, кроме дат. –

+0

Надеюсь, это поможет? http://support.microsoft.com/kb/211485. Дайте мне знать, если вы все еще хотите помочь? –

+1

Я ценю вашу помощь Сиддхарта, но, проведя несколько тестов, я понял, как это сделать, как вы сказали, используя проверку данных, я не знал об этом, так что еще раз спасибо! Положите ответ, чтобы я мог дать вам кредит :) – Somebody

ответ

Смежные вопросы