¿Cómo convertir el calendario gregoriano a la fecha del calendario lunar en formato WPS?
Supongamos que la columna A es la fecha del calendario gregoriano y A1 es la fecha del calendario gregoriano. Ingresamos la fórmula en la celda B1: = texto (A1, "[$-130000] AAAA año M mes"; If ( len (- text (a1, "[$-130000]DD ") = 1, " Chu ", " "); " d "), baje para completar la conversión del calendario gregoriano al calendario lunar
Calendario solar de Excel a calendario lunar método 2.: Utilice la función MID de texto para lograr una conversión más completa.
La columna A sigue siendo el calendario gregoriano y B1 ingresa la fórmula:
=MID ("A, B, D, E, E ", MOD (texto (A1, "$-130000))-4, 10) 1); MID ("Zi Chou Mao Yin Chen Si Shen You Mediodía Xu Hai", mod (texto (a1, "[$-130000] e") -4, 12) 1, 1). "Año"; texto (a1, "[$-130000][DBM num 1]m mes d día")
Hazlo.
El parámetro [DBNum1] se agrega aquí, lo que significa que el valor se muestra en el formato chino de "uno, dos, tres. .."
Método tres del calendario solar al calendario lunar de Excel: use la función de texto ELEGIR AÑO MEDIO.
A1 es el calendario gregoriano, entrada B1:
= Elige(mod(año(A 1)-1900, 10) 1, "Gen", "Xin", "人", "Fantasma", "A", "B", "C" Elige(mod(año( A 1)-1900, 12) 1, "子", "Chou", "Yin", "Mao", "Chen", "Si", "武 Texto (a1, "[dbnum 1] [$-". 130000] año m mes"; IF(-TEXT(A1, "[$-130000]d ") lt; 11, "Chu ",");TEXT(A1,"[db num 1][$-130000]d "))
Puedes mostrar los primeros días aquí
Calendario gregoriano de Excel. Método 4 para convertir al calendario lunar: utiliza una función personalizada.
El la conversión del calendario gregoriano al calendario lunar en Excel se realiza utilizando las funciones integradas de Excel. Una desventaja es que la fórmula se puede simplificar si se utiliza una función definida por el usuario en la columna de fórmula. >Como se muestra en la figura siguiente, podemos ingresar la fórmula =Nongli (A1) en la columna c. La fórmula de la abreviatura del calendario lunar C1 en la columna c es: = derecha (b1, len (b1) -8).
El siguiente es el código relacionado con la función personalizada:
¿Público? ¿Función? Agricultura (opcional?XX_DATE?as?date)
¿Oscuro? MesAgregar(11),? NongliData(99),? Tallo celestial (9),? Di Zhi(11),? ¿Erudito (11)? NombreDía(30),? MonName(12)
¿Oscuro? ¿Curtis? ¿korniano? ¿Ke Yue? Kurdai
¿Oscuro? ¿Gong Lister? ¿NogliStr? ¿No es liDayStr
Dim? I,? metro,? norte,? k,? ¿Es el fin? Poco,? Fecha
Obtener la hora actual del sistema
¿Curtis? =?XX _Fecha
Nombre de la raíz celestial
Raíz celestial(0)? =?" A "
天干(1)? =?" B "
¿Tallos celestiales (2)? =?" C "
¿Tallos celestiales (3)? =?"Ding"
天干(4)? =?" E "
¿Tallos celestiales (5)? =?"Self"
¿Tallos celestiales (6)? =?"Moderno"
¿Raíz celestial (7)? =?"Nuevo"
¿Tallos celestiales (8)? =?"Ren"
¿Raíz celestial (9)? =?"Cubierta"
Nombre de las Ramas Terrestres
Di Zhi(0)? =?"Hijo"
Dizhi(1)? =?"Feo"
Di Zhi②? =?"Yin"
Di Zhi (3)? =?"Mao"
Di Zhi(4)? =?"Chen"
Di Zhi(5)? =?"思"
Di Zhi(6)? =?"Mediodía"
Di Zhi (7)? =?"No"
Di Zhi(8)? =?"Shen"
Di Zhi(9)? =?"Soltero"
Dizhi(10)? =?"Uh"
Dizhi(11)? =?"Mar"
Nombre de la constelación animal
¿Libro (0)? =?"Ratón"
¿Libro (1)? =?"Vaca"
¿Libro (2)? =?"Tigre"
¿Libro (3)? =?"Conejo"
¿Libro (4)? =?"Dragón"
¿Libro (5)? =?"Serpiente"
¿Libro (6)? =?"马"
Erudito (7)? =?"Ovejas"
Libros (8)? =?"Mono"
¿Libro (9)? =?"Pollo"
¿Libros (10)? =?"Perro"
¿Libro (11)? =?"Cerdo"
Nombre de fecha del calendario lunar
NombreDía(0)? =?"*"
NombreDía(1)? =?"Primer Grado"
NombreDía(2)? =?《El segundo día de la escuela secundaria》
DayName(3)? =?"El tercer día de la escuela secundaria"
DayName(4)? =?"Cuarto Grado"
NombreDía(5)? =?"El quinto día"
NombreDía(6)? =?"El sexto día"
NombreDía(7)? =?"Séptimo día"
NombreDía(8)? =?"El octavo día"
DayName(9)? =?"Noveno día"
NombreDía(10)? =?"El décimo día"
DayName(11)? =?"Undécimo"
NombreDía(12)? =?"Doce"
NombreDía(13)? =?《Trece》
NombreDía(14)? =?"Catorce"
NombreDía(15)? =?"Decimoquinto"
NombreDía(16)? =?"Dieciséis"
NombreDía(17)? =?"Diecisiete"
<p>NombreDía(18)? =?"Dieciocho"
NombreDía(19)? =?"Diecinueve"
NombreDía(20)? =?"Veinte"
NombreDía(21)? =?"Veintiuno"
NombreDía(22)? =?"Veintidós"
NombreDía(23)? =?"Veintitrés"
NombreDía(24)? =?"Veinticuatro"
NombreDía(25)? =?"Veinticinco"
NombreDía(26)? =?"Veintiséis"
NombreDía(27)? =?"Veintisiete"
NombreDía(28)? =?"Veintiocho"
NombreDía(29)? =?"Veintinueve"
NombreDía(30)? =?"Treinta"
Nombre del mes lunar
MonName(0)? =?"*"
MonName(1)? =?"Positivo"
MonName(2)? =?"二"
MonName(3)? =?"三"
MonName(4)? =?"四"
MonName(5)? =?"五"
MonName(6)? =?"六"
MonName(7)? =?"七"
MonName(8)? =?"八"
MonName(9)? =?"九"
MonName(10)? =?"十"
MonName(11)? =?"Once"
MonName(12)? =?"Wax"
¿Los primeros días de cada mes en el calendario gregoriano
MonthAdd(0)? =?0
MesAgregar(1)? =?31
Monhard②? =?59
MesAgregar(3)? =?90
Monhard ④? =?120
Montard(5)? =?151
Monhard (6)? =?181
Monhard (7)? =?212
MesAgregar(8)? =?243
Monthard(9)? =?273
MesAgregar(10)? =?304
MesAgregar(11)? =?334
Datos lunares
NongliData(0)? =?2635
NongliData(1)? =?333387
NongliData(2)? =?1701
NongliData(3)? =?1748
NongliData(4)? =?267701
NongliData(5)? =?694
NongliData(6)? =?2391
NongliData(7)? =?133423
NongliData(8)? =?1175
NongliData(9)? =?396438
NongliData(10)? =?3402
NongliData(11)? =?3749
NongliData(12)? =?331177
NongliData(13)? =?1453
NongliData(14)? =?694
NongliData(15)? =?201326
NongliData(16)? =?2
350
NongliData(17)? =?465197
NongliData(18)? =?3221
NongliData(19)? =?3402
NongliData(20)? =?400202
NongliData(21)? =?2901
NongliData(22)? =?1386
NongliData(23)? =?267611
NongliData(24)? =?605
NongliData(25)? =?2349
NongliData(26)? =?137515
NongliData(27)? =?2709
NongliData(28)? =?464533
NongliData(29)? =?1738
NongliData(30)? =?2901
NongliData(31)? =?330421
NongliData(32)? =?1242
NongliData(33)? =?2651
NongliData(34)? =?199255
NongliData(35)? =?1323
NongliData(36)? =?529706
NongliData(37)? =?3733
NongliData(38)? =?1706
NongliData(39)? =?398762
NongliData(40)? =?2741
NongliData(41)? =?1206
NongliData(42)? =?267438
NongliData(43)? =?2647
NongliData(44)? =?1318
NongliData(45)? =?204070
NongliData(46)? =?3477
NongliData(47)? =?461653
NongliData(48)? =?1386
NongliData(49)? =?2413
NongliData(50)? =?330077
NongliData(51)? =?1197
NongliData(52)? =?2637
NongliData(53)? =?268877
NongliData(54)? =?3365
NongliData(55)? =?531109
NongliData(56)? =?2900
NongliData(57)? =?2922
NongliData(58)? =?398042
NongliData(59)? =?2395
NongliData(60)? =?1179
NongliData(61)? =?267415
NongliData(62)? =?2635
NongliData(63)? =?661067
NongliData(64)? =?1701
NongliData(
65)? =?1748
NongliData(66)? =?398772
NongliData(67)? =?2742
NongliData(68)? =?2391
NongliData(69)? =?330031
NongliData(70)? =?1175
NongliData(71)? =?1611
NongliData(72)? =?200010
NongliData(73)? =?3749
NongliData(74)? =?527717
NongliData(75)? =?1452
NongliData(76)? =?2742
NongliData(77)? =?332397
NongliData(78)? =?2350
NongliData(79)? =?3222
NongliData(80)? =?268949
NongliData(81)? =?3402
NongliData(82)? =?3493
NongliData(83)? =?133973
NongliData(84)? =?1386
NongliData(85)? =?464219
NongliData(86)? =?605
NongliData(87)? =?2349
NongliData(88)? =?334123
NongliData(89)? =?2709
NongliData(90)? =?2890
NongliData(91)? =?267946
NongliData(92)? =?2773
NongliData(93)? =?592565
NongliData(94)? =?1210
NongliData(95)? =?2651
NongliData(96)? =?395863
NongliData(97)? =?1323
NongliData(98)? =?2707
NongliData(99)? =?265877
¿Generar el año, mes y día actual del calendario gregoriano? = = gt? Gong Lister
¿Kou Ernian? =?Año (fecha límite)
Ke Yue? =?Mes(hora)
curDía? =?Día (tiempo libre)
¿Gong Lister? =?korniano? ¿amperio? "Año"
¿Y si? (¿curMonth? lt? 10)? Entonces
¿Gong Lister? =?Gong Lister? ¿amperio? ¿"0"? ¿Ke Yue? ¿amperio? "Moon"
Otros
¿Gong Lister? =?Gong Lister? ¿amperio? ¿Ke Yue? ¿amperio? "Luna"
¿Fin? Si
¿Y si? (¿curDay? lt? 10)? Entonces
¿Gong Lister? =?Gong Lister? ¿amperio? ¿"0"? CurDay? ¿amperio? "日"
Otros
¿Gong Lister? =?Gong Lister? ¿amperio? CurDay? ¿amperio? "Día"
¿Fin? Si
Hora de inicio 1921 Número de días desde el 8 de febrero: 19
21-2-8 (el primer día del primer mes lunar).
¿Fecha? =?(curAño?-?1921)?*?365?Int((curAño?-?1921)?/?4)? ?MonthAdd(curMonth?-?1)?-?38
Si? ((¿curAño? ¿Mod? 4)?=?0?Entonces. ¿Ke Yue? gt? 2)?Entonces
¿Fecha? =?Fecha? ?1
¿Fin? Si
Calcula los tallos celestes, ramas terrestres, mes y día del calendario lunar.
¿Es fin? =?0
m? =?0
Hacer
¿Y si? (NongliData(m)?lt?4095)?Entonces
k? =?11
Otros
k? =?12
¿Fin? Si
n? =?k
Hacer
¿Y si? (n? lt? 0)? Entonces
¿Salir? ¿Terminan? ¿Si
obtiene el valor del enésimo bit binario
de NongliData(m)? =?NongliData(m)
¿Para qué? ¿I? =?1?¿Adónde ir? ¿norte? ¿paso? 1
bito? =?Int(bit?/?2)
Entonces
¿bit? =?Poco? Mod? 2
¿Y si? (¿fecha? lt=?29? ?bit)? Entonces
esEnd? =?1
¿Salir? ¿Terminan? Si
¿Fecha? =?Fecha? -?29?-?Una pequeña cantidad
n? =?n? -?1
Anillo
¿Y si? (isEnd?=?1)? Entonces
¿Salir? ¿Terminan? Si
m? =?metro? ?1
Huan
Korniano? =?1921? ?m
¿Ke Yue? =?k? -?¿norte? ?1
curDía? =?Fecha
¿Si? (k?=?12)? Entonces
¿Si? (curMonth?=?(Int(NongliData(m)?/?65536)? ?1))?Entonces
¿Ke Yue? =?1?-? Katsuki
¿Elsef? (curMonth? gt?(Int(NongliData(m)?/?65536)? ?1))?Entonces
¿Ke Yue? =?Ke Yue? -?1
¿Fin? Si
¿Finalizar? ¿Y si
generamos los signos zodiacales del calendario lunar? = = gt? No registrado
NongliStr? ="Calendario lunar"? ¿amperio? Tiangan (((curYear?-?4)?Mod?60)?Mod?10)?amp? Di Zhi(((curAño?-?4)?Mod?60)?Mod?12)?amp? "Año"
NongliStr? =?NongliStr? ¿amperio? "("?amp?书香(((curYear?-?4)?Mod?60)?Mod?12)?amp?")"
¿Generar mes y día lunar? = = gt? No liDayStr
¿Si? (curMonth?lt?1)? Entonces
NongliDayStr? =?Amperio de salto? MonName(-1?*?curMonth)
Otro
NongliDayStr? =?MonName(Luna Nueva)
¿Fin? Si
NongliDayStr? =?NongliDayStr? ¿amperio? "Luna"
NongliDayStr? =?NongliDayStr? ¿amperio? Nombre japonés
Nongli? =?NongliStr? ¿amperio? ¿Fin no liDayStr
? Función