Esta página está apenas no início. Vou atualizá-la regularmente. Se estiver à procura de uma fórmula, envie-me uma mensagem. Da sua parte, se tiver fórmulas inéditas, agradeço que mas dê a conhecer. Podem ser úteis para outras pessoas.
- ENT(x): parte inteira de x. ex:
ENT(12,4)=12 - x MOD y: resto da divisão de x por y. ex:
17 MOD 3 = 2
| Index | Fórmula |
|---|---|
| CG_JJ | Conversão de uma data do calendário gregoriano em dia juliano J = dia M = mês A = ano JJ = 367 * A - ENT(1,75 * (ENT((M + 9) / 12) + A )) + ENT(275 * M / 9) - ENT(0,75 * (1 + ENT(0,01 * (ENT((M - 9) / 7) + A)))) + J + 1721028,5 |
| CG_NBJ | Número de dias entre duas datas do calendário gregoriano Para cada uma das duas datas, calcular o valor Resultado e fazer a diferença entre esses dois valores. J = dia M = mês A = ano b = 365 * A c = 31 * (M - 1) se M = 1 ou M = 2 então d = 0 e = ENT ((A - 1)/4) h = ENT (0,75 * (ENT ((A - 1) / 100) + 1 )) se M > 2 então d = ENT(0,4 * M + 2,3) e= ENT (A/4) h = ENT (0,75 * (ENT (A/100) + 1 )) Resultado = J + b + c - d + e - h |
| CJ_JJ | Conversão de uma data do calendário juliano em dia juliano J = dia M = mês A = ano se A < 0 => JJ = ENT(365,25 * A - 0,75) + ENT(30,6001 * (M + 1)) + J + 1720994,5 se A>= 0 => JJ = ENT(365,25 * A) + ENT(30,6001 * (M + 1)) + J + 1720994,5 |
| CR | Regras de construção dos números romanos.
As letras usadas para construir os números (e datas) romanos são (sempre em maiúsculas):
I = 1; V = 5; X = 10; L = 50; C = 100; M = 1 000.
Uma letra com traço em cima tem o seu valor multiplicado por 1 000. Assim, <img src="/m/calendarios-saga/estudos-tematicos/as-formulas-de-calculo/vii_706_1.png«srcset=»/m/calendarios-saga/estudos-tematicos/as-formulas-de-calculo/vii_706_1.png 1x,
/m/calendarios-saga/estudos-tematicos/as-formulas-de-calculo/vii_706_3.png 1x«alt=»«class=»o-pic__img o-pic__img--ld o-pic__img--natural o-pic__img--inline"/> vale 7 000. Os números leem-se da esquerda para a direita em valores decrescentes: MCLII = 1000 + 100 + 50 + 2.
As letras podem repetir-se, exceto V, L e D.
Se uma letra tiver de ser repetida mais de quatro vezes, convém usar essa letra seguida da letra
«superior»: ex. IV (um subtraído de 5) em vez de IIII (ainda que, no romano antigo, se encontre IIII).
Para os milhares, a letra M repete-se tantas vezes quanto necessário. Exemplo: MMMMM = 5000.
Só os múltiplos e submúltiplos de dez podem servir de «subtrator»: I, X, C, etc. VL para 45 está errado. IX para 9 está
correto.
O «subtrator» não pode ser duplicado. VIII para 8 está correto; IIX para 8 está errado porque I está duplicado.
Não se pode subtrair uma letra a outra letra maior do que a primeira em mais de um décimo do seu valor.
Por outras palavras, uma letra só pode ser subtraída da sua «seguinte» na ordem das letras: I de V, V de X, X de L... MIM
para 1999 está, portanto, errado.
|
| CS | Ciclo solar. Também aparece no calendário dos correios A = ano S = ((A + 8) MOD 28) + 1 |
| EG | Epacta gregoriana. Também aparece no calendário dos correios A = ano C = dois primeiros algarismos do ano Eg = (11 * (A mod 19) + 8 - C + ENT(C / 4) + ENT((8 * C + 13) / 25)) MOD 30 Se Eg = 25 e N>11, Eg = 25 (a negrito) |
| EJ | Epacta juliana Ej = (N + 10(N-1)) MOD 30 ; N = número áureo (ver NO) |
| FETES | P = data da PÁSCOA ASCENSÃO = P + 39 dias PENTECOSTES = P + 49 dias |
| JJ_CG | Conversão do dia juliano em data do calendário gregoriano JJ = parte inteira do dia juliano a = JJ + 32045 b= ENT(4 * (a + 36524) / 146097) - 1 c = a - ENT(146097 * b / 4) d = ENT(4 * (c + 365) / 1461) - 1 e = c - ENT(1461 * d / 4) m = ENT((5 * (e - 1) + 2) / 153) Resultados: dia = e - ENT(((153 * m) + 2) / 5) mês = m + 3 - 12 * ENT(m / 10) ano = (100 * b) - 4800 + ENT(m / 10) + d |
| JJ_CJ | Conversão do dia juliano em data do calendário juliano JJ = parte inteira do dia juliano b = 0 c = JJ + 32083 d = ENT(4 * (c + 365) / 1461) - 1 e = c - ENT(1461 * d / 4) m = ENT((5 * (e - 1) + 2) / 153) Resultados: dia = e - ENT((153 * m) + 2 / 5) mês = m + 3 - 12 * ENT(m / 10) ano = 100 * b - 4800 + ENT(m / 10) + d |
| LDG | Letra dominical no calendário gregoriano. Também aparece no calendário dos correios C = dois primeiros algarismos do ano U = dois últimos algarismos do ano Lg = ((2C - U - ENT(U /4) - ENT(C/4)) MOD 7) + 1 resultado: 1=A ; 2=B... |
| LDJ | Letra dominical no calendário juliano. S = ciclo solar do ano (ver CS) Lj = ((6 - S - (ENT(S - 1) / 4)) MOD 7) + 1 resultado: 1=A ; 2 =B.... |
| NO | Número áureo. Também aparece no calendário dos correios A = ano N= (A MOD 19) + 1 |
| PQ1 | Data da Páscoa a partir da epacta gregoriana e da letra dominical gregoriana E = epacta (ver EG) L = letra dominical (ver EG) se E = 24 e L = 4 => E = -5 se E = 25 e L = 3 => E = -4 se E > 23 => E = E - 30 P = 45 - E + ((E + L + 1) MOD 7) |
| PQ2 | Data da Páscoa no calendário juliano.
Procede-se por divisões sucessivas, conservando o resto e, eventualmente, o quociente.
A = ano
Resultados: n = mês (3 = março; 4 = abril)
Dia do mês da data da Páscoa = p +1
|
| PQ3 | Data da Páscoa no calendário gregoriano (a partir de 1583).
Procede-se por divisões sucessivas, conservando o resto e, eventualmente, o quociente.
A = ano
Resultados: n = mês (3 = março; 4 = abril)
Dia do mês da data da Páscoa = p +1
|
| HMS1 | Conversão de horas, minutos e segundos em horas decimais H = horas M = minutos S = segundos a = S / 60 b = (M + a) / 60 HD = H + b |
| HMS2 | Conversão de horas decimais em horas, minutos e segundos HD = hora decimal a = (parte decimal de HD * 60) minutos = parte inteira de a b = (parte decimal de a * 60) segundos = parte inteira de b horas = parte inteira de HD |
| JSEM1 | Encontrar o dia da semana a partir de uma data Seja a data J/M/SD (S = dois primeiros algarismos do ano - D = dois últimos algarismos do ano) O dia da semana JSEM será = J + 3M - ENT(3M/10) + 5S + ENT(S/4) + D + ENT(D/4) + C C = 3 para janeiro e fevereiro se o ano for bissexto C = 4 para janeiro e fevereiro se o ano não for bissexto C = 2 para abril C = 0 para dezembro C = 1 em todos os outros casos Tomar o resto de JSEM/7 O resultado é: sábado = 0 ; domingo = 1 ; segunda-feira = 2... Fonte: dicionário de matemática recreativa |
| JSEM2 | Encontrar o dia da semana a partir de um Dia Juliano (às 00h UT) Somar 1,5 ao JJ Dividir por 7 O resultado é: sábado = 0 ; domingo = 1 ; segunda-feira = 2... |
| OL_J | Encontrar o ano juliano a partir da olimpíada Seja n o número da olimpíada e p o número adicional (1.º, 2.º, 3.º, 4.º ano da n-ésima olimpíada) Período a.C.: Ano juliano = 776 - ((n - 1) X 4 + (p - 1)) Período d.C.: Ano juliano = (n - 1) X 4 + p - 776 |
| J_OL | Encontrar a olimpíada e o número adicional a partir do ano juliano Seja n o número das olimpíadas e p o número adicional (1.º, 2.º, 3.º, 4.º ano da n-ésima olimpíada) A = ano juliano Período a.C. : Se a parte decimal de (776-A)/4 = 0, p=1, n=(ENT(776 - A)/4)) +1 Se a parte decimal de (776-A)/4 = 25, p=2, n=(ENT(776 - A)/4)) +1 Se a parte decimal de (776-A)/4 = 50, p=3, n=(ENT(776 - A)/4)) +1 Se a parte decimal de (776-A)/4 = 75, p=4, n=(ENT(776 - A)/4)) +1 Período d.C. : Se a parte decimal de (776+A)/4 = 25, p=1, n=(ENT(776 +A)/4)) +1 Se a parte decimal de (776+A)/4 = 50, p=2, n=(ENT(776 +A)/4)) +1 Se a parte decimal de (776+A)/4 = 75, p=3, n=(ENT(776 +A)/4)) +1 Se a parte decimal de (776+A)/4 = 00, p=4, n=(ENT(776 +A)/4) ) |
| FÓRMULAS EXCEL | |
| EXC_AT | Duração do ano trópico para um dia juliano dado. Dia juliano em B1 Em B4: =(B1-2451545)/365250 Em B3: =365,2421905166-61,5607*(10^-6)*B4-68,4*(10^-9)*(B4^2)+263*(10^-9)*(B4^3)+3,2*(10^-9)*(B4^4) = duração do ano trópico. |
| EXC_CS | Ciclo solar nos calendários juliano e gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(ANNEE+8;28)+1 |
| EXC_EG | Epacta no calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(ET(MOD(11*MOD(ANNEE;19)+ 8-ENT(ANNEE/100)+ENT(ENT(ANNEE/100)/4)+ENT((8*ENT(ANNEE/100)+13)/25);30)=25;MOD(ANNEE;19)+1>11);"XXV"; MOD(11*MOD(ANNEE;19)+ 8-ENT(ANNEE/100)+ENT(ENT(ANNEE/100)/4)+ENT((8*ENT(ANNEE/100)+13)/25);30)) |
| EXC_EJ | Epacta no calendário juliano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(11*MOD(ANNEE;19)+8;30) |
| EXC_IR | Indição romana nos calendários juliano e gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(ANNEE+2;15)+1 |
| EXC_LDG | Letra dominical no calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(ENT(365,25*(ANNEE))+SI((ANNEE+1) |
| EXC_LDJ | Letra dominical no calendário juliano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(MOD(ANNEE;4)=0;CHOISIR(MOD(ENT(ANNEE/100)+2-(ANNEE-ENT(ANNEE/100)*100)-ENT((ANNEE -ENT(ANNEE/100)*100)/4);7)+1;"B";"C";"D";"E";"F";"G";"A");"")&CHOISIR(MOD(ENT(ANNEE/100)+2-(ANNEE -ENT(ANNEE/100)*100)-ENT((ANNEE-ENT(ANNEE/100)*100)/4);7)+1;"A";"B";"C";"D";"E";"F";"G") |
| EXC_NO | Número áureo nos calendários juliano e gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(ANNEE;19)+1 |
| EXC_PQ1CTRLG | Controlo do ano para a data da Páscoa no calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(ANNÉE |
| EXC_PQ1JG | Dia da data da Páscoa no calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)+ MOD(32+2*MOD(ENT(ANNÉE/100);4)+2*ENT(MOD(ANNÉE;100)/4) -MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)-MOD(MOD(ANNÉE;100);4);7)-7 * ENT((MOD(ANNÉE;19)+11*MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)+22* MOD(32+2*MOD(ENT(ANNÉE/100);4)+2*ENT(MOD(ANNÉE;100)/4) -MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)-MOD(MOD(ANNÉE;100);4);7))/451)+114;31)+1 |
| EXC_PQ1JJ | Dia da data da Páscoa solar no calendário juliano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =MOD(MOD(19*MOD(ANNEE;19)+15;30)+MOD(2*MOD(ANNEE;4)+4*MOD(ANNEE;7) -MOD(19*MOD(ANNEE;19)+15;30)+34;7)+114;31)+1 |
| EXC_PQ1MG | Mês da data da Páscoa no calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =ENT((MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)+ MOD(32+2*MOD(ENT(ANNÉE/100);4)+2*ENT(MOD(ANNÉE;100)/4) -MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)-MOD(MOD(ANNÉE;100);4);7)-7 * ENT((MOD(ANNÉE;19)+11*MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)+22* MOD(32+2*MOD(ENT(ANNÉE/100);4)+2*ENT(MOD(ANNÉE;100)/4) -MOD(19*MOD(ANNÉE;19)+ENT(ANNÉE/100)-ENT(ENT(ANNÉE/100)/4)-ENT((ENT(ANNÉE/100) -ENT((ENT(ANNÉE/100)+8)/25)+1)/3)+15;30)-MOD(MOD(ANNÉE;100);4);7))/451)+114)/31) |
| EXC_PQ1MJ | Mês da data da Páscoa no calendário juliano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =ENT((MOD(19*MOD(ANNEE;19)+15;30)+MOD(2*MOD(ANNEE;4)+4*MOD(ANNEE;7) -MOD(19*MOD(ANNEE;19)+15;30)+34;7)+114)/31) |
| EXC_PQ2 | data da Páscoa Ano em A1 Noutra célula (em formato data): =ARRONDI(DATE(A1;4;MOD(234-11*MOD(A1;19);30))/7;)*7-6 |
| EXC_SJJ | Dia da semana a partir do dia juliano. Obrigado a Daniel LACROZE-MARTY Nomear JJ a célula que contém o dia juliano =CHOISIR(MOD(JJ+1,5;7)+1;"domingo";"segunda-feira";"terça-feira";"quarta-feira";"quinta-feira";"sexta-feira";"sábado") |
| EXC_NBJJ | Número de dias no ano para o calendário juliano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(MOD(ANNEE ;4)=0 ;366 ;365) |
| EXC_NBJG | Número de dias no ano para o calendário gregoriano. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano =SI(MOD(ANNEE ;400)=0 ;366 ;SI(MOD(ANNEE ;100)=0 ;365 ;SI(MOD(ANNEE ;4)=0 ;366 ;365))) |
| EXC_DTJJ | Obter a data a partir do dia juliano. Obrigado a Daniel LACROZE-MARTY Nomear JJ a célula que contém o dia juliano. Nomear outras células JOUR, MOIS, ANNEE, HEURES, MINUTES, SECONDES. Na célula JOUR: =SI(ENT(JJ+0,5) ENT(JJ+0,5)+1+ENT((ENT(JJ+0,5)-1867216,25)/36524,25)-ENT(ENT((ENT(JJ+0,5)-1867216,25)/36524,25)/4))+1524 -ENT(365,25*ENT((SI(ENT(JJ+0,5) ENT(JJ+0,5);ENT(JJ+0,5)+1+ENT((ENT(JJ+0,5)-1867216,25)/36524,25)-ENT(ENT((ENT(JJ+0,5) -1867216,25)/36524,25)/4))+1524-122,1)/365,25)))/30,6001)) Na célula MOIS: =SI(ENT((SI(ENT(JJ+0,5) Na célula ANNEE: =SI(MOIS>2,5;ENT((SI(ENT(JJ+0,5) +ENT((ENT(JJ+0,5)-1867216,25)/36524,25)-ENT(ENT((ENT(JJ+0,5)-1867216,25)/36524,25)/4))+1524-122,1) /365,25)-4715) Na célula HEURES: =ENT((JJ+0,5-ENT(JJ+0,5))*24) Na célula MINUTES: =ENT((JJ+0,5-ENT(JJ+0,5))*1440-ENT(HEURES*60)) Na célula SECONDES: =(JJ+0,5-ENT(JJ+0,5))*86400-HEURES*3600-MINUTES*60 |
| EXC_SUNJJ | Obter o dia juliano a partir de uma posição do Sol. Obrigado a Daniel LACROZE-MARTY Nomear ANNEE a célula que contém o ano e POSITION a célula que contém a posição do Sol (em graus decimais de 0 a 360). Nomear outras células JJ1, T1, M1, JJ2, T2, M2, JJ3, T3, M3, JJ4, T4, M4, JJ5, T5, M5, JJ. Para obter solstícios e equinócios, em POSITION usar os valores 0, 90, 180 ou 270 Na célula JJ1: =(ANNEE+POSITION/360)*365,2422+1721141,3 Na célula T1: =(JJ1-2415020)/36525 Na célula M1: =6,256583522+628,301945727*T1-0,000002618*T1*T1-0,000000058*T1*T1*T1 Na célula JJ2: =JJ1+58*SIN(POSITION/180*PI()-(4,88162797+628,331950904 *T1 +0,00000528*T1*T1+(0,033500897-0,000083584*T1-0,000000244*T1*T1) *SIN(M1) +(0,000350706-0,000001745*T1)*SIN(2*M1)+0,000005114*SIN(3*M1)-0,0000993092-0,000083601*SIN(4,523544355 -33,7571461*T1))) Na célula T2: =(JJ2-2415020)/36525 Na célula M2: =6,256583522+628,301945727*T2-0,000002618*T2*T2-0,000000058*T2*T2*T2 Na célula JJ3: =JJ2+58*SIN(POSITION/180*PI()-(4,88162797+628,331950904 *T2 +0,00000528*T2*T2+(0,033500897-0,000083584*T2-0,000000244*T2*T2) *SIN(M2) +(0,000350706-0,000001745*T2)*SIN(2*M2)+0,000005114*SIN(3*M2)-0,0000993092-0,000083601 *SIN(4,523544355-33,7571461*T2))) Na célula T3: =(JJ3-2415020)/36525 Na célula M3: =6,256583522+628,301945727*T3-0,000002618*T3*T3-0,000000058*T3*T3*T3 Na célula JJ4: =JJ3+58*SIN(POSITION/180*PI()-(4,88162797+628,331950904 *T3 +0,00000528*T3*T3+(0,033500897-0,000083584*T3-0,000000244*T3*T3 )*SIN(M3) +(0,000350706-0,000001745*T3)*SIN(2*M3)+0,000005114*SIN(3*M3)-0,0000993092-0,000083601 *SIN(4,523544355-33,7571461*T3))) Na célula T4: =(JJ4-2415020)/36525 Na célula M4: =6,256583522+628,301945727*T4-0,000002618*T4*T4-0,000000058*T4*T4*T4 Na célula JJ5: =JJ4+58*SIN(POSITION/180*PI()-(4,88162797+628,331950904 *T4 +0,00000528*T4*T4+(0,033500897-0,000083584*T4-0,000000244*T4*T4) *SIN(M4) +(0,000350706-0,000001745*T4)*SIN(2*M4)+0,000005114*SIN(3*M4)-0,0000993092-0,000083601 *SIN(4,523544355-33,7571461*T4))) Na célula T5: =(JJ5-2415020)/36525 Na célula M5: =6,256583522+628,301945727*T5-0,000002618*T5*T5-0,000000058*T5*T5*T5 Na célula JJ (resultado... ufa!!): =JJ5+58*SIN(POSITION/180*PI()-(4,88162797+628,331950904*T5 + 0,00000528*T5*T5+(0,033500897-0,000083584*T5-0,000000244*T5*T5) *SIN(M5) +(0,000350706-0,000001745*T5)*SIN(2*M5)+0,000005114*SIN(3*M5)-0,0000993092-0,000083601 *SIN(4,523544355-33,7571461*T5))) |
| XC_J_JG | Cálculo do dia juliano a partir de data e hora (juliano ou gregoriano). Obrigado a Daniel LACROZE-MARTY Nomear JOUR, MOIS, ANNEE, HEURES, MINUTES, SECONDES as células que vão receber os dados correspondentes. Dia juliano (0 h) : =ENT(365,25*SI(MOIS +13;MOIS+1)))+JOUR+1720994,5+SI(ANNÉE*10000+MOIS*100+JOUR 0;2-ENT(SI(MOIS Dia juliano (h mn s) : =ENT(365,25*SI(MOIS +13;MOIS+1)))+JOUR+HEURES/24+MINUTES/1440+SECONDES/86400 +1720994,5 +SI(ANNÉE*10000+MOIS*100+JOUR |
| XC_NUMJ_JG | Cálculo do número de dia no ano a partir de uma data (juliano ou gregoriano). Obrigado a Nicolas DELONG Nomear JOUR, MOIS, ANNEE as células que vão receber os dados correspondentes. Número do dia =ENT(275*MOIS/9)-SI(SI(ANNEE0;MOD(ANNEE;400)=0)));1;2)*ENT((MOIS+9)/12)+JOUR-30 |
| XC_GREC_BIS | Cálculo dos anos bissextos no
calendário grego moderno
que não segue as regras gregorianas. Obrigado novamente a Daniel LACROZE-MARTY Nomear JOUR, MOIS, ANNEE as células que vão receber os dados correspondentes. Nomear ANNEE a célula que contém o ano grego. Numa outra célula, inserir a fórmula =SI(OU(MOD(ANNEE;900)=200;MOD(ANNEE;900)=600);366;SI(MOD(ANNEE;100)=0;365;SI(MOD(ANNEE;4)=0;366;365))) que dará o número de dias desse ano. |
| XC_NL | Mais uma série de fórmulas de Daniel LACROZE-MARTY. Vale ouro, de tão rara que é. Permite obter o dia juliano da lua nova mais próxima de uma data gregoriana dada. Combinada com EXC_DTJJ, converte esse dia juliano em data do calendário gregoriano. Merece bem o esforço de nomear algumas células. Chapéu, Daniel. Nomear, respetivamente, JOUR, MOIS, ANNEE as células que vão conter a data para a qual se quer conhecer a data da lua nova mais próxima Nomear outras células NLJJa, NLk, NLT, NLJJm, NLM, NLM1, NLF, JJ. JJ mostrará o Dia Juliano da lua nova mais próxima da nossa data inicial. Estas diferentes células nomeadas vão conter, respetivamente, as fórmulas seguintes: Fórmula na célula nomeada NLJJa: =ENT(275*MOIS/9)-SI(OU(ET(ANNEE1582;ANNEE/4-ENT(ANNEE/4)=0;ANNEE/400-ENT(ANNEE/400)0));1;2)*ENT((MOIS+9)/12)+JOUR-30 Fórmula na célula nomeada NLk: =ARRONDI((ANNEE+NLJJa/365,25-1900)*12,3685;0) Fórmula na célula nomeada NLT: =NLk/1236,85 Fórmula na célula nomeada NLJJm: =2415020,75933+29,53058868*NLk+0,0001178*NLT*NLT -0,000000155*NLT*NLT*NLT+0,00033*SIN(2,9070204+2,31901898*NLT-0,0001601*NLT*NLT) Fórmula na célula nomeada NLM: =6,26964504+0,50798429*NLk-0,0000005812*NLT*NLT -0,0000000606*NLT*NLT*NLT Fórmula na célula nomeada NLM1: =5,34114908+6,73377553*NLk+0,00018728*NLT*NLT+0,0000002157*NLT*NLT*NLT Fórmula na célula nomeada NLF: =0,3716923+6,81848663*NLk-0,000028847*NLT*NLT-0,00000004171*NLT*NLT*NLT Fórmula na célula nomeada JJ: =NLJJm+0,0021*SIN(2*NLM)-0,0004*SIN(3*NLM1)-0,0004*SIN(2*NLF-NLM) - 0,0006*SIN(2*NLF+NLM1)+(0,1734-0,000393*NLT)*SIN(NLM) -0,4068*SIN(NLM1)+0,0161*SIN(2*NLM1)+0,0104*SIN(NLF*2)- 0,0051*SIN(NLM+NLM1)-0,0074*SIN(NLM -NLM1)+0,0004*SIN(2*NLF+NLM)+0,001*SIN(2*NLF-NLM1)+0,0005*SIN(NLM+2*NLM1) Para obter a data da lua cheia em vez da lua nova, somar 0,5 a NLk |
| XC_SUNLC | Horas de nascer e pôr do Sol para um dia determinado 1) Começar por copiar e colar, num módulo VBA, as funções que se encontram aqui lembrete do procedimento: copiar todas as fórmulas de uma só vez. No Excel, abrir o editor VB com o atalho Alt+F11 No menu INSERIR do editor, clicar em MÓDULO Colar as funções nesse módulo Voltar para a folha Excel 2) Em três células, introduzir o dia, o mês e o ano (ex.: 10 em A1 ; 07 em A2 ; 2005 em A3) Em outras duas células, introduzir a longitude e a latitude do local. As longitudes Oeste são negativas; os valores são graus e minutos em forma decimal. Por exemplo, para Paris, colocar em B1 o valor 48,87 (latitude 48°52) e em B2 o valor 2,33 (longitude 2°20 E) 3) Noutra célula (D1, por exemplo), chamar a função personalizada LEVER e apontar para as células corretas das diferentes variáveis pedidas. O que dará, no nosso exemplo, =lever(B1;B2;A1;A2;A3) Definir a célula D1 no formato HORA, tipo 13:30 4) Fazer o mesmo que em 3) para a função COUCHER noutra célula. A fórmula da célula será, portanto =coucher(B1;B2;A1;A2;A3) |
