Between dates
Perfect. Thanks
"StephanieH" wrote:
My end user is prompted to enter a date by
MyValue = InputBox("Which month would you like to review? YYYY_MM", "Central
Analytics")
How can I specify to run a procedure if the date entered falls between
2004_01 and 2004_06?
MyValue = InputBox("Which month would you like to review? YYYY_MM", "Central
Analytics")
If MyValue = "2004_07" Then
Workbooks.Open Filename:="\\Fl-aejf-fs1\Data\Data\RECOVERY\EXLDATA\Loan
Recovery MIS\" & MyValue & "\Gross Placement Batch Tracks\Summary Data\" &
ListBox1.List(i) & " GBT Summary.xls"
Unload UserForm6
End If
If MyValue <= "2004_06" and = "2004_01 Then
Workbooks.Open Filename:= _
"\\Fl-aejf-fs1\Data\Data\RECOVERY\EXLDATA\Loan Recovery MIS\" &
MyValue & "\Gross Placement Batch Tracks\AttorneyBatchTrack " & MyValue &
".xls"
Unload UserForm6
End If
If MyValue <= "2003_12" Then
Msg = "CAP publishing began with 2004_01. Please see a member of the
CAP "
Msg = Msg & "Team for reporting prior to that date"
Title = "Central Analytics"
Config = vbOK
End If
End Sub
|