View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
FSt1 FSt1 is offline
external usenet poster
 
Posts: 3,942
Default VBA script question

hi
this should get you going. i didn't put all the days in the macro but you
can add what days you require. also you may need to adjust the taget cell.

Sub selectthecase()
Dim r As Range
Set r = Range("A1")
If IsEmpty(r) Then 'in case cell is empty
MsgBox "need imput"
Exit Sub
End If

Select Case r
Case Is = "Monday"
Call mondaymacro
Case Is = "Tuesday"
Call Tuesdaymacro
Case Is = "wednesday"
Call Wednesdaymacro
Case Else
MsgBox "on your own here?"
End Select

End Sub

regards
FSt1

"Howard" wrote:

I need a short VBA script that will check a specific cell on a worksheet for
the day of the week (from a drop-down menu) and then run the required macro
(one for each day of the week). Any ideas
Thanks
--
Howard