A
avilla
Hi can anybody help
I have used the following code to enter a specific date in an inputbo
that looks at the autofilter column and displays the result relevent t
the date entered on the worksheet. I am new to this and keep gettin
errors that I am unable to solve. Any help would be fantastic.
Sub Enter_Date()
Dim mydate As Date
Selection.AutoFilter Field:=9, Criteria1:=">=mydate"
mydate = InputBox("Enter Month in MMM-YY format")
If mydate >= InputBox Then
If IsDate(mydate) Then
MsgBox "Continue the macro"
Else
MsgBox "You didn't enter a date"
End If
End If
End Su
I have used the following code to enter a specific date in an inputbo
that looks at the autofilter column and displays the result relevent t
the date entered on the worksheet. I am new to this and keep gettin
errors that I am unable to solve. Any help would be fantastic.
Sub Enter_Date()
Dim mydate As Date
Selection.AutoFilter Field:=9, Criteria1:=">=mydate"
mydate = InputBox("Enter Month in MMM-YY format")
If mydate >= InputBox Then
If IsDate(mydate) Then
MsgBox "Continue the macro"
Else
MsgBox "You didn't enter a date"
End If
End If
End Su