文/江觅
　　结婚礼单记账是个传统记录方式，信息技术的发展给我们提供了一个更好的记录方式，有没有想过用Excel表格来做记账管理？
　　这个示例讲解用Excel表格来完成，传统婚礼记帐过程，模仿还有点不成熟，可以作为一个思路拿来学习之用。
　　登记过程已经实现，按照从右向左记录方式进行数据添加，其中可实现数据统计和人数统计。
　　没有做分类统计，不过也不是很难，有兴趣可能添加。
　　喜礼录入
　　类别以下拉框方式进行选择，姓名手动输入，礼金小写输入，大写自动生成。
　　其中，大写生成做了一段代码来实现，感觉不是很舒服，逻辑不是很优秀，用了较多IF语句。
　　大小写转换代码Private Sub ComboBox2_Change() If Not VBA.IsNumeric(Me.ComboBox2.Value) Then Me.TextBox2.Value = ＂＂: Exit Sub Dim x As Variant Dim xi As Integer x = VBA.Trim(Me.ComboBox2.Value) Dim i As Integer i = VBA.Len(Me.ComboBox2.Value)     For xi = 1 To i         If VBA.Left(x, 1) = 0 Then x = VBA.Replace(x, ＂0＂, ＂＂, 1)     Next xi Me.ComboBox2.Value = VBA.Trim(x) If Me.ComboBox2.Value = ＂＂ Then Exit Sub Dim r As Range, rSmall As Range, rBage As Range Set rSmall = ThisWorkbook.Worksheets(＂设置＂).Range(＂B2:B6＂) Set r = rSmall.Find(i) Dim xV As String If r Is Nothing Then Exit Sub Dim n01 As Integer, n02 As Integer, n03 As Integer     If i

揭秘泰国法事白龙王灵异事为何明星都陷入其中降头术？情降和合术师傅微信18328654747爱情锁心降回心转意法事桃花降财运降拆婚降拆散姻缘符拆散情侣降拆散术拆散小三降拆散法事拆婚法事微信18328654747诅咒小人惩罚诅咒降天师关于诅咒符打小人泰国情降和合术诅咒术降头术介绍情降和合术师傅微信18328654747爱情锁心降回心转意法事桃花降财运降拆婚降拆散姻缘符拆散情侣降拆散术拆散小三降拆散法事拆婚法事微信18328654747诅咒小人惩罚诅咒降天师泰国最恐怖的降头术，养小鬼下蛊毒无形之中杀人致死香港明星死于非命情降和合术爱情锁心降回心转意法事桃花降财运降师傅微信18328654747拆婚降拆散姻缘符拆散情侣降拆散术拆散小三降拆散法事拆婚法事微信18328654747诅咒小人惩罚诅咒降天师泰国最有效的降头术诅咒小三，渣男，明星养小鬼下蛊毒情降和合术爱情锁心降回心转意法事桃花降财运降师傅微信18328654747拆婚降拆散姻缘符拆散情侣降拆散术拆散小三降拆散法事拆婚法事微信18328654747诅咒小人惩罚诅咒降天师泰国最强的降头阿赞散窖给喜欢的男人下了情降给男朋友下了泰国情降情降和合术师傅微信gzzyk11爱情锁心降回心转意法事桃花降财运降拆婚降拆散姻缘符gzzyk11拆散情侣降拆散术拆散小三降拆散法事拆婚法事诅咒小人惩罚诅咒降天师惩罚符诅咒降诅咒符蛊有没有法术高人，可否解被小三下了降头术中的情降老公一下就回来了承接泰国法事微信18328654747情降法事招财降拆散情侣降补财库诅咒降整治恶人降情降蛊诅咒术诅咒小人术诅咒冤家蛊报复仇人蛊治人蛊和合降回心转意降爱情降斩桃花降招桃花降等诸多法事鬼降血咒阴阳降爱情降告诉你真实的泰国降头术鬼降血咒阴阳降爱情降告诉你真实的泰国降头术鬼降血咒阴阳降爱情降师傅微信（18328654747）告诉你真实的泰国降头术降（jiagraveng）头术是流传于东南亚地区的一种巫术。相传，即是中国四川云南一带苗疆的蛊术流传到东拆散降头的成功率泰国拆散降有什么感觉中了拆婚降会有什么表现泰国黑法情降师傅微信微信gzzyk11降头术蛊毒符灵婴超度咒巫毒旺旺护身符巫术毒娃娃拆散法事拆散符拆散术微信gzzyk11拆婚符拆散降拆散法事拆婚法事回心转意法事爱情降头术等诸五鬼如何用巫术诅咒小人惩罚小人的方法诅咒术和合术感情挽回降头术打小回心转意符分手复合挽回感情和合术泰国佛牌法事和合情感婚姻符咒微信18328654747降头术蛊毒术诅咒术泰国四面佛代拜许愿还愿佛牌求子事业运符神感情复合旺姻缘学业化解小人符防出轨同铁为什么会生锈（常见的防止生锈的方法有什么）在日常生活生产中都离不开钢铁材料，但是世界上每年因钢铁锈蚀而损失的钢铁数量十分巨大，造成的经济损失更是巨大。因此，如何保护钢铁防止其锈蚀意义重大。钢铁制品的腐蚀过程，是一个复杂的化不锈钢为什么不生锈（不锈钢在大气环境中永不生锈）不锈钢在一般人的印象中应当是永远不生锈，但家里的防盗网为什么一年二年后会生锈？质量是其中一个原因，当然也会有以次充好的可能性。但就算是最好的304也会出现生锈现象。因为不锈钢并不是