PplWare Mobile

Dicas do Microsoft Excel é ao Domingo…no Pplware – 14

                                    
                                

Este artigo tem mais de um ano


Autor: Pedro Pinto


  1. José Augusto says:

    Em resposta ao Easter Eggs segue uma sequência de fórmulas que dão como resultado o dia de Páscoa de um qualquer ano (do calendário gregoriano) usando o algoritmo de Algoritmo de Meeus/Jones/Butcher descrito na Wikipédia.
    Considere-se em B4 <– o Ano (2012)
    Calculem-se A2, B2, C2, … L2 usando as fórmulas
    A2 (17) <– =RESTO(B4;19)
    B2 (20) <– =INT(B4/100)
    C2 (12) <– =RESTO(B4;100)
    D2 (5) <– =INT(B2/4)
    E2 (0) <– =RESTO(B2;4)
    F2 (1) <– =INT((B2+8)/25)
    G2 (6) <– =INT((B2-F2+1)/3)
    H2 (17) <– =RESTO(19*A2+B2-D2-G2+15;30)
    I2 (3) <– =INT(C2/4)
    J2 (0) <– =RESTO(C2;4)
    K2 (0) <– =RESTO(32+2*E2+2*I2-H2-J2;7)
    L2 (0) <– =INT((A2+11*H2+22*K2)/451)
    Coloque-se agora em B5 a fórmula que dá o mês
    B5 (4) <– =INT((H2+K2-7*L2+114)/31)
    e em B6 a fórmula que dá o dia de páscoa
    B6 (8) <– =RESTO(H2+K2-7*L2+114;31)+1
    Resultado final em B7
    =B6 & " de " & TEXTO(DATA(B4;B5;1);"mmmm") & " de " & B4 &" é domingo de Páscoa"

    Bom resto de Domingo

  2. Rui João says:

    Boas,

    José Augusto, não é nenhum Easter Egg, mas é um “exercicio” muito interessante… 😀

    Obrigado

  3. paulo g. says:

    O LibreOffice não tem easter eggs, os que existiam no OpenOffice foram retirados. Assim não se pode jogar à guerra das estrelas na folha de cálculo…
    Para quem usa LibreOffice Calc faça da seguinte forma:
    DIA.SEMANA(Número; Tipo) – No número coloque a data que pretende em qualquer formato. ex: 01-11-1755 (dia do terramoto – não tente no excel). O tipo corresponde ao dia da semana que quer comece a contagem (se não o colocar começa no domingo).
    Para saber mais leia: http://help.libreoffice.org/Calc/WEEKDAY/pt
    Já agora aproveitem a dica: SE(DIA.SEMANA(A1;2)<6;"dia útil";"fim de semana").
    Quanto à função de texto para escrever os dias da semana por extenso façam simplesmente =TEXTO(B6;"dddd"), em que B6 é a célula que contém a data.

Deixe um comentário

O seu endereço de email não será publicado.

You may use these HTML tags and attributes: <a href="" title="" rel=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

*

Aviso: Todo e qualquer texto publicado na internet através deste sistema não reflete, necessariamente, a opinião deste site ou do(s) seu(s) autor(es). Os comentários publicados através deste sistema são de exclusiva e integral responsabilidade e autoria dos leitores que dele fizerem uso. A administração deste site reserva-se, desde já, no direito de excluir comentários e textos que julgar ofensivos, difamatórios, caluniosos, preconceituosos ou de alguma forma prejudiciais a terceiros. Textos de caráter promocional ou inseridos no sistema sem a devida identificação do seu autor (nome completo e endereço válido de email) também poderão ser excluídos.