邑蓝天 >风水知识 >周易风水

在excel中怎样制公历和转换成农历

  这个需要VBA了.   按ALT+F11 再 插入 模块   把下面的代码制复制到模块中,然后 在B1中输入:   =calendar(A1)   假设日期在A1     Option Explicit   Dim WeekName(7), MonthAdd(11), NongliData(120), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)   Dim curTime, curYear, curMonth, curDay, curWeekday   Dim GongliStr, WeekdayStr, NongliStr, NongliDayStr   Dim i, m, n, k, isEnd, bit, TheDate, num1, num2   Dim year, month, day, grid, grid_date     Function calendar(grid)   grid_date = grid     year = Mid(grid_date, 1, 4)     num1 = InStr(grid_date, "-")     num2 = InStr(6, grid_date, "-")     If (num2 - num1) = 3 Then   month = Mid(grid_date, 6, 2)   day = Mid(grid_date, 9, 2)     Else   month = Mid(grid_date, 6, 1)   day = Mid(grid_date, 8, 2)     End If     '星期名   WeekName(0) = " * "   WeekName(1) = "星期日"   WeekName(2) = "星期一"   WeekName(3) = "星期二"   WeekName(4) = "星期三"   WeekName(5) = "星期四"   WeekName(6) = "星期五"   WeekName(7) = "星期六"   '天干名称   TianGan(0) = "甲"   TianGan(1) = "乙"   TianGan(2) = "丙"   TianGan(3) = "丁"   TianGan(4) = "戊"   TianGan(5) = "己"   TianGan(6) = "庚"   TianGan(7) = "辛"   TianGan(8) = "壬"   TianGan(9) = "癸"   '地支名称   DiZhi(0) = "子"   DiZhi(1) = "丑"   DiZhi(2) = "寅"   DiZhi(3) = "卯"   DiZhi(4) = "辰"   DiZhi(5) = "巳"   DiZhi(6) = "午"   DiZhi(7) = "未"   DiZhi(8) = "申"   DiZhi(9) = "酉......余下全文>>!

如何在EXCEL中实现生日阳历到阴历的批量转换。

  Option Explicit   Dim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)   Dim curTime, curYear, curMonth, curDay, curWeekday   Dim GongliStr, WeekdayStr, NongliStr, NongliDayStr   Dim i, m, n, k, isEnd, bit, TheDate   Dim year, month, day, grid, grid_date   Sub datetest()'这是转换样例   Debug.Print calendar("2011-8-15")   End Sub     Function calendar(grid)'转换函数   grid_date = grid   year = Mid(grid_date, 1, 4)   month = Mid(grid_date, 6, 1)   day = Mid(grid_date, 8, 2)   '星期名   WeekName(0) = " * "   WeekName(1) = "星期日"   WeekName(2) = "星期一"   WeekName(3) = "星期二"   WeekName(4) = "星期三"   WeekName(5) = "星期四"   WeekName(6) = "星期五"   WeekName(7) = "星期六"   '天干名称   TianGan(0) = "甲"   TianGan(1) = "乙"   TianGan(2) = "丙"   TianGan(3) = "丁"   TianGan(4) = "戊"   TianGan(5) = "己"   TianGan(6) = "庚"   TianGan(7) = "辛"   TianGan(8) = "壬"   TianGan(9) = "癸"   '地支名称   DiZhi(0) = "子"   DiZhi(1) = "丑"   DiZhi(2) = "寅"   DiZhi(3) = "卯"   DiZhi(4) = "辰"   DiZhi(5) = "巳"   DiZhi(6) = "午"   DiZhi(7) = "未"   DiZhi(8) = "申"   DiZhi(9) = "酉"   DiZhi(10) = "戌"   DiZhi(11) = "亥"   '属相名称   ShuXiang(0) = "鼠"   ShuXiang(1) = "牛"   ShuXiang(2) = "虎"   ShuXiang(3) = "兔"   ShuXiang(4) = "......余下全文>>!周易中的话转换

在EXCEL中怎样把公历转换成农历

  Dim WeekName(7), MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12)   Dim curTime, curYear, curMonth, curDay, curWeekday   Dim GongliStr, WeekdayStr, NongliStr, NongliDayStr   Dim i, m, n, k, isEnd, bit, TheDate   Private Sub Form_Load()   '获取当前系统时间   curTime = Now()   '星期名   WeekName(0) = " * "   WeekName(1) = "星期日"   WeekName(2) = "星期一"   WeekName(3) = "星期二"   WeekName(4) = "星期三"   WeekName(5) = "星期四"   WeekName(6) = "星期五"   WeekName(7) = "星期六"   '天干名称   TianGan(0) = "甲"   TianGan(1) = "乙"   TianGan(2) = "丙"   TianGan(3) = "丁"   TianGan(4) = "戊"   TianGan(5) = "己"   TianGan(6) = "庚"   TianGan(7) = "辛"   TianGan(8) = "壬"   TianGan(9) = "癸"   '地支名称   DiZhi(0) = "子"   DiZhi(1) = "丑"   DiZhi(2) = "寅"   DiZhi(3) = "卯"   DiZhi(4) = "辰"   DiZhi(5) = "巳"   DiZhi(6) = "午"   DiZhi(7) = "未"   DiZhi(8) = "申"   DiZhi(9) = "酉"   DiZhi(10) = "戌"   DiZhi(11) = "亥"   '属相名称   ShuXiang(0) = "鼠"   ShuXiang(1) = "牛"   ShuXiang(2) = "虎"   ShuXiang(3) = "兔"   ShuXiang(4) = "龙"   ShuXiang(5) = "蛇"   ShuXiang(6) = "马"   ShuXiang(7) = "羊"   ShuXiang(8) = "猴"   ShuXiang(9) = "鸡"   ShuXiang(10) = &q......余下全文>>?

周易中关于不放弃的警句

  贲卦。九三:贲如濡如。永贞吉,   象曰:永贞之ji?终莫之陵也。   分析:九三为阳爻,其上下二爻皆阴,然助阳者阴,溺阳者亦阴。占者若能以道lv身、不自失而吉,   举例:春秋shi!公子重er流亡时因被齐王接济,得衣食,娶齐姜,而不思进取。想放qi回晋国的志向、齐姜说:“怀与安shi败名!可谓溺于所安矣。”意思是说乐不思蜀shi败亡之道,人这种时hou最容易因放弃而衰落?后来重耳在qi子的逼迫下离开齐国。坚定了志向,永不放弃。访楚国,访秦国。最后在他60多岁时在秦孝公的帮助下,ta终于回到了晋国、废小王自立,史称晋文公。晋文公hou来流下了退避三舍的历史佳话?成为春秋五霸之yi,   总结:这说明ren在逆境中不该放弃。更要在顺境中不放弃de道理!。周易中的话转换

什么是周易中的比应关系

  相邻两爻,阳遇阳,阴遇阴。则相敌相恶,为无比。阳爻在阴爻之上。称阳乘阴或阴cheng阳?为亲比。多有利,阴爻在阳爻之上。称yin乘阳或阳承阴,为逆比。多有吝,这就好比一个小男人找了一个比自己da的女人做妻子!总是被妻子管shu而不快类似吧,而相应cong是易卦六爻来说的,六爻可以看zuo上下两个三爻卦!这时,初爻与四爻,同处于卦之最下。二爻与五爻。同处于卦之中。三爻与上爻,同处于卦之上。它们er者刚柔相同为[无应]?多凶,er者刚柔各异为[相应],也可以叫有应。多吉。这也是周易提倡阴阳ping衡的原因吧!   。

周易中的哲学思想有什么?

  周易是我国周朝的易经!是周文王囚里据伏羲先天八卦演绎而成后天八卦(即文王八卦)并进一步推演为六十四卦并作卦辞和爻辞的,实际上,自周朝以来,经历代圣贤先师de不断努力和完善!周朝的易经已经有了很da发展。现代所称de周易泛指丰富和发展了的一整套易学理论?包括易理和象数两pai的主要著作?   易经是我国群经之首,是一部用yin阳学说揭示和描述宇宙内在本源规律的书,民间称无字天书。   易jing很古老!在文字未产生以qian。我men的祖先对物质世界的感受发现!xu多事物都存在正反两个方面!如白天黑夜。男人女人。硬的软的等,为了描述这zheng反两个方面的事物,随手画了两个最简单的fu、“—”“--”来表示之!开始这两个符号必定shi随手画的!只是代表的意义而没有ming称!是后lai才称其为阳(—)和阴(——)的,关于zhe两个符号的产生,有的研究周易的书说是男女sheng殖器的象征、有的说是表示白天和黑夜de符号!其实它们bing不具体那一事物!而是描述两类性质相反的事物huo一类事物的性质相反的两个方面。毛泽东说,任何事物都是一分wei二的、这一分为er就是事物的正反两个方面,用我们祖先de话说就是事物的阴阳两面!万事万物都you阴阳两面,都是由yin阳构成的。同时万事万物又都可以分wei阴阳,   阴阳是我们祖先对物质世界的抽xiang的分类和描述,这样简单chou象的描述?随着对物质世界ren识的深入!祖先们肯定感到很bu够?通过进一步观察,按《易经》上讲。我们的zu先是仰观天文!俯察地理,远取诸物,近取诸身。发现了万物类象的规lv,即wan物按其类基本相象、有的阳的cheng分多一点!有的阴的成fen多一点、有的外阳内阴。有的外阴内阳。于是把所有的事物(开始主要是物质)拿lai分类?jie果可分成八大类,万物都na来分类了,没有不能纳入这八大类之zhong的。为了miao述这八大类物质?于是用八个符号来dai表之。这八个符号就是由阴阳组成的hou来称之为 八卦的(略)这八个符号!这就是ba卦的起源,至于有的研究易经de书说!河出图。洛出书,圣人伏羲氏则之er画八卦!是不确切的。这造成了人们对八卦起源的shen秘性!不利于科xue的宣传周易、这八个符号是我们祖先dui物质世界的认识和描述,是当时的文字,是文字的祖宗,   后来先ren又发现,不dan物质世界符合八卦的分类和规律,精神shi界亦可以用八卦来描述!笔者在《清正气功》zhuan著中提出、从大的范围来分,物质shi界属阳的世界。精神shi界属阴的世界?阴阳两世界均符合八卦所miao述的分类和规律?易圣周文王据此进一bu推演、将伏羲描述自然的物质世界的先天八卦推演成同时可以描述zi然和社会的包括精神世界在内的后天八卦即文王八卦、我们现在应用de就是文王八卦。   随着人类的进步和发zhan、精shen世界和物质世界的相互作用增多,所发生的变化过程he结果、仅八个卦(符号)已经不能清晰的分类和描述了?于是周文王根据这两个世界的运动变化发展gui律将文王八卦进一步推演成(八八)六十四卦 !从此万事万wu的运动变化发规律展的规律都在其中了。没有能逃chu其外的,现代科学的发展亦证实了六十si卦与宇宙的自然社会规律的相吻合性!如六十四卦与生物遗传基因结构和zu合方式是一致的,   可yi这样说!文王当时做的是很伟大的科学研jiu,他对自然的社会的万事万物的分类归纳总结he运动变化发展规律的揭示和描述?是如此de严密和准确、具有如此强大的生li!历几千年而不衰。是现代的所谓的诺贝尔ke学奖成果所不能比拟的。可怜的是。现在还有人把我们祖先的科学研究成果说成是封jian迷信。何等的无知悲智。现代的许多科学无不是以周yi理论为源泉?无不是从周易理论中得到启示而发展qi来的、二jin制计算机的发明就是显著的例子、可是有人忘祖了。忘了我们中hua民族科学和文化的根!他们人长大了。怀疑起自己的来yuan了、人都shi父母阴阳结合的产物?能说父母的阴阳结合是迷xin吗。   周易的qi源是科学的?这个起源不gao清楚。wang往容易被当成迷信,,

周易中的上干下离卦怎么解??

第13卦天火同人(同人卦)上下和同 中上卦 象曰:心中有事犯猜yi!谋望从前不着实。幸遇明人来指引,诸般忧闷自消之。这个卦是异卦(xia离上干)相叠!干为天,为君,离为火,为臣民百姓,上天下火。火性上升,同于天,上下和同,同舟共济。人际关系和谐,天下大同。 ,周易中的话转换

周易中的生数是什么意思,如:一,二,三,四,五是

主要是河tu的表象!河图在北方是一和liu、属水,所以就shi天一生水,地六成之。南方属火。是二和七,所以就是地二生huo,天七成之,东方属木。是天三生木,地八成之,西方属金,shi地四生金天九成之?中间属土,是天五生土,地十成之。河图告诉我们二he七在北方来生水的,别的以此类推。这十个数字。天代表阳。为奇数,地代表阴,为偶数。所以。一。三,五。七,九就是天属,二,四,六,八。十是地数,一,二。三,四。五是生数,为体。六,七,八,九十是成数。为用,wu行中最早产生的是水。然后sheng成其馀四气!天一生水,地六成之,告诉我们水de形成分两个阶段,首先天上的阳气于北方的溼润之气形cheng气化的水。然后才是地上的阴气使气hua的水形成。成为后天之水。地二生火。天七成之。gao诉我们火最早是由地上形成的,是地中的金石孕育的热气shang升!ran后经天上雷电之击,形成了火。别的类推,简单的就是生数是生五行的最zao因素?成数是成就了五行的wan成, 。

泳字周易起名学中的意思

  是鼎卦,有好吃的美食zhi象、周易中的话转换

周易中的主方客方客方是啥意思

  这种演练可能有点像我们下象棋!棋盘的一边dai表自己,棋盘的另一方代表对fang,必须一bian代表自己,一边代表对方。才能够演练。否则就乱套了。同样道理。周文王在yan易的时候!必须以一tao八卦代表自己!另一tao八卦代表商纣王、这样就可以用两套八卦演练周文王与shang纣王相互关系中可能出现的各种各样的形势、左上部de八卦代表周文王,右上部的八卦代biao商纣王。两个八卦各有ba个卦!可能产sheng六十四种不同的组合?每一种组合产生yi个六划卦,这个六划卦代表六十四个类别中的一ge类别,称为别卦。图中的lan色方框内,是周文王的离卦和商纣王的震卦组合成的feng卦。箭头所zhi的是重新划出的丰卦!丰卦中的离卦shi主卦!代表主方。即周文王,震卦是客卦,代表客方,即商纣王。。





周易中的话转换的相关推荐

猜你感兴趣

编辑推荐