Malcolm Nixon wrote: > On Tue, 24 Jul 2007 20:25:05 +0100, "Ron Jones" > <[EMAIL PROTECTED]> wrote: > > >> >> Public Function EasterDate(Yr As Integer) As Date >> >> Dim d As Integer >> d = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21 >> EasterDate = DateSerial(Yr, 3, 1) + d + (d > 48) + 6 - ((Yr + Yr \ 4 >> + _ d + (d > 48) + 1) Mod 7) >> >> End Function > > What is that VB - urggghhh > Can we have it as a javascript, PHP and Spreadsheet form too > please ;-)
If you use MS office then you are stuck with VB. You could probably use the VB in Excel - since the macro language since Excel97 has been VB. or you could make a simple(?!?) Access form with the VB triggered as an event as you enter a year. Ron Jones Process Safety & Development Specialist Don't repeat history, unreported chemical lab/plant near misses at http://www.crhf.org.uk Only two things are certain: The universe and human stupidity; and I'm not certain about the universe. ~ Albert Einstein
