View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Richard Richard is offline
external usenet poster
 
Posts: 709
Default worksheet funtion help

I understand that this goes in the vb code but I don't understand on how to
make it work. All my formulas for my holidays are in the form of Worksheet
Formulas on Sheet3, Column A. How would I add this formula to say Sheet3,
cell A26.
Public Function ThanksgivingDate(Yr As Integer) As Date
ThanksgivingDate = DateSerial(Yr, 11, 29 - _
WeekDay(DateSerial(Yr, 11, 1), vbFriday))
End Function
Thanks in advance!!!