Sub Pasqua()
Dim luna As Variant
luna = Array(14, 3, 24, 11, 31, 18, 8, 28, 16, 5, 25, 13, 2, 22, 10, 17,
7, 27)
anno = InputBox("Immettere l'anno")
resto = anno Mod 19
xgiorno = luna(resto)
If xgiorno > 21 Then xmese = 3 Else xmese = 4
xdata = DateSerial(anno, xmese, xgiorno)
giosett = Weekday(xdata) - 1
resto2 = giosett Mod 7
Dompasquale = xdata + 7 - resto2
MsgBox Dompasquale, , "La Pasqua viene in data..."
End Sub
--
Notebook Acer 1652: - CPU: Centrino 1,7 GHz - RAM: 1 GB DD2 - HD: 100 GB
E-IDE - SO: Windows XP Home SP3 OEM + aggiornamenti
> Ho una macro che mi permette di visualizzare quando ricade la Pasqua in
> un determinato anno e funziona bene con Excel 2010 ma non con Calc 3.2.1
In Calc non è necessaria una macro in quanto esiste la funzione nativa
DOMENICA.DI.PASQUA(Anno).
--
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Scarica "OpenOffice.org 3: Soluzioni a raccolta", molto più di semplici
FAQ! http://it.openoffice.org/doc/manuali/
in Calc esiste la funzione
=DOMENICA.DI.PASQUA(anno)
digitala in una cella per avere la data della domenica di pasqua,
forse la macro diventa inutile ...
g
> in Calc esiste la funzione
>
> =DOMENICA.DI.PASQUA(anno)
>
> digitala in una cella per avere la data della domenica di pasqua,
> forse la macro diventa inutile ...
> g
perchè la funzione è invece utile?
> perchè la funzione è invece utile?
Dipende dai punti di vista. Così a naso direi che è utile se devi
calcolare la data di Pasqua, altrimenti è inutile :-)
> Come mai se provo con l'anno 2010 mi vengono visualizzate due date diverse?
> Con Calc, la Pasqua 2010 ricade il 4 Aprile 2010, mentre con Excel 2010
> ricade il 18 Aprile 2010 ?
> Chi è che sbaglia a fare i calcoli?
Sbaglia ma macro di Excel:
http://www.gmarts.org/index.php?go=413
> Quindi potrebbe essere considerato un "bug" di Excel ?
No, sicuramente ᅵ l'algoritmo usato nella macro che non ᅵ corretto.
--
news:it-alt.comp.software.openoffice : Il newsgroup dedicato a
OpenOffice.org, la suite open source di applicazioni per ufficio.
Scarica "OpenOffice.org 3: Soluzioni a raccolta", molto piᅵ di semplici
FAQ! http://it.openoffice.org/doc/manuali/
> E cosa bisognerebbe fare per "aggiornare" la data esatta della Pasqua
> con Excel?
Non saprei, l'algoritmo per calcolare la Pasqua non ᅵ banale e io non lo
conosco. Dovresti trovare un algoritmo funzionante, magari giᅵ
implementato in VBA, ma io non ne conosco e comunque siamo OT.
Qui
http://en.wikipedia.org/wiki/Computus
al paragrafo Gauss algorithm
Il calcolo della data della Pasqua e' FONDAMENTALE per determinare i
giorni festivi anno per anno.
Visto che il lunedi di Pasqua e' festivo e cambia di anno in anno...
senza contare pentecoste, corpus domini e ascensione, che in larga
parte di europa vengono tuttora festeggiate,
--
infatti dovrebbe essere [...] gruyère, che insomma
non è molto distante dal parmigiano.
-- Ruggine, in IHC
Cerca calendario con excel in google, . Anche io ho letto e cercato tanto
poi ho trovato una formula in Excel di poche parole che trova la data esatta
della PASQUA.
Ti assicuro che sorprendentemente č precisa.
Io l'ho usata per parecchio tempo ed ha sempre funzionato benissimo.
Purtroppo non la ricordo perchč dopo che sono passato a calc non ne ho piů
avuto bisogno.
Ciao
Ludo