邢唷> xy  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwz{|}~Root Entry F盎t佬&fWorkbook4рETExtData2_VBA_PROJECT_CUR"&0墝葃とy  !"#$%&'()*+,-./0123456789:;<=>?@ACDEFGHIJKLMNOQSTUVWXYZ[\]^_`abcdefghijklmnpqrstvwyz{|}~ 0姉搗 罙.  罙.  罙. |>LL 梺zL#<r螾碦xB毑轖嚽F洄脻甁车*5x洄脻甁车*5r螾碦xB毑轖嚽ME(SLSS6" ZO\p111 Ba= ThisWorkbook=]W$8X@"1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*Arial1@*媅SO1*媅SO1*媅SO1 *媅SO10*媅SO1*媅SO1*媅SO1>*媅SO1h>*媅SO1,>*媅SO1*Arial1 *媅SO1 *媅SO1*媅SO1*媅SO1@*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1*媅SO1 *媅SO1>*媅SO1*媅SO1 *媅SO1*媅SO1*媅SO14*媅SO1 *媅SO1*媅SO1 *媅SO14*媅SO1<*媅SO1?*媅SO1>*媅SO1*媅SO1*媅SO1*媅SO""#,##0;""\-#,##0""#,##0;[Red]""\-#,##0""#,##0.00;""\-#,##0.00#""#,##0.00;[Red]""\-#,##0.007*2_ ""* #,##0_ ;_ ""* \-#,##0_ ;_ ""* "-"_ ;_ @_ .))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ ?,:_ ""* #,##0.00_ ;_ ""* \-#,##0.00_ ;_ ""* "-"??_ ;_ @_ 6+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ \$#,##0_);\(\$#,##0\)\$#,##0_);[Red]\(\$#,##0\) \$#,##0.00_);\(\$#,##0.00\)% \$#,##0.00_);[Red]\(\$#,##0.00\)50_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-=8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-4/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-,'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-                             -  *  .    /          ,  / !1 ! ! !$ !1 !4    P "P    #-                 $ %* &a     '  (攆f7 ) * +`     ,+ - . / / !1 ! !9 !6 !1 !5     0x @ @  ""@ @ !""@ @  !@ @ !!@ @  !@ @  !!@ @ 1 1@   1  1 1 1@ @  1<@ @ 1@ @   1 1@  11@  1  1 1 1 1  1|@ @ 7  1|@ @ ,  1@ @ 1@ @  1  1  1 1@ @   1  1  1@ @   1  1@ @  x 1 1 0x@ @  1  1 1 1|@ @ , 1@ @  1 !@ @ 1 1@ @  1@ @ 1@ @  1 0x@ @  ||N龤鐌-}  "-"_-;_}-}  "-"_-;_}-}  "-"_-;_}-}  "-"_-;_}-}  "-"_-;_}-}   "-"_-;_}-}   "-"_-;_}-}   "-"_-;_}-}   "-"_-;_}-}   "-"_-;_}-}  "-"_-;_}-}  "-"_-;_}A}  "-"_-;_ef-@_-_ }A}  "-"_-;_ef-@_-_ }A}  "-"_-;_ef-@_-_ }A}  "-"_-;_ef-@_-_ }A}  "-"_-;_ef-@_-_ }A}  "-"_-;_ef -@_-_ }-}  "-"_-;_}A}  "-"_-;_蘈-@_-_ }A}  "-"_-;_蘈-@_-_ }-}  "-"_-;_}A}  "-"_-;_蘈-@_-_ }-}  "-"_-;_}-}  "-"_-;_}A}  "-"_-;_23-@_-_ }A}  "-"_-;_23-@_-_ }A}  "-"_-;_23-@_-_ }A}   "-"_-;_23-@_-_ }A}!  "-"_-;_23 -@_-_ }-}%?-;_}A}( ?-;_俏-@_-_ }-}) ?-;_}-}* ?-;_}-}+ ?-;_}-}, ?-;_}-}/ ?-;_}-}1 ?-;_}(}3  ?-;_}A}4 a?-;_骑-@_-_ }-}5 ?-;_}}}8 鷠?-;_-@_-_   }}9 ?-;_ゥ-@_-_ ??? ??? ??? ???}-}: ?-;_}-}; ?-;_}A}< 鷠?-;_-@_-_ }A}? 渆?-;_霚-@_-_ }}}@ ????-;_???-@_-_ ??? ??? ???}}A ??v?-;_虣-@_-_    }(}B  ?-;_}-}C ?-;_}A}D ?-;_-@_-_ }A}E ?-;_-@_-_ }-}F ?-;_}A}G ?-;_-@_-_ }A}H ?-;_ -@_-_ }x}I?-;_膊 -@_膊 膊 膊}-}J ?-;_}-}L ?-;_}-}O ?-;_}-}T ?-;_}-}U ?-;_}-}X ?-;_}-}[ ?-;_}-}^ ?-;_}-}_ ?-;_}-}b ?-;_}-}c ?-;_}-}i ?-;_}-}k ?-;_}-}l ?-;_}-}m ?-;_}-}n ?-;_}-}o ?-;_}-}p ?-;_}-}q ?-;_}-}r ?-;_}-}s ?-;_}-}t ?-;_}-}u ?-;_}-}v ?-;_}-}w ?-;_}-}z ?-;_}-}| ?-;_}-}} ?-;_}-} ?-;_}-} ?-;_}-} ?-;_ 20% - @wr 1G 20% - @wr 1 ef苕 % 20% - @wr 2G" 20% - @wr 2 ef蜍 % 20% - @wr 3G& 20% - @wr 3 ef腭 % 20% - @wr 4G* 20% - @wr 4 ef溥 % 20% - @wr 5G. 20% - @wr 5 ef陬 % 20% - @wr 6G2 20% - @wr 6  ef % 40% - @wr 1; 40% - @wr 1 % 40% - @wr 2G# 40% - @wr 2 蘈娓 % 40% - @wr 3G' 40% - @wr 3 蘈劁 % 40% - @wr 4;+ 40% - @wr 4 % 40% - @wr 5G/ 40% - @wr 5 蘈忿 % 40% - @wr 6;3 40% - @wr 6 % 60% - @wr 1; 60% - @wr 1 % 60% - @wr 2G$ 60% - @wr 2 23跂 % 60% - @wr 3G( 60% - @wr 3 23淖 % 60% - @wr 4G, 60% - @wr 4 23睜 % 60% - @wr 5G0 60% - @wr 5 23捦 %! 60% - @wr 6G4 60% - @wr 6  23 %"~vR詋 #h槝h槝 $h槝 1h槝 1 %h槝 21h槝 2%?Э &h槝 3h槝 3 'h槝 4h槝 4(頬5頬 俏 %+8^膲 %)8^膲 1218^膲 12 % *8^膲 2/8^膲 2 %+8^膲 2 238^膲 2 2 %,8^膲 2 338^膲 2 3 % -8^膲 3 .8^膲 4 /8^膲 5/8^膲 5 % 08^膲 6 18^膲 7/8^膲 7 %2 8^膲_hQ齎L?e:SR鉔x3(厤  4}Y5}Y 骑 a% 5Gl;`+Gl;` %6'^7 '^[0] 8梴c梴 鷠% 9纇錱USCQ$CSMOR敄[0] ?-N7-N 霚 渆% @搹鶴c搹鶴 ???%????????? ??? A搹eQo搹eQ 虣 ??v% B 0 騗繈顣剉厤   C@wr 1/@wr 1 % D@wr 2;!@wr 2 繮M % E@wr 3;%@wr 3 浕Y % F@wr 4/)@wr 4 % G@wr 5;-@wr 5 K % H@wr 6;1@wr 6  鳀F % I鑜蕬^ 鑜蕬 膊膊膊 膊XTableStyleMedium9PivotStyleLight16`@u禰璣蟸Nm酧o`菓茤鉔xh垍犩曪嬦Oo`VV!  ; " 媖緐+R;" 媖緐{|+R;- Km諎@b g!h寶膲Rv^SbpS曪嬦Oo`" 6r蚹t^劅;01" 6r蚹噀S;-." 6r蚹LN;)+ 7bM|=, 禰璣bXT蛻'Y緐舥=, 禰璣篘GWt^6eeQ凈V=* 禰璣6eeQeg恘{|媁=& 禰璣(Wf[篘pe;&'" 禰璣D崸N=" a峽Q篘;34  /f孴&T=2 亃裇aY婲鯪wQSO臽礠蟘饛;#$& f[90OO縖9;HI. 陙6q~p砙wQSO臽礠蟘饛; !4f~f餳餒@饉8&MOS A@@     checkName checkZjlx checkSfzjh checkYesNo checkYesNoTS checkYesNoTS2 checkYesNoTS3 checkYesNoTS4 checkYesNoTS5 checkDisableLevel checkYesNoTS6checkLen0,1,18 checkYesNoTS7 checkLen0,1,100 checkFamilyDiseaseDescribecheckFamilyDisasterTimecheckFamilyBurstTime checkYesNoTS8 checkYesNoTS9 checkParentJobscheckParentCulturecheckParentAgecheckSuortMembersDescribecheckXfcheckfamilyCarType checkNum0,6,2checkFamilyIncomeType禰璣蟸Nm酧o`菓茤 zjlxisFiledPoorFamilyisZcjYfpisZcjYzpisTfyzknisGdJdlk isSupportisOrphanisTkzgjt isCyzdshbzisLowIncomeFamily isJlsyfzl isDisabilitystuDisabilityLevelisFatherDisabilityfatherDisabilityLevelisMotherDisabilitymotherDisabilityLevelfamilyDiseaseDescribeisFamilyDisasterfamilyDisasterTime isFamilyBurstfamilyBurstTimeisSupportObligationsisAloneParentssfncxs inschoolCount parentJobs parentCulture parentAgesuortMembersDescribexffamilyHouseCode familyCarName familyIncomeTypeName1xmsfzjh fatherName fatherSfzjh motherName motherSfzjhdisasterDescribe burstDescribeotherfamilyHouseName familyCarCode familyMembersfamilyYearIncomefamilyIncomeTypeCode覻 T珟齆翄鯪{|媁珟齆翄鯪鱏/f&T1+嵍[璣f[u /f&T1+ N3z歔禰璣f[u /f&T箯f魜+嵍[璣f[u /f&T亃裇%N蛻餠緰7bf[u/f&T烻^Nw7bM|鷁ch藌aS禰璣f[u/f&Tyr餠汷{Q篘XT /f&Td[?Q婲瀃鄀篘歜{Q /f&Tyr餠L錧P[sY(/f&T玁譙齎禰歔g歜d`e埄R剉O歜鵞a+T萷隭P[sY0zrrr決篘P[sY 0郪lQzrrrf嬤[P[sYf[u,g篘/f&T媖緐f[u媖緐I{W/睳/f&T:N媖緐/6r睳媖緐I{6r睳覻 T 6r睳匭0WE\l珟齆翄鱏x蚹睳/f&T:N媖緐篘蚹睳媖緐I{蚹睳覻 T 蚹睳匭0WE\l珟齆翄鱏x 禰璣/f&Tm愖S蛻'Y陙6q~p砙 禰璣m愖S蛻'Y陙6q~p砙鰁魰 禰璣m愖S蛻'Y陙6q~p砙蟘饛 禰璣/f&Tm愖S蛻'YaY 禰璣m愅'Y亃裇aY鰁魰 禰璣m愖S蛻'Y亃裇aY蟘饛/f&T6r蚹 N齹e\L垰b{QIN剉?Q鍅/f&T6r蚹N筫歜{QvQ諲/f&T淨Qg7bM|禰璣(Wf[篘pe6r蚹蜰N臽礠6r蚹噀S6r蚹t^劅a峽Q篘f[90OO縖9禰璣OO?b-峟徟`礠禰璣篘鉙pe 禰璣篘GWt^6eeQ(CQ) 禰璣 k:P褢潣(CQ) k:P烻郪 禰璣;N亯6eeQeg恘{|媁" 臺{:NIlW[颯錘S+T 暒^'Y嶯I{嶯1 N N厤菑20*NIlW[ 臺kXy kX橯f[u珟齆翄鯪{|媁 臺kXy  kX橯f[uE\l珟齆翄鯪鱏 v^N暒^ N齹厤菑18*NW[&{ 臺kXykX橯/f&T1+嵍[璣f[u 闟AQ笅kX橯/fb&T ^椗_kXkX橯/f&T1+ N3z歔禰璣f[u 闟AQ笅kX橯/fb&T ^椗_kXkX橯/f&T箯f魜+嵍[璣f[u 闟AQ笅kX橯/fb&T ^椗_kXkX橯/f&T亃裇%N蛻餠緰7bf[u 闟AQ笅kX橯/fb&T ^椗_kX kX橯/f&T烻^Nw7bM|鷁ch藌aS禰璣f[u 闟AQ笅kX橯/fb&T ^椗_kX8kX橯/f&T玁譙齎禰歔g歜d`e埄R剉O歜鵞a+T萷隭P[sY0zrrr決篘P[sY 0郪lQzrrrf嬤[P[sY 闟AQ笅kX橯/fb&T ^椗_kXkX橯f[u,g篘/f&T媖緐 闟AQ笅kX橯/fb&T ^椗_kX@kX橯f[u媖緐I{ 耂gq鉔xh-N媖緐I{h N齹(W f[u,g篘/f&T媖緐 -NkX橯 &T (W,gRkX橯wQSO剉媖緐I{ 鲖陙L埨h錱0^椗_kX6kX橯W/睳/f&T:N媖緐/ 闟AQ笅kX橯/fb&T N/f&Td[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯R/f&Td[?Qy樑_{:Nzz ^椗_kX@kX橯6r睳媖緐I{ 耂gq鉔xh-N媖緐I{h N齹(W 6r睳/f&T:N媖緐篘 -NkX橯 &T (W,gRkX橯wQSO剉媖緐I{ 鲖陙L埨h錱0^椗_kX) kX橯6r睳覻 T 臺{:NIlW[颯錘S+T 暒^'Y嶯I{嶯1 N N厤菑20*NIlW[ ^椗_kX ! kX橯6r睳匭0WE\l珟齆翄鱏x v^N暒^ N齹厤菑18*NW[&{ ^椗_kXy6kX橯蚹睳/f&T:N媖緐篘 闟AQ笅kX橯/fb&T N/f&Td[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯R/f&Td[?Qy樑_{:Nzz ^椗_kX@kX橯蚹睳媖緐I{ 耂gq鉔xh-N媖緐I{h N齹(W 蚹睳/f&T:N媖緐篘 -NkX橯 &T (W,gRkX橯wQSO剉媖緐I{ 鲖陙L埨h錱0^椗_kX"kX橯蚹睳覻 T 臺{:NIlW[颯錘S+T 暒^ N厤菑20*NIlW[ ^椗_kX kX橯蚹睳匭0WE\l珟齆翄鱏x v^N暒^ N齹厤菑18*NW[&{ ^椗_kXykX橯禰璣/f&Tm愖S蛻'Y陙6q~p砙 闟AQ笅kX橯/fb&T ^椗_kX7kX橯禰璣m愖S蛻'Y陙6q~p砙鰁魰,耂gq鉔xh-N禰璣m愖S蛻'Y陙6q~p砙鰁魰h ^椗_kX0鍌 gm愖S陙6q~p砙 N臺kX橯dky9kX橯禰璣m愖S蛻'Y陙6q~p砙蟘饛 N齹+T gyr妅&{鱏N暒^ N齹厤菑100*NW[&{ ^椗_kX0鍌 gm愖S陙6q~p砙 N臺kX橯dkykX橯禰璣/f&Tm愖S蛻'YaY 闟AQ笅kX橯/fb&T ^椗_kX3kX橯禰璣m愅'Y亃裇aY鰁魰,耂gq鉔xh-N禰璣m愅'Y亃裇aY鰁魰h ^椗_kX0鍌 gm愖SaY N臺kX橯dky7kX橯禰璣m愖S蛻'Y亃裇aY蟘饛 N齹+T gyr妅&{鱏N暒^ N齹厤菑100*NW[&{ ^椗_kX0鍌 gm愖SaY N臺kX橯dky楧kX橯/f&T6r蚹 N齹e\L垰b{QIN剉?Q鍅 闟AQ笅kX橯/fb&T N/f&Td[?Q婲瀃鄀篘歜{Q 0/f&T6r蚹N筫歜{Q扤 鍌kX橯RvQ諲y樑_{:Nzz ^椗_kXDkX橯/f&T6r蚹N筫歜{Q 闟AQ笅kX橯/fb&T N/f&Td[?Q婲瀃鄀篘歜{Q 0/f&T6r蚹 N齹e\L垰b{QIN剉?Q鍅扤 鍌kX橯RvQ諲y樑_{:Nzz ^椗_kXCkX橯vQ諲 N齹+T gyr妅&{鱏N暒^ N齹厤菑100*NW[&{ MRb/f&Ty橗:N&T gvQ諲臽礠鰁kX橯dky 鍌MRb/f&Ty榢X橯哊/fRdky N臺kX橯 ^椗_kXkX橯/f&T淨Qg7bM| 闟AQ笅kX橯/fb&T ^椗_kX3kX橯6r蚹蜰N臽礠,耂gq鉔xh-N6r蚹蜰N臽礠h Nd[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯d[?Qy樑_{:Nzz ^椗_kX/kX橯6r蚹噀S,耂gq鉔xh-N6r蚹噀Sh Nd[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯d[?Qy樑_{:Nzz ^椗_kX/kX橯6r蚹t^劅,耂gq鉔xh-N6r蚹t^劅h Nd[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯d[?Qy樑_{:Nzz ^椗_kX/kX橯a峽Q篘,耂gq鉔xh-Na峽Q篘h Nd[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯d[?Qy樑_{:Nzz ^椗_kXkX橯f[90OO縖9,耂gq鉔xh-Nf[90OO縖9h ^椗_kX! 鲖kX橯禰璣篘GWt^6eeQ0tepeMO N厤菑6MO \peMO N厤菑2MO ^椗_kXy鲖kX橯禰璣 k:P褢潣0tepeMO N厤菑8MO \peMO N厤菑2MO ^椗_kX,鲖kX橯 k:P烻郪 N厤菑200W[ N齹S+Tyr妅W[&{0鍌 禰璣 k:P褢潣 y榢X橯 dky:N臺kXy筫誰 T廭鱏/魦f T饄{|媁familyInfoEntry/f/f&T{|+R&TcheckDisableType茐汻媖緐媖緐{|+R,T汻媖緐zf汻媖緐vQ諲媖緐 checkZjlxE\l珟齆翄決榌翄隭uQ翄噀Lr^钀翄钀柣yO翄 櫃/nyr:Sgq/珟齆翄f  硂钑yr:Sgq/珟齆翄f  餝~nE\leg_'YF怢埩僗Y8lENE\OO翄AgqB7b鉙剠ZN媖緐媖緐I{孨媖緐 N媖緐踁媖緐6r蚹N筫蛻'Y緐舥 N+T媖緐 禰璣m愖S蛻'Y陙6q~p砙 譙~p%N蛻Nt^匭 禰璣m愖S蛻'Y陙6q~p砙 譙~p%N蛻Nt^錘 N$Nt^錘匭 禰璣m愅'Y亃裇aY婲鯪 N+T陙6q~p砙 Nt^匭 禰璣m愅'Y亃裇aY婲鯪鰁魰禰璣m愅'Y亃裇aY婲鯪Nt^錘 N$Nt^錘匭 checkInSchoolCount 2篘+T,g篘 錘 N(W Nf[2篘錘 N(W Nf[6r蚹GW g錧\O N+T淨Qg蛓 i7bb{Q杒7b 6r蚹N筫 g錧\O N+T淨Qg蛓 i7bb{Q杒7b 淨Qg*NSO\媁蛓 i7bb*NSO\媁{Q杒7bb$NGW/f checkParentCulture 6r蚹GW:NR-N蔛錘 N噀S z6r蚹N筫:NR-N蔛錘 N噀S zcheckParentAge 6r蚹GW:N60hT乗蔛錘 N 6r蚹N筫:N60hT乗蔛錘 Na峽Q篘鉙pe NMO蔛錘 N70hT乗錘 N a峽Q篘鉙pe$NMO蔛錘 N70hT乗錘 N checkfamilyHouseType禰璣OO?b陙 g禰璣OO?b遹A鄀f\廸'峟淨:gf錧D0VY褢0%m40e4崒TvQ諲砇≧6eeQ禰璣6eeQeg恘{|媁粂O褢0鶺,g{Q褢0鶺,gu;m901YN軴i栄鐍b0譙`崍N0鶴遹b鶴.U禰璣"崸N穬梍剉6eeQX[>k蔛)Ro` g鱊翄8R蔛)R0hy0ZSi_6eeQ蟸FU0濺係錘蔛蜰婲蛓 iN0{Q iN0燫錧Ncbd柵_亯b,gT剉6eeQ a峽Q90歜(vb){Q9陙 孡N6eeQ vQ諲擽S_eQ禰璣剉6eeQ鄀6eeQf[90OO縖9(W9501CQ髞20000CQf[90OO縖9(W20001CQ錘 NFAILURE 7 checkNum0,8,2 7familyDebtAmount 7checkLen0,1,200 7familyDebtReason 7 /f&TgNOu;m軴湒禰璣f[u 7/f&TNO軴箯0/e鶴媁餠緰禰璣f[u 7DkX橯/f&TNO軴箯0/e鶴媁餠緰禰璣f[u 闟AQ笅kX橯/fb&T N/f&Tyr餠L錧P[sY0/f&TgNOu;m軴湒禰璣f[u扤 鍌kX橯vQ諲y樑_{:Nzz ^椗_kX 7MkX橯/f&Tyr餠汷{Q篘XT 闟AQ笅kX橯/fb&T N/f&Tyr餠L錧P[sY0/f&TgNOu;m軴湒禰璣f[u0/f&TNO軴箯0/e鶴媁餠緰禰璣f[u扤 鍌kX橯vQ諲y樑_{:Nzz0^椗_kX 7bkX橯/f&Tyr餠L錧P[sY 闟AQ笅kX橯/fb&T N/f&Tyr餠汷{Q篘XT0/f&TgNOu;m軴湒禰璣f[u0/f&TNO軴箯0/e鶴媁餠緰禰璣f[u0/f&Td[?Q0/f&T6r蚹 N齹e\L垰b{QIN剉?Q鍅扤 鍌kX橯vQ諲y樑_{:Nzz ^椗_kX 7DkX橯/f&TgNOu;m軴湒禰璣f[u 闟AQ笅kX橯/fb&T N/f&Tyr餠L錧P[sY0/f&TNO軴箯0/e鶴媁餠緰禰璣f[u扤 鍌kX橯vQ諲y樑_{:Nzz ^椗_kX 7f[u,g篘b禰璣bXT/f&T蛻'Y緐舥 7LkX橯f[u,g篘b禰璣bXT/f&T蛻<u'Y緐舥 耂gq鉔xh-Nf[u,g篘b禰璣bXT/f&T蛻'Y緐舥h N/f&Td[?Q婲瀃鄀篘歜{Q 扤 鍌kX橯R/f&Td[?Qy樑_{:Nzz ^椗_kX 76r蚹GW蛻'Y緐舥 N+T媖緐  7f[u,g篘b禰璣bXT蛻'Y緐舥{|媁 7vQ諲禰璣bXT+Tf[u,g篘 蛻'Y緐舥 7familyDiseaseDescribe 7kX橯/f&Td[?Q婲瀃鄀篘歜{Q 闟AQ笅kX橯/fb&T N/f&Tyr餠L錧P[sY06r睳:N媖緐篘0蚹睳:N媖緐篘06r蚹GW蛻'Y緐舥 N+T媖緐 06r蚹N筫蛻'Y緐舥 N+T媖緐 0vQ諲禰璣bXT+Tf[u,g篘 蛻'Y緐舥0/f&T6r蚹 N齹e\L垰b{QIN剉?Q鍅0/f&T6r蚹N筫歜{Q06r蚹蜰N臽礠06r蚹噀S06r蚹t^劅0a峽Q篘扤 鍌kX橯vQ諲y樑_{:Nzz ^椗_kX 7checkInSchoolCount 7 kX橯禰璣(Wf[篘pe,耂gq鉔xh-N禰璣(Wf[篘peh ^椗_kXy 7 kX橯禰璣OO?b,耂gq鉔xh-N禰璣OO?bh ^椗_kXy 7 checkfamilyHouseType  7: kX橯-峟徟`礠,耂gq鉔xh-N-峟徟`礠h 鍌 愰b 鄀f RvQ諲 恲榿y 0kX橯xGA4攓Lx獪鈊$(^阞F!袪?啖H阿)R硨Lp!/袦習;蕝!蒔蠰祪3 1矾_荗鼲HスD/?螫/盔o瀤郲彧!M圖飞阽 鑖 鉐NF鈈+1φ[i$q5秊繇f貎讉鹌魜# SE=o茐苠渦葛Z幡鎁1髉欶~鎎Z彭c|桡菖┿咿4僯J}$1q能c8U8")QH像B<谳г彪. 梶⑿}:榸M2#'氭媣h~欩;顿絿:滪崔&.3忦C3蘩S!NX锗钒妢Bf"zR仹#8陯墧5w鑋q鶰(3~凤瞃"參>毞0鏤6?杵8蓔M*=y!娧W>.w3D績pz颭飧jp桭嶩3S狁 聺特Sj犂;:¢熣n[溥诸|3蹅<;'*鰅笓u核艠6灕{2cq痾[ミV猷?_绥睡腕r 昛w叾6絰舛怫皒8 詫慬掖叮q5s(%!-嬦Q4皉p懤f \}@U<坬瓅輙麘蘄Ge\耏 {ikP$谠g[C$V粅l嘩鮬q)"s-璲鏴秡5' 糊fu-怨拐峢<:躂暤壨L^儱5∠A仌奏H痀32講>*堍璟<_妺d屒$鲬謠袵u悚"V褄豟戌3琕嶂襠還踶淭e8匽峤7馬羺g寳O#K蒖tZ蜁fB湹 湠1衫隦窎楨p*a摸蘢6Y>鱢玃蘉:軐X/(煸丩H祶elC肔!繰蜕士砠瀓t>)V!1)缼甼蒬BBUuveD畚炬O儀|凢l*1竉*3.ALE/puЛm鉁']趼锑8fY岓r玈慈d 7蔪*鈦n^賺rW扭%㏑ *z? 壵宾@非#)韤 s˙YL镁略羹卛*该69m蝁&\i咠H艂=(K& V削.K掑凩DU臅{D 甫黯軎氫e类N茻麨g(襇N5邷JV罱6钗&3(逯a有/E4謗;晦,/鲛"zb辠5姮8學秷V="\pkA銜f!xqQc, 畷慆!碂E魡:潲P[|坌 l 獥l銇t伌#h滌 &M赎晈汾j舊})m攒%.袙澢4v贉轨淺糒cvlm荖55x鰀娐肖8菢/i誒^| /SΔ &鴮%0粜獝鼥葫PK! 褠煻'theme/theme/_rels/themeManager.xml.rels剰M 0匃倃oo雍&輬协勪5 6?$Q祉 ,.嘺緳i粭澤c21h:闀q毩m胳嶡RN壻;d癭値o7g慘(M&$R(.1榬'J摐袏T鶂8V"&A然蠬鱱}狇|$絙{朠除8塯/]As賲(⑵锑#洩L蔥汉倪PK-!檗[Content_Types].xmlPK-!ブх6 0_rels/.relsPK-!kytheme/theme/themeManager.xmlPK-!顸倦theme/theme/theme1.xmlPK-! 褠煻' theme/theme/_rels/themeManager.xml.relsPK] 暩*7 翊箭暜 ZO  L  d褚MbP?_*+%{&ffffff?'ffffff?(?)?M Kyocera ECOSYS M4125idn KX' d"dPcKV 4 ****4 ****EE0010000L -L - 爛dd@ ? ?XX0J,X< 0000SimSun?  A A A A""""""""""""""""dPcKPV0dPcK'VdPcK NVD:g芠 1dPcKVdPcKdVdPcKcV<z" d333333?333333?&<3cA薝} X} X}  X} X} X} X} X}  X} `#X} 0X} !X} X} "X} /X} X} X} X}  X} X} X}  X} X}  X} $X} X} "X} X} X} &X} X}  X} `"X} !! X} ""X} ##X} $$X} %%X} &'X} (( X} ))X} ** X} ++X} ,, X} --`X} ..`X} //X} 00X} 11X} 22 X} 33 X} 44 X} 55X} 67X} 88X} 99 "X} ::X} ;g X} hj X} kkX} llX} mmX} nn`X} ooX} ppX} qqX} rrX} ss`X} tX} X}  X TXTUTTTV*W{@ Y Z [ [ [ [ [ [ [ [ [ [ [ [ } [ [ [ k k [ [ k [ [ k[k [[ n P [ !p "[ #[ $[ %[ &[ '[ (} )[ *[ +k ,[ -[ .} /} 0 1r 2u 3u 45bbbbbbbbbb>~ \ @\$0ooooooooooooooo>] ^ ]$0bbbbbbbbbbbbbbb> __ ` a a a! a" `#  h$  `%  `&  _'  c( ` `) i* l+ l, mm l- l.mmmmz zi c0 o1 ` !c2 "l3 $c4 %_5&_ '_6 (_7 )_8 *o9 +o: ,_; -_< .q= /q>0qqqq3 4q?5oooooooooo> b@ b@ b@ b@ b@ b@ b@ b@ b@  b@  b@  b@  b@  b@ b@ b@ b@ b@ b@ b@ b@ b@ b@ b@ b@ bbb b@b b@ b@  b@ !b@ "b@ #b@ $b@ %b@ &b@ 'b@ (b@ )b@ *b@ +b@ ,b@ -b@ .b@ /b@ 0b@ 1b@ 2b@ 3b@ 4b@5bbbbbbbbbb> cA_ cB&`aaaaj`__````___ mC _D __ _E _F_____`c  iG !`c" #mH $``% &`I'j______- ._J /_K 0oL 1iM 2v 3v 4iN5oooooooooo> i_j_ k` la ma na! oa" p`# qh$ r`% s`& t_' uc( v` w`) xi* yl+ zl, {mm| }l- ~l.mmmmi i/i c0 o1` c2 l3 c4 _5_ _6 _7 _8 o9 o: _; _< q= q>qqqq q? dO dP dQ eR eS eT eU eV eW  eX  eY  x  x  eZ e e[ e\ e] e^ e_ e` ea eb ec ed eee xe ee ef  eg !eh "ei #ej $ek %el &em 'en (eo )ep *eq +er ,es -et .eu /ev 0ew 1ex 2ey 3ez 4e{5ssssssssss>btWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW f| f} f~ f g g g g y  y  y  y  y  g g g g g g f f g g f f ggg yg g g  g !g "g #g $g %g &g 'g (~ )g *g +g ,g -g .~ /~ 0 1t 2t 3t 45oooooooooo>w| /ww0 2www4@NrL饚饁(  饦  餠@憫) 9CCButton 19],@5y]k9 $< _薡纇錱<馂 閕 餦爲) 9CCButton 13801>],5@e]k9 $<_ 薡 纇 錱<>-@<d473 # 9((((  /f&T !!''$%     PE\l珟齆翄決榌翄隭uQ翄噀Lr^钀翄钀柣yO翄櫃/nyr:Sgq/珟齆翄f硂钑yr:Sgq/珟齆翄f餝~nE\leg_'YF怢埩僗Y8lENE\OO翄gq7b鉙剠vQ諲 ; #珟 e16r蚹GW蛻'Y緐舥 N+T媖緐 6r蚹N筫蛻'Y緐舥 N+T媖緐 vQ諲禰璣bXT+Tf[u,g篘 蛻'Y緐舥+ #GW+ #GW55+ #GW""+ #GW))+ #GW**+ #GW,,+ #GW++3 #GW--66K  禰璣OO?b陙 g禰璣OO?b遹A....+ # OO99+ # OO:: Sheet1ggD ZO  q3)髦%  d褚MbP?_*+%&ffffff?'ffffff?(?)?MHP LaserJet Professional M11364 4XSDDMHP LaserJet Professional M1136  0Z(d3啙4" dXX333333?333333?&<3U} K} K} 燜K}  &K}  L}  L}  L}  L}  L}  L}  Lq @ @     ,, M N N M  O KK? P Q L PP P P L  PP? P P PP@ P P PP@ P P PP"@ P PPPPPPPPP P P? P PP P P@ P PP P P@ P PP P P@ P PP P P@ P PP PP@ P PP PP@ P PP PP @ P PP PP"@ P PP P P P PP P P P PP P P Pm PPPPPPPPPPPPPP P P? P P P P@ P P P P@ P P P P@ P PPPPP PP? { { PP@ P { PP@ { {D. lVJJ<<<<<<<<<<<<<888<<<<<< !"#$%&'()*+8@,-./0123>@4>@56J7J8J9J:J;J<J=J>J?J P P? P Pf !P!P@ !P !Pf"PPPP #P#P? #P #P $P$P@ $P $P%PPPP &P&P? &P &Po 'P'P@ 'P 'Po(PPPP )P)P? )P )Pp *P*P@ *P *Pp +P+P@ +P +Pp,PPPP -P-P? -P -Pq .P.P@ .P .Pq/PPPP 0P0P? 0P 0Pr 1P1P@ 1P 1Pr2PPPP 3P3P? 3P 3Ps 4P4P@ 4P 4Ps5PPPP 6P6P? 6P 6Pu 7P7P@ 7P 7Pu8KKRS 9P 9P9P 9Pv :P :P:P? :Pv ;P ;P;P@ ;Pv <P <P<P@ <Pv=PPPP >P >P>P? >P ?P ?P?P@ ?PDl<<<<<<<<<<<<<<<<<<<<<<@JAJB7JCJDJEJFJGHIJK,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,[,\,],^,_, @P @P@P@ @P AP APAP@ AP BP BPBP@ BP CP CPCP@ CP DP DPDP@ DP EP EPEP @ EP FP FPFP FPGPPPP HPHP? HP HPt IPIP@ IP IPtJPPPP KPS LPS MPS NPS ORS PRS QPS RPS SPS TPS UPS VPS WRS XRS YPS ZPS [PS \PS ]PS ^PS _RSDl<<<<<<<<<`,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p, `RS aPS bPS cPS dPS ePS fPS gRS hRS iPS jPS kPS lPS mPS nPS oRS pRS&B@P餒 0(  >@<d$$$7 Sheet5ggD ZO 册  d褚MbP?_*+%&ffffff?'ffffff?(?)?"333333?333333?&<3U}  P餒00(  >@<d   7 Sheet6ggD VBA1幦yR澣yThisWorkbook!"7 __SRP_aBl__SRP_b Py  <,<0<4<8<<<N0{00020819-0000-0000-C000-000000000046}h $` 听k@t i& `}\i( %H凗 %偁  %`@.0,*24@l @ \ @8L @< @P, @h @ @ @忐 @荥 @烃 @@件 @ @(滯 @X岨 @| @pl @\ @L @< @, @ @ @0 @H忑 @荦 @听 X@xtqce$*\Rffff*0@68ea9a21*\R0*#f*\R0*#1*\R0*#17$*\Rffff*0A68ea9a21*\R0*#2$*\Rffff*0<68ea91f54 "      t)您是否确认将要保存该excel💁🏻‍♀️,如保存👨,请点击"$.确定"$., $.&系统将要进行检查校验🏋🏿‍♂️,如不保存,请点击"$.取消"$.? 0$,'* * 2A@4dP'(k@o80岜Attribute VB_Name = "ThisWorkbook" 孊as0{00020P819-0C$0046} |GlobalSpac扚alse dCreatablPred恊claIdTru BExposeTemplateDeriv払ustomizD2P儉 Sub 厯_BeforeSave(ByVal AsUI As Boolean, _ Cancel) isButtonmMsgBox("您是否确认将要保存该別x ,如,请点击" & Chr(34)"确禞 ,10低进行检查校验堿不∠?", vbOKcC63If L4 0Then荁丏测@试所有A嬖虿⒋蛴〈砦笮畔z⒚ E聤P腜= gEnd Irf AiAm rU  a 174Y `   x瞩"l "  荥 "滯 "\ '听'忑' :\lL:<, :忐荥烃:件滯岨:|l\L:<,鋤6$lL, 忐荥烃滯岨l﨤, 忑听u珲  $g, TlL, 忐荥烃滯岨l\L, 忑听4X|rU @, `t!A#n87E梺逪#<剝倗iR㎎塯x餞 F, }讍;A敽Dd~楆x, }讍;A敽Dd~楆剝倗iR㎎塯x餞ME Sheet1R;__SRP_eo\__SRP_fuSheet6xPSLSS0<6"<<<N0{00020820-0000-0000-C000-000000000046}0 8` @x ):`h}\ %i( x%@凗%偁6 %P@|xqce*\R1*#2a2$*\Rffff*0B68ea9a224  "  &  HX`p x光标在单元格中时6 Continue? >Hi$, @41A@,00k 123A@4yoxAttribute VB_Name = "She@et1" 鐱ast0{00020820- C$0046} |Global!腟pac扚alse dCreatablPre declaId玊ru BExposeTemplateDeriv$払ustom izD2'光暝诘ピ裰惺 P$( Sub Works瀇BeforeDoueClicka(ByVal Target As Range, @CancelBoolean)  If MsgBox("Continue?", vbYesNo, "Hi")儉 Then3  "侂 End If CDe騝23n@48CrU Qy)4Y0  XrU @4`xAy#nDr梺#<8Z膋肍羒74_ F4唈%A慲H%>:x4唈%A慲H%>:8Z膋肍羒74_ME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H0凗h %偁B %8p@@xx8qce$*\Rffff*0D68ea9a224xòAttribute VB_Name = "She@et6" 鐱ast0{00020820- C$0046} |Global!腟pac扚alse dCreatablPre declaId玊ru BExposeTemplateDeriv$払ustom izD2rU  y )4Y`__SRP_12 __SRP_13 BSbpS剺葔 v__SRP_4TrU @n梺xME(6 << <x F`僁p%H@qce$*\Rffff*0=68ea92aa"  ( Hhx学生信息打印模板$H(J学生信息打印模板$HB@L学生信息打印模板$H(Jo偘Attribute VB_Name = "打≡だ" Sub Browse_Print () Worksheets("学生信息l模板").Visibla楾rue"d^P@review2cEnd rU~| krU $`n__SRP_5g錧wQ齉pe 赫__SRP_6.__SRP_7`  qce$*\Rffff*0>68ea945c*\R1*#408*\R1*#140*\R1*#134  B       B   B  h p B  ( 0@2` p  B  8 8@ $x 8 " pB  x 8  $ $  HP xXB  4(0*X$ 8BP0h!  <乬梺艄xME(6 LL P` @ I僐 `}\I僒 s`刅 \` i僞 f` 8 I僪 XI僐 xI僯  n`   i僞 x` 8 !I僪 XI僐 xI僒 I儂  X`   (I僪 I僐 8I僒  8`  3I僪 I儛 I僐 I僒 I儝  ` x ,,HI儦 I僪 I僐 I僒 I儨  ` X tI xI僱 `  * `  I, +B ` P I僪 pI僁 i僃`凥  `  I僱 (I兌 HI僗 @刏 b `  I僪 I僞  l ` k@ I僪8  `I僐 I僯 I僱@  n@ ` I僪  I僞  p `Hk I僪  I僐  I僯  I僱    ` @ I僱 ` I僪  I僐  I僯 @刏 @剅 @刅 ` H I僪 h I僐  I僯 `劧`剉`剎@  X8 僋 %h` 0 8 p P @ll ` 8 H@ h @ X @ H @D @4 @$ @ @ 8P @pl H@h @hX @H @D @4 @$ @ @ 0  ( 0 8 @  B   4 $H  "p   "   .  0 0@ p  *   .  8 .H  x  0   6  0@6X 8 6 P`(x   f @ `x>&  Xhp h **H xX  (0@HjP& 0 `8 ** 4(J`  , <J8  4  <J h (p   ,H  H( p .x    H(  H( H(| H`( H  &P x n (D82  8(8 H(8 (   &  2    8!(H! H"(P" #(# # &# ###$ b$ x$ $$$$$&h% % ,%%%% f& h& &&& & 8&(' 6'(' ( &( (((( f( `)(x) ) T) &* 0*@*H* $`* &*$X*$&+$ 0+$@+ P+X+ `+ p+$tx+$&+$ , (, $0,8, @,`, ^h, ,",-@-&P- x-- ---- b- H.X.x. z. &/ (/ 8/H/P/p/ fx/ //0 t0 &0 0 0000 b0 `1 1111&82 `2 ,p2222 ^203 H3h3@p3&3 33 34484 ^@4 4 444X4&@5 h5 ,x5555 ^5 86 X6p66T6&6 7 ,7H7P7p7 nx7 7 8 8"08X8&8 9 , 9P9X9x9 j9 9 :0:"@:h:&: ;0;8;X; n`; ; ;<" <H<&< == =(=H= PP=====&`> > .>>>> R>P?h??X?&? @ ,@H@P@p@ bx@ 郂$鳣 A@(A&hA怉 楢ˋ$癆,谹BBB B(B0BPB jXB 菳鐱"鳥 C&癈 谻鐲餋H鳦 @DLHD 楧燚 ― &PE xE E 怑楨燛‥菶 Z蠩 0F@F`F@hF&‵ 蠪郌鐵GG0G j8G "℅蠫郍鳪 dH &hH 怘燞b℉ hI ,xI ↖ &@J hJ xJJ 圝 &HK pK K圞怟楰窴 ^繩  L&8L`L@hL&↙ 蠰郘&鐻MM8M Z@M 燤&窶郙@鐼&(N PN`N&hN怤楴窷 Z繬  O@O XO@`O&燨 萇豋 L郞0P8PXP   j`P 蠵餚QQ Q(Q0QHQ PQ XQFhQ癚@窺鳴&R (R8R~@R<繰SSS0S |8S 窼$蠸鳶(T@(T&hT 怲燭癟"窽郥鑄U |U 怳"║蠻@豒&V @VPV XVxVV燰   |╒ (W"@WhW圵╓萕鑇鳺X X X(X 0X 8XHX PXXX `XhX&Y 8YHY PYpYxY榊   |燳  Z "8Z 2`Z 榋 竄豘鳽[8[X[x[榌竅豙鳾 \(\8\ @\ H\X\ `\ h\x\ \ 圽榎 燶 ╘竆 繺 萛豛 郳 鑌鳿 ] ]]  ] (]8] @]H]X] `] h]x] ]圿 怾n榏&_ 0_@_ H_h_p_恄   |榑 `"0`  X`p` 恅癭衊餪a 0a @aPa Xa `apa xa a恆 榓 燼癮 竌 繿衋 豠 郺 鑑餫&萣 餬c c(c0cPc |Xc 豤"餭 d 8d Hdhd 坉  榙 ╠ 癲 竏 萪 衐 豥 郿鑔&e ╡竐 纄鄀鑕f   |f 恌"╢  衒  餱g    0g  @g Pg Xg `g pg xg g   坓恎& h HhXh `hh坔╤   |癶 0i*Pi i ,爄 .衖jjj ,j .Hjxjj .坖竕纉 萰 ,衘 .k0k8k .@kpkxk k  坘 ,恔纊&Hl pl,l發&8m `m,pm爉&(n Pn`n@hn&╪ 衝鄋 鑞(餹o o@o   |Ho萶"鄌 p  (p    Hp  Xp hp pp  xp pj坧&鴓 q0q 8qXq`qq   |坬 r" rHr  hr    坮  榬 ╮ 皉  竢 纑j萺&8s `sps xs榮爏纒   |萻 Ht0ht <榯J豻 (u0u8u @u`Hu&╱ 衭鄒.鑥v v@v |Hv 葀,鑦 :wJXw ╳皐竪 纖@葁&x 0x@x*Hxxxx爔  |▁ (y"@y hy  坹▂   葃  貀鑩 饄 鴜z z  z   z(z&衵 鴝{ {0{8{X{  |`{ 鄘"鴞  |  @|`| |  恷爘 ▅ 皘纜 葇  衸貄鄚&坿 皚纝 葈鑮饈~  |~ 榽*竳鑯@饉&0 Xh(p | H(` 垁  █ 葊  4貈  6 X ` <h▉ 皝 竵 纴~葋&H p&垈皞競貍  |鄠 `* 皟  袃 饍  &( 0 (8` h p xz& (8(@hp悈 |槄 &0 X  x 槅   ▎葐 袉 "貑   z &爣 葒貒$鄧0  |8 "笀2鄨   8 X  2h爥 ▔ 2皦鑹 饓 鴫 z&垔 皧缞0葕鴬 |( ▼ 笅貗@鄫&  HX`垖▽  |皩 0,P@垗&葝 饙*8@`  |h 鑾 ( (0 8 @@H&垚 皭缾(葠饜鴲 | 爲 笐貞@鄳&  HX `垝⊕   |皰0 Hh@p&皳 負钃 饟8   |@罃 財鴶@&@ hx 爼〞葧   |袝P h垨@悥&袞 鴸 08X   |`鄺 鴹@ &` 垬槝 牁罉葮铇   |饦p 垯@皺&饳 ( 0PXx   | 8@@& 笡 罌鄾铔  | 悳 葴@袦& 8H Ppx槤 |牆  $8`@h& 袨酁$铻8 d@  罒@酂&  HX2`槧 V牋 鵂  (N0& ā浮馈唷琛 Z p(悽涪@愧& (8(@hp悾 Z槪 &@@H&垽 挨坤&趣黏 Z  "0ē廿@啷&  HX0`惁槮甫 Z捆  &8`@h&ě 效唰&瑙8 Z@ 牗(括瑷@皎&0 Xh(p槱牘扩 Z醛 ($@h@p&蔼 鬲瑾$皙 @ ZH "ǐ0蝎   @(Px  *埇脯 垃 痊 鞋噩&惌 腑拳0协( Z0  $惍0府璁@甬&0 Xh0p牤ǒ券 V携 (8X@`&牥 劝匕喟( Z0 惐.氨啾@璞&( P`.h槻牪啦 V炔  *@p@x&赋 喑鸪*(0P ZX 复*卮@&P x埖*惖赖鹊璧 Z鸬 P(p樁@牰&喽 ( HPp xx 鸱6.Hx埜( 惛2牳( 案1栏( 懈2喔( 鸶1J0樄牴ü肮 f腹B   (<0p 惡ê$群$鸷 ( \谢 B  0,P 0@凹"鸺 ^ 6x敖冉杞0(HX牼谰染芯鼐嗑 杈 "埧 翱 .锌B   $B@ 埨 樌 ɡ 咐 览 欣乩嗬 枥  樍 傲 辛B  枇"鹆 08 @HP X8x奥2嘎鹇  (8 @H P` F让忻 孛 嗝 *鹈 ( 饶 嗄B  * 4P埮 惻B  <( JHh p  (B  @*Hx B < J8X `B    "0 X8x2吧枭   08 @ HX"x0犑 惺(鹗 ((8`&h愃標 犓八 杆B  HPVp忍 8杼  @:P4愅$韧鹜"08@ P-----------------------------------------校验校验必填项若有错误信息显示到 批注中----------------------------------------------------------- 单元格内容] R T X%Z'V V'Pd('Pki--------------------------------------------写日志 记录错误信息并显示到一个错误信息表中-------------------------------------------- ^ d b$`,Z d 'diX------------------------------------------------------ 获取指定的cell值------------------------------------------------------------- R j h$H%Z!l'fi--------------------------------------------写日志 记录错误信息并用红色字体显示到错误信息表中-------------------------------------------- ^'p ^ d b$`,Z p d b$`%Z%r!t(v d 'dii--------------------------------------------添加批注(点击开始校验)-------------------------------------errorInfo批注内容 1Worksheets(sheetIndex).Unprotect Password:="1qaz" z R T       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{}~h$H%ZB@| R T h$H%Z!~(W 添加黄色背景 R T h$H%Z!(Jii--------------------------------------------删除批注(点击开始校验)-------------------------------------1Worksheets(sheetIndex).Unprotect Password:="1qaz" R T h$H%ZB@ R  T  R T h$H%Z!~(vd  R T h$H%Z!~(vkpihr---------------------------------------------点击开始校验 是否添加或删除批注调用的方法----------------------------X  如果校验失败 R T h$H%Z!d 判断批注为空 h R T A@xV 添加批注方法d"若不为空,则去除当前批注👂🏿,重新添加 h R TA@N 清除批注方法 h R T A@xk1 MsgBox "第" & rowIndex & "行数据项🕉:" & errorMsgd :如果校验成功则判断是否有批注,若有则把校验失败时的批注去除 h R TA@ ,#如果做了去除空格处理,则对其进行提示第 R行📗,第 T列,您输入的字符"$. "$."中包含了空格,系统已自动为您清除了A@\d`kXkPiH----------------------------------------------------------------------------------------------------------------------------------y--------------------------------------------根据标识符🚠,调用对应的方法(点击开始校验)-----------------------------------------------------------------------------------------------------------------------------------------------------------------------把错误信息写进错误列表8 R T h$H%Z'l  T h$H%Z'I获取该列表头的名称 如果为合并行的表头  T h$H%Z' R e  T h$H%Z'k0'  checkLen*)如果为整数长度校验  $'checkLen'  checkNum*e-如果为Number长度校验  $'checkNum'  checkVal*e-如果为值的校验  $'checkVal'  checkInt*e-如果为整数值的校验  $'checkInt'  checkTerm1e-如果"是、否"为必填1' checkTerm'  checkYesNo1e/如果"是🎾、否"为必填1' checkYesNo' checkDiffName1e2如果困难级别名称为必填1' checkDiffName' checkDiffCode1e2如果困难级别编码为必填1' checkDiffCode' checkIDCardType1e4如果身份证件类型为必填1'checkIDCardType' checkSqyyName1e2如果申请原因名称为必填1' checkSqyyName'  checkYear1e. 如果年份校验1' checkYear'k _=================================类型1 执行的非空校验==========================================把错误信息写进错误列表 checkNullKT h R T$' 第 R 行的数据项: 不能为空!请检查'')整体校验时,如果有错误信息 A@\RMsgBox "第" & rgold.Row & "行的数据项:" & Chr(10) & titleMsg & "不能为空,请检查"k h  R T A@'a=================================类型2 执行学生姓名校验========================================== checkNameKT h R TA@@调用去除空格的方法 h R TA@>调用去除回车的方法 R T h$H%Z!l'l T h$H%Z!l父亲姓名 T h$H%Z!l母亲姓名 l'd l$'kd l$'k 第 R 行的数据项🧑‍🦱: ;填写不正确!必须为汉字,长度大于1,不能超过20个字符💨,请检查''%整体校验时👨🏼,如果有错误信息 A@\  'k h  R T A@'Z================================= 执行的长度校验==========================================checkLenKT h R TA@H调用去除空格的方法 h R TA@F调用去除回车的方法 l $'' T h$H%Z!l家庭遭受疫情描述 R h$H%Z!l是 R T h$H%Z!l'$家庭未遭受疫情不必填写遭受疫情描述。'k k  T h$H%Z!l家庭遭受重大自然灾害描述 R h$H%Z!l是 R T h$H%Z!l',家庭未遭受自然灾害不必填写遭受自然灾害描述。'k0 k(  T h$H%Z!l家庭遭受重大突发意外描述 R" h$H%Z!l是 R T h$H%Z!l' 家庭未遭受意外不必填写意外描述。'k` kX  T h$H%Z!l欠债原因 R3 h$H%Z!l R T h$H%Z!l' R3 h$H%Z!l R T h$H%Z!le'&家庭欠债金额不为空时欠债原因必须填写。'kP kH  ,$'$ ` 如果该项为非必填,并且为固定长度第 R 行的数据项: .填写不正确🏏,该项可以为空♛。若填写,则长度必须为$位🤜🏿! 请检查'$ ed 如果该项为非必填,并且为长度范围第 R 行的数据项: 4填写不正确,该项可以为空。若填写,则长度必须大于等于$ 位🧝🏻,且不超过$位🤵‍♂️! 请检查'$ ed 如果该项为非必填🧑🏽‍🏭👉🏿,并且为固定长度第 R 行的数据项: &填写不正确,该项不能为空💂🏽,且长度必须为$位✵! 请检查'$ ed 如果该项为非必填👸🧨,并且为长度范围第 R 行的数据项: ,填写不正确,该项不能为空🧿,且长度必须大于等于$ 位🌚,且不超过$位👩‍👧! 请检查'k'0整体校验时,如果有错误信息 A@\kp h  R T A@'h================================= 执行的长度校验(Number类型)==========================================checkNumKT h T$ffamilyDebtAmount h R3$f'dp l $'kP  h T$ffamilyDebtAmount ,$'$@ 如果该项为非必填🙃,并且为固定长度第 R 行的数据项: G填写不正确🧗🏼‍♂️,该项可以为空,若填写,则必须为数字,大于0,整数位长度不超过$位,且小数位不超过$ 位!请检查'$ ed 如果该项为非必填☘️,并且为固定长度第 R 行的数据项: ?填写不正确,该项不能为空,且必须为数字🙏🏻,大于0🏄🏽,整数位长度不超过$位,且小数位不超过$ 位!请检查'd第 R 行的数据项: ]填写不正确,该项不能为空,且必须为数字🤴🏼,大于0,整数位长度不超过6位👨🏿‍🎤,且小数位不超过2位!请检查'kx'0整体校验时,如果有错误信息 A@\  h T$ffamilyDebtAmounte ,$'$@ 如果该项为非必填,并且为固定长度第 R 行的数据项: K填写不正确,该项可以为空,若填写,则必须为数字,大于等于0,整数位长度不超过$位,且小数位不超过$ 位!请检查'$ ed 如果该项为非必填♣️,并且为固定长度第 R 行的数据项: C填写不正确🏚,该项不能为空♚,且必须为数字🕵🏼‍♀️👩‍🦽,大于等于0🧆,整数位长度不超过$位🤾🏿‍♀️🍡,且小数位不超过$ 位🫴🏼!请检查'"d"第 R 行的数据项⚂: a填写不正确𓀏,该项不能为空,且必须为数字,大于等于0,整数位长度不超过6位,且小数位不超过2位!请检查'kX"'0整体校验时✢📅,如果有错误信息 A@\k" h  R T A@'[=================================执行值范围的校验==========================================把错误信息写进错误列表checkValKT l $'  ,$'第 R 行的数据项: $填写不正确,该项必须为数字,大于等于$ 💢,且不超过$!请检查''-整体校验时🎀,如果有错误信息 A@\& isValidateCount = isValidateCount + 1k( h  R T A@'_=================================执行的为整数值的校验==========================================把错误信息写进错误列表checkIntKT l $'  ,$'$@ 如果该项为非必填🙅🏼‍♀️,并且为固定长度第 R 行的数据项: 8填写不正确ℹ️,该项可以为空,若填写,则必须为整数,大于等于$,且长度不超过$ 位!请检查'$eE如果该项为必填,并且为固定长度第 R 行的数据项: 0填写不正确,该项不能为空,且必须为整数♚,大于等于$🦸🏻‍♂️,且长度不超过$ 位🤺!请检查'kp'0整体校验时,如果有错误信息 A@\k0 h  R T A@'`================================= 执行的身份证件号校验========================================== checkSfzjhKT h R$f'S 获取填写内容 第 R 行的数据项👨🏼‍🔧: &填写不正确,因身份证件类型为空!请检查''0整体校验时,如果有错误信息 A@\d  居民身份证 l T$'O 身份证号校验 :如果不符合身份证校验规则第 R 行的数据项💂🏼: *填写不正确,该项必须为学生身份证号👨🏼‍🎤𓀌!请检查''4整体校验时,如果有错误信息 A@\  'kd l$' 第 R 行的数据项: E填写不正确,该项不能为空👨🏿‍🎨,且长度必须大于等于1位,且不超过18位🫀!请检查''4整体校验时,如果有错误信息 A@\kkk h  R T A@'X================================= 执行身份证件类型校验================================== checkZjlxKT checkZjlx l1$' 第 R 行的数据项🌥: 填写不正确𓀖!请检查''(整体校验时🏌🏼‍♀️,如果有错误信息 A@\dp checkZjlx h R TA@kH h  R T A@'\================================= 执行学籍号的校验==========================================checkXJHKT l0, 1, 50$' 第 R 行的数据项: K填写不正确👩🏽‍🍼,该项可以为空👊🏼,若不为空长度必须大于等于1位,且不超过50位!请检查''0整体校验时👩🏻‍✈️,如果有错误信息 A@\  'k h  R T A@'`================================= 执行学生信息ID的校验==========================================checkXJHKT l$' 第 R 行的数据项🤷🫖: E填写不正确,该项不能为空,且长度必须大于等于1位,且不超过50位!请检查''0整体校验时🔅,如果有错误信息 A@\  'k0 h  R T A@'[=================================执行银行卡号校验==========================================把错误信息写进错误列表 checkBankKT l$' 第 R 行的数据项☘️👩🏼‍🔧: $填写不正确,该项必须为数字,大于等于$ 🦹‍♂️,且不超过$🍂!请检查''-整体校验时,如果有错误信息 A@\%isValidateCount = isValidateCount + 1kX h  R T A@'W=================================执行年级校验========================================== checkYearKT checkYear l$' 第 R 行的数据项: 填写不正确!请检查''(整体校验时🕘,如果有错误信息 A@\d checkYear h R TA@k h  R T A@'W=================================执行学年校验==========================================把错误信息写进错误列表checkXnKT l$' 第 R 行的数据项😧: )填写不正确,该项格式如2012-2013等!请检查''-整体校验时,如果有错误信息 A@\%isValidateCount = isValidateCount + 1kP h  R T A@'W=================================执行月份校验==========================================把错误信息写进错误列表 checkMonthKT l$' 第 R 行的数据项🛎: &填写不正确,该项格式如01、12等!请检查''-整体校验时,如果有错误信息 A@\%isValidateCount = isValidateCount + 1k h  R T A@'g=================================类型3 执行的日期校验(非必填)==========================================把错误信息写进错误列表 checkDateKT l$' 2如果出生日期校验失败第 R 行的数据项: 填写不正确👍🏻!填写格式为"$. xxxx-xx-xx"$. ☝🏼,如2013-02-21🚴🏽‍♀️,请检查''-整体校验时,如果有错误信息 A@\%isValidateCount = isValidateCount + 1k h  R T A@'c=================================执行的日期校验(必填项)==========================================把错误信息写进错误列表checkDateNecessaryKT& l$' 2如果出生日期校验失败第 R 行的数据项: 填写不正确!填写格式为"$. xxxx-xx-xx"$. 📞,如2013-12-21🫄🏽,请检查''-整体校验时👨🏿‍✈️,如果有错误信息 A@\k h  R T A@'g=================================执行的出生日期校验(必填项)==========================================把错误信息写进错误列表 checkBirthdayKT! l$' 2如果出生日期校验失败第 R 行的数据项: 填写不正确🚜!填写格式为"$. xxxx-xx-xx"$. 👰🏼🈯️,如2013-12-21✖️,请检查''-整体校验时,如果有错误信息 A@\  'k h  R T A@'J=================================类型10 校验电话号码====================== checkphonesKT l$' 第 R 行的数据项: 填写不正确👾!填写格式为"$.区号-固定电话 或 手机号码"$. ,请检查''%整体校验时🦌,如果有错误信息 A@\' isValidateCount = isValidateCount + 1k0 h  R T A@'L=================================checkOption 校验备注 ====================== checkOptionKT lB$' 第 R 行的数据项: )填写不正确🧰!长度不能超过200个字符🈴,请检查''%整体校验时🏃‍♂️,如果有错误信息 A@\%isValidateCount = isValidateCount + 1k h  R T A@'\================================= 执行认定困难级别名称校验================================== checkDiffNameKT checkDiffName l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时💗,如果有错误信息' A@\dP checkDiffName h R TA@ l$1如果通过校验且值为空'd'kk h  R T A@'d================================= 执行认定日期校验(非必填)==========================================checkIdentityDateKT% l$' 2如果出生日期校验失败第 R 行的数据项🐢: 填写不正确!填写格式为"$. xxxx-xx-xx"$. 👨🏽‍💼💇🏽‍♀️,如2013-02-21🍉,请检查''-整体校验时,如果有错误信息 A@\'d  l$X$如果认定等级名称为空,且认定日期为空'  l$e](如果认定等级名称不为空,且认定日期不为空'dX第 R 行的数据项☔️: v填写不正确!该项与“困难级别认定名称”必须同时为空,或同时不为空且同时通过校验✡️,请检查“困难级别认定名称”是否通过校验''0整体校验时🖤,如果有错误信息' A@\'k`kX h  R T A@'T================================= 执行民族类型校验==================================checkMZKTcheckMZ l$' 第 R 行的数据项: 填写不正确🦸‍♂️!请检查''(整体校验时,如果有错误信息 A@\dEcheckMZ h R TA@k餌 h  R T A@'d================================= 执行认定原因校验(非必填)==========================================checkIdentityReasonKT'0,1,30' l $' 第 R 行的数据项🍓: 5填写不正确🦸🏿,长度必须大于等于1位🚍,且不超过30位👩‍❤️‍💋‍👩!请检查''0整体校验时,如果有错误信息 A@\dXC   l$r1如果认定等级名称为空,且认定日期为空,认定原因为空   l$ew8如果认定等级名称不为空🧥,且认定日期不为空,认定原因不为空   l$e第 R 行的数据项: d填写不正确💤!该项与“困难级别认定名称”、“认定时间”必须同时为空,或同时不为空且同时通过校验,请检查''0整体校验时,如果有错误信息 A@\'dxA第 R 行的数据项: 填写不正确!该项与“困难级别认定名称”🤹‍♀️、“认定时间”必须同时为空,或同时不为空且同时通过校验,请检查“困难级别认定名称”🚵🏽‍♀️、“认定时间”是否通过校验''0整体校验时🩸🫧,如果有错误信息 A@\'kp@kh@ h  R T A@'X================================= 执行身份证件类型校验==================================checkIDCardTypeKTcheckIDCardType l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d?checkIDCardType h R TA@k> h  R T A@'T================================= 执行残疾类别校验==================================checkDisableTypeKTcheckDisableType l $' 第 R 行的数据项🚎😑: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d=checkDisableType h R TA@kh= h  R T A@'T================================= 执行残疾类别校验==================================checkFamilyIncomeType3KT l1$' 第 R 行的数据项🧑🏼‍🍼: 填写不正确➜!请检查''(整体校验时,如果有错误信息 A@\d <EsetDMBCode "checkFamilyIncomeType", sheetIndex, rowIndex, columnIndexk; h  R T A@'d=================================14 checkSQLY 申请理由的校验--==================================checkFamilyIncomeTypeKT l0' le,非必填'd: l $'k:  第 R 行的数据项: 填写不可重复录入🏊‍♀️!请检查'dH:第 R 行的数据项🪱: 填写不正确!请检查'k:'(整体校验时,如果有错误信息 A@\d9 l0 l1 l2 l3 l4 l5 l6 l7 l8checkFamilyIncomeType h R TA@b 码表校验'k8k8 h  R T A@'v=================================14 checkGender 执行内容是否为“男”“女”校验--================================== checkGenderKT checkGender l1$' '-性别有错,则无需校验身份证号第 R 行的数据项🧚🏿‍♂️: 填写不正确!请检查''(整体校验时🔫,如果有错误信息 A@\  'dH7 checkGender h R TA@k7 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoKT checkYesNo l0$' 第 R 行的数据项✍🏿: 填写不正确✔️!请检查''(整体校验时,如果有错误信息 A@\d5 checkYesNo h R TA@k5 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTSKT checkYesNo l0$' R T h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' 是 是'k3 是'k3 是'k3k3 第 R 行的数据项🥸🦴: w填写不正确!已勾选特困供养人员🧑🏻‍🎤,不能勾选以下3项:是否特困职工子女8️⃣、是否城乡最低生活保障户🙋🏼🧜‍♂️、是否城乡低收入困难家庭请检查''(整体校验时🕑🥊,如果有错误信息 A@\d2 checkYesNo h R TA@k2 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS2KT checkYesNo l0$'+ 11 18 22 29 30 37 38 42 43 44 45 R T h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' R% h$H%Z' R& h$H%Z' R* h$H%Z' R+ h$H%Z' R, h$H%Z' R- h$H%Z' 是 是'k/ 是'k/ 是'kx/ 是'kX/ 是'k8/ 是'k/ 是'k. 是'k. 是'k. 是'k. 是'kx.kp. 第 R 行的数据项: @填写不正确!已勾选是否孤儿(事实无人抚养)👩🏻‍🏭,不能勾选以下11项🗒🥽:是否特困职工子女、父亲为残疾人、母亲为残疾人、父母均患重大疾病(不含残疾)、父母一方患重大疾病(不含残疾)👮🏿🕘、其他家庭成员(不含学生本人)患重大疾病(不含残疾)、是否父母不能履行抚养义务的儿童、是否父母一方抚养、父母从业情况、父母文化🎏、父母年龄、赡养老人请检查''(整体校验时🤗,如果有错误信息 A@\d, checkYesNo h R TA@k, h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS3KT checkYesNo l0$'9 10 12 13 37 R T h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' R h$H%Z' R% h$H%Z' 是 是'k* 是'k* 是'k`* 是'k@* 是'k *k* 第 R 行的数据项: 填写不正确!已勾选是否特困职工子女🧏,不能勾选以下5项:是否特困供养人员、是否城乡最低生活保障户、是否城乡低收入困难家庭、是否孤儿🧝🏼‍♀️、是否父母不能履行抚养义务的儿童请检查''(整体校验时,如果有错误信息 A@\d( checkYesNo h R TA@k( h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS4KT checkYesNo l0$' R T h$H%Z'11 13 R h$H%Z' R h$H%Z' 是 是'kH' 是'k('k ' 第 R 行的数据项🤦🏼‍♂️: e填写不正确!已勾选城乡最低生活保障户,不能勾选以下2项🤹🏽‍♀️:是否特困职工子女🧑‍🦼‍➡️、是否城乡低收入困难家庭请检查''(整体校验时👴🏽,如果有错误信息 A@\d@& checkYesNo h R TA@k& h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS5KT checkYesNo l0$' R T h$H%Z' R h$H%Z' R h$H%Z' 是 是'k$ 是'k$kx$ 第 R 行的数据项: a填写不正确!已勾选是否城乡低收入困难家庭,不能勾选以下2项𓀛:特困职工子女🙆🏻、城乡最低生活保障户请检查''(整体校验时🤦🏻,如果有错误信息 A@\d# checkYesNo h R TA@kx# h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkDisableLevelKTcheckDisableLevel l0$' R T h$H%Z' T h$H%Z 学生残疾等级 R h$H%Z是 'k!k! T h$H%Z 父亲残疾等级 R h$H%Z是 'kx! R h$H%Z是 'k8!k0! T h$H%Z 母亲残疾等级 R h$H%Z是 'k R h$H%Z是 'k kx  T h$H%Z 学生残疾等级第 R 行的数据项🙆🏼‍♀️: T填写不正确!不能在“学生本人是否残疾”中填写“否”🛡,而在本列填写具体的残疾等级请检查'',整体校验时,如果有错误信息 A@\ T h$H%Z 父亲残疾等级e第 R 行的数据项: T填写不正确!不能在“父亲是否为残疾人”中填写“否”👨🏽‍🎤🥪,而在本列填写具体的残疾等级请检查'',整体校验时🏌️‍♀️,如果有错误信息 A@\ T h$H%Z 母亲残疾等级e第 R 行的数据项: T填写不正确!不能在“母亲是否为残疾人”中填写“否”,而在本列填写具体的残疾等级请检查'',整体校验时,如果有错误信息 A@\d第 R 行的数据项🐗: 填写不正确!请检查'',整体校验时,如果有错误信息 A@\kdcheckDisableLevel h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS6KT checkYesNo l0$' R T h$H%Z' R h$H%Z' 是 是'kk 第 R 行的数据项: ;填写不正确!已勾选父亲为残疾人,不能勾选以下1项📐:孤儿请检查''(整体校验时,如果有错误信息 A@\d checkYesNo h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS7KT checkYesNo l0$' R T h$H%Z' R h$H%Z' 是 是'kHk@ 第 R 行的数据项👌🏼🚲: ;填写不正确!已勾选母亲为残疾人🏃🏻‍♂️🤾🏿‍♀️,不能勾选以下1项:孤儿请检查''(整体校验时,如果有错误信息 A@\d checkYesNo h R TA@k` h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkFamilyDisasterTimeKTcheckFamilyDisasterTime l0$' T h$H%Z!l家庭遭受重大自然灾害时间 R h$H%Z!l是 R T h$H%Z!l'kk 第 R 行的数据项🪶: 2填写不正确!若没有遭受自然灾害✭,不必填写此项请检查''(整体校验时,如果有错误信息 A@\dcheckFamilyDisasterTime h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkFamilyBurstTimeKTcheckFamilyBurstTime l0$' T h$H%Z!l家庭遭重大突发意外时间 R" h$H%Z!l是 R T h$H%Z!l'kHk@ 第 R 行的数据项: 填写不正确🛡!请检查''(整体校验时🙆🏻‍♂️,如果有错误信息 A@\dcheckFamilyBurstTime h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS8KT checkYesNo l0$' R T h$H%Z' R h$H%Z' R& h$H%Z' 是 是'k 是'kk 第 R 行的数据项: s填写不正确😉!已勾选是否父母不能履行抚养义务的儿童,不能勾选以下2项✌️:是否孤儿(事实无人抚养)、是否父母一方抚养请检查''(整体校验时,如果有错误信息 A@\d checkYesNo h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNoTS9KT checkYesNo l0$' R T h$H%Z' R h$H%Z' R% h$H%Z' 是 是'kP 是'k0k( 第 R 行的数据项: s填写不正确!已勾选是否父母一方抚养,不能勾选以下2项:是否孤儿(事实无人抚养)、是否父母不能履行抚养义务的儿童请检查''(整体校验时,如果有错误信息 A@\d8 checkYesNo h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkInSchoolCountKTcheckInSchoolCount l0$' 第 R 行的数据项: 填写不正确🙇🏿!请检查''(整体校验时,如果有错误信息 A@\d checkInSchoolCount h R TA@k` h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkParentJobsKTcheckParentJobs l0$' R T h$H%Z' R h$H%Z' 是 (父母均没有工作(不含农村种植户或养殖户)'k *父母一方没有工作(不含农村种植户或养殖户)'k 0农村个体小型种植户或个体小型养殖户(或两者均是)'kH k@ 第 R 行的数据项: O填写不正确🌋!已勾选父母从业情况,不能勾选以下1项💒🍬:是否孤儿(事实无人抚养)请检查''(整体校验时🧗,如果有错误信息 A@\dx checkParentJobs h R TA@kH h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkParentCultureKTcheckParentCulture l0$' R T h$H%Z' R h$H%Z' 是 父母均为初中及以下文化程度'k 父母一方为初中及以下文化程度'kk 第 R 行的数据项: K填写不正确👮🏼‍♂️!已勾选父母文化,不能勾选以下1项☝🏻:是否孤儿(事实无人抚养)请检查''(整体校验时,如果有错误信息 A@\dcheckParentCulture h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkParentAgeKTcheckParentAge l0$' R T h$H%Z' R h$H%Z' 是 父母均为60周岁及以上'k( 父母一方为60周岁及以上'kk 第 R 行的数据项: K填写不正确👨🏼‍🏭!已勾选父母年龄,不能勾选以下1项🔷🫅🏿:是否孤儿(事实无人抚养)请检查''(整体校验时🌄,如果有错误信息 A@\d checkParentAge h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkSuortMembersDescribeKTcheckSuortMembersDescribe l0$' R T h$H%Z' R h$H%Z' 是 &赡养人口数三位及以上老人(70周岁以上)'kP &赡养人口数两位及以下老人(70周岁以上)'kk 第 R 行的数据项🖕💇🏿‍♀️: K填写不正确💁🏿!已勾选赡养老人,不能勾选以下1项:是否孤儿(事实无人抚养)请检查''(整体校验时🧂,如果有错误信息 A@\d8checkSuortMembersDescribe h R TA@k h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkXfKTcheckXf l0$' 第 R 行的数据项: 填写不正确❌!请检查''(整体校验时👩🏽‍🦱,如果有错误信息 A@\d爏checkXf h R TA@kxs h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkfamilyHouseTypeKTcheckfamilyHouseType l0$' 第 R 行的数据项: 填写不正确!请检查''(整体校验时✴️↔️,如果有错误信息 A@\d鴔checkfamilyHouseType h R TA@k纐 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--==================================checkfamilyCarTypeKT l0'd豴 l l1,2,3 l2,3 l1,2 l2,1 l1,3 l3,1 l3,2,1 l1,3,2 l2,3,1 l2,1,3 l3,2 l1 l2 l3'd豲'k萶k纎 第 R 行的数据项: 填写不正确🙎🏼‍♀️!请检查''(整体校验时⚆,如果有错误信息 A@\d8ocheckfamilyCarType h R TA@ko h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo10KT checkYesNo l $' 第 R 行的数据项🌯: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d爉 checkYesNo h R TA@kxm h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo11KT checkYesNo l $' 第 R 行的数据项: 填写不正确🥁🤟!请检查''(整体校验时,如果有错误信息 A@\dl checkYesNo h R TA@k鑛 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo12KT checkYesNo l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\dj checkYesNo h R TA@kXj h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo13KT checkYesNo l $' 第 R 行的数据项👰🏼‍♂️: 填写不正确!请检查''(整体校验时👨‍🌾,如果有错误信息 A@\d餳 checkYesNo h R TA@k萮 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo14KT checkYesNo l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时✵,如果有错误信息 A@\d`g checkYesNo h R TA@k8g h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo15KT checkYesNo l $' 第 R 行的数据项🗣: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d衑 checkYesNo h R TA@k╡ h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo16KT checkYesNo l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时👳🏼‍♀️,如果有错误信息 A@\d@d checkYesNo h R TA@kd h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkYesNo17KT checkYesNo l $' 第 R 行的数据项: 填写不正确👉🏻!请检查''(整体校验时🏀,如果有错误信息 A@\d癰 checkYesNo h R TA@k坆 h  R T A@'u=================================14 checkYesNo 执行内容是否为“是”“否”校验--================================== checkSqyyNameKT checkSqyyName l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时💍,如果有错误信息 A@\da checkSqyyName h R TA@k鑐 h  R T A@']=================================checkTerm 执行学期校验--================================== checkTermKT checkTerm l $第 R 行的数据项✭: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\k燺 h checkTerm l $ R T A@'P================================= 执行学费校验==================================checkXf1KTcheckXf l$' 第 R 行的数据项🥿:  填写不正确!该项不能为空👩🏼‍🏫!请检查''(整体校验时,如果有错误信息 A@\d@^checkXf h R TA@k^ h  R T A@'T================================= 执行残疾级别校验==================================checkDisableLevel1KTcheckDisableLevel l $' 第 R 行的数据项🫳🏼: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d繺checkDisableLevel h R TA@k怽 h  R T A@'T================================= 执行残疾类别校验==================================checkDisableType1KTcheckDisableType l $' 第 R 行的数据项: 填写不正确🆓!请检查''(整体校验时,如果有错误信息 A@\d8[checkDisableType h R TA@k[ h  R T A@'T================================= 执行赡养老人校验==================================checkSuortMembersDescribe1KTcheckSuortMembersDescribe l $' 第 R 行的数据项🖐🏿: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d燳checkSuortMembersDescribe h R TA@khY h  R T A@'T================================= 执行父母职业校验==================================checkParentJobs1KTcheckParentJobs l $' 第 R 行的数据项: 填写不正确👨🏿‍🚒🕑!请检查''(整体校验时,如果有错误信息 A@\dXcheckParentJobs h R TA@k鑇 h  R T A@'T================================= 执行父母文化校验==================================checkParentCulture1KTcheckParentCulture l $' 第 R 行的数据项✣: 填写不正确🏄‍♂️!请检查''(整体校验时,如果有错误信息 A@\d怴checkParentCulture h R TA@k`V h  R T A@'T================================= 执行父母年龄校验==================================checkParentAge1KTcheckParentAge l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时🚶‍➡️🚓,如果有错误信息 A@\dUcheckParentAge h R TA@k郥 h  R T A@'T================================= 执行大病患者校验==================================checkFamilyDiseaseDescribeKTcheckFamilyDiseaseDescribe l $' R T h$H%Z' R h$H%Z' 是 父母均患重大疾病(不含残疾)'kxS 父母一方患重大疾病(不含残疾)'k8Sk0S 第 R 行的数据项👨🏽‍🍼: 填写不正确♣︎!填写父母是否患重大疾病栏目🕺🏻,若已勾选孤儿,则该栏目不能选择父母均患重大疾病(不含残疾)和父母一方患重大疾病(不含残疾)请检查''(整体校验时,如果有错误信息 A@\d0RcheckFamilyDiseaseDescribe h R TA@k鳴 h  R T A@'T================================= 执行收入范围校验==================================checkFamilyYearIncomeRange1KTcheckFamilyYearIncomeRange l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时↩️,如果有错误信息 A@\d怭checkFamilyYearIncomeRange h R TA@kXP h  R T A@'P================================= 执行户籍校验==================================checkHjKTcheckHj l $' 第 R 行的数据项: 填写不正确🩸!请检查''"整体校验时,如果有错误信息 A@\d OcheckHj h R TA@k鳱 h  R T A@'T================================= 执行自然灾害校验==================================checkFamilyDisasterTime1KTcheckFamilyDisasterTime l $' 第 R 行的数据项🚵🏽‍♂️: 填写不正确!请检查''(整体校验时,如果有错误信息 A@\d楳checkFamilyDisasterTime h R TA@k`M h  R T A@'P================================= 执行意外校验==================================checkFamilyBurstTime1KTcheckFamilyBurstTime l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时👳🏻‍♂️,如果有错误信息 A@\dLcheckFamilyBurstTime h R TA@k蠯 h  R T A@'T================================= 执行家庭资产校验==================================checkFamilyProperty1KTcheckFamilyProperty l $' 第 R 行的数据项🎨: 填写不正确⭕️!请检查''(整体校验时,如果有错误信息 A@\dpJcheckFamilyProperty h R TA@k8J h  R T A@'T================================= 执行家庭资产校验==================================checkInSchoolCount1KTcheckInSchoolCount l $' 第 R 行的数据项: 填写不正确!请检查''(整体校验时🪞,如果有错误信息 A@\d郒checkInSchoolCount h R TA@k癏 h  R T A@'r=================================checkAtLeastOneNNull 执行至少一个金额为非空--==================================checkAtLeastOneNNullKT  'A"执行 至少一个非空校验 的单元格数目 l$ l=如果金额符合规则  l ' T KTF  l '  KTF  l ' KTF  l ' KTF  l 'n鐵d金额不符合规则  'F6执行 至少一个非空校验 的单元格中内容为不符合规则的数目    'k`F'nPFiHF_--------------------------------------------调用正则表达式-------------------------------------]VBSCRIPT.REGEXP$". 7RegEx为建立正则表达式 (4 设置全局可用vba中\不用转义  ($.设置样式 (&5设置是否区分大小写。 l %('3 执行搜索测试. i谼-----------------------------------------------------------新版 校验重复(说明已经没有格式错误)------------------------------------------------------------V-----------------------------------------------------------1、无学籍幼儿表先在表内查重(sheet学籍幼儿表 0A65535 ,$`%<%!2'.*cna = getTotalColumnCount(sheetIndexValue) b$`!ZB@41&每次校验重复时时,把错误信息sheet清空,'d错误信息记录开始行数X==============================无学籍幼儿表先在表内查重==================================0类似冒泡排序,每个元素和在它之前的所有行进行比较 6  . 6 : ,$`%Z'8 <  6 < : ,$`%Z'> 8 >.如果学籍号相同👨‍❤️‍👨,说明是重复数据第 < 行的数据和第 6行身份证号重复🥪🛀🏻!请检查!!!!' A@\*把错误信息输出'@k0A(A AiA-----------------------------------------------------------第一列中 根据值获取该值所在行------------------------------------------------------------根据值♜🔈,查找到值所在的行或列keyWord 查找的关键字'kbn 查找所在行或列 值为 “row”或非row'B]the find result object DL PN TR A1:A65535 h$H%<%J.H H Frow H!2'Bd@? H!V'Bk(?k ?i?------------------------------------------------------ 执行码表内规则校验(允许为空)-------------------------------------------------------------value 规则类型value1 cell的内容校验不正确返回false校验正确返回true X0说明为非必填项 $'z=k=k=]h'\某一个规则的记录数 0A65535 `$`%<%!2'^B表行数' ` lrow$B'Z=获取规则类型所在行 6 Z ^ 6 `$`%Z l \ '\d<y<k< 6 < Z Z \  < `$`%ZX X L判断规则内容是否和cell中相等'y(<k < <#此时count数目为该规则所有的内容数目i;------------------------------------------------------ 执行删除某一行操作(excel受保护的)-------------------------------------------------------------sheetIndex 表名 rowNum 行号1qazf h$HB@d ^ h$H%hB@j/ 把该行删除- Worksheets(sheetIndex).Protect Password:=123ip:------------------------------------------------------ 向指定cell中设值-------------------------------------------------------------1qazf h$HB@d l R j h$H%Z(li9------------------------------------------------------ 执行删除某一行操作(excel没有保护)-------------------------------------------------------------sheetIndex 表名 rowNum 行号 ^ h$H%hB@j/ 把该行删除i8------------------------------------------------------ 向指定cell中设值-------------------------------------------------------------@ 1qazf h$HB@d l R j h$H%Z(li7------------------------------------------------------ 根据代码表中的名称设置值(前提时🚋,名称已经通过了校验)------------------------------------------------------------- ]   R j h$`%Z!lX 'V'\某一个规则的记录数 0A65535 `$`%<%!2'^F表行数 ` lrow$B'ZA获取规则类型所在行 6 Z ^ 6 `$`%Z l \ '\d5y5k5 6 < Z Z \  < `$`%Z!lX '  VX 1判断规则内容是否和cell中相等 < `$`%Z!l'r rX R j t h$`%Z(ly4d4 否0 R j t h$`%Z(ld4 R j t h$`%Z(lkh4k`4 <iH4------------------------------------------------------ 去除cell中的空格------------------------------------------------------------- ] 单元格里面的内容]  3Blength1表示cell中原来的长度🗻,length2表示执行去除空格后的字符串长度'默认为没有去除空格2 Worksheets(sheetIndex).Unprotect Password:="1qaz" R j h$H%Z!l' 'v vGzj*"如果单元格为空🧒🏿,则不需去除空格操作  'x%length2为空格第一次出现的位置 x如果字符串包含空格  $z' X R j h$H%Z(l'k1i1鴭1嵉Attribute VB_Name = "工吆"  '-%校必填项若有错误信息显示到 批⒅&( Function checkedRequiredStart(rowIndex, c olumn )  { '单元@格内容Dim cellValue As rS唍g= A;veShePet.Cs6If-" Then*丗抇綟al4seETrund If < E)鄝[写日志 记 o矂o一个表kq坢writeLog(co鄋tent荾刬X`s(msgB)腫curMsgR纎w, 1)繨CK + 1:D嚑 获取 付ǖ腁呏登pHDget亾BCountXQ(A橠彩 碅?蠾orksHEQ.vA` %G rG用红色字<体儉?H)0HRe耫朒nLen E縆篕縍.Characters(1, ).F丂].Color7=3V妜_1&添加aǖ慊 骺常〨s+` errafo︽產ddC萶mm@wXQ儺朥y,  0殌'4UUnprotect Password:="1q|az`襡]幜.rA (Ia鄼rior#=<6@5535 '1粈粕尘懊>% d/.Visxibl狨$瓶径?渗境""9燾lear s!, 狦靬Eqo!A}).o!o!rP鵌.C `u !/2Recp)Nu8m A:ff郥otal`?客B D .&鵘E15l 刋OOO`M.ExlNo(瘓_L%A蒏 是否4*调用的8椒╫)be恎inCqc#L妚ethod?*凩@坵L濶ot銣 '如劰鸻W失败|?u$6 I剆 hing$判断<为款/T\ \磜 驦AOAa'舨粊,则去除当前乹,重新邕$ 廌rt_ z攫 '清僉 aqp/ !.<' PBox "第" &gD& "行数距菹睿簯瞙*tt$成功则3!0有q衷騽把&时的 .8MCq+remoP裵繿ceFla(/做了Q空翊,则对其进行鹛崾:德s🧑🏼‍💻,橶@校淙氲淖址Chr(34)%』C斍& w"謤邪搜 ,系统已自动为您鵤%了瑖 A ]!q?L碽- '#P荼晔斗饔枚杂Φ姆椒(点击开始校验)",{#-%B把错误信息写进列表 Functio@n callXQStart(typevals, sheetIndex, row@columnisidateCount) value = Work$s(').Cells(*"title∕sg#s\T, 圤) '获取该A=头 拿茋(If "" Then '如果喜⑿械嗄表头 7/%0 - 1 &GElse"EB@:hea俉#!HW@End Iff!D匒rgs!"0"罦脜 Like "checkLen*婱整枢ざ攘蔊膭D Mid嚊9& #EH%O 1H&Num, be鷕nm 嚑&@fl值的?&?2 Ina9?%9- 'W9Term1㎜"是、否"@为必填縇">1 6K Ye鴖No -k2 ? DiffName困泥鸭侗餫?%D~ Cods氨嗦l鎯A! 'HBIDC0ardTpM身份证件类瓦 xo(/  kSqyy申请原隐 _ _ "] e? ? kYear醃年份?MA_ _ ]  LlSelect Ca竤e  =CQ1 执辐强1 ?O?楥椧 D 3tNull U襫Met`hodXQ-Required〝瘷矁縯爚 Not !弿E error"第", &啝"!数谰菹睿罕枒& "不能眨∏爰觳/F haLsE`TrP'整体q时樣衭 fwriteLogF ' Box 5 gold.RowO & Chr(10) T頃beginC釗_comme糿t毝,?琳isFor. o+.2.学生鹦彰/_Ky-iO removeSpacep-''翢 '霖去莱崭罜Enter_蓑算X'回硛1/肆)./0催行 招7;耤 "父亲" |Or3/S"&?# U男? 蟮[D= q;仈GhNStu醤(?烲5#e checkMethod XQ = 搳: '调用去除空格的方法蟌偋Enter 回车6M迉:C, functionA竢gs朽E(妈1纆"豀鎃ork"s().Cel恖s(7J$). a 家庭遭芤咔槊枋x" 貀D 226E <> "是" And :>c荳?/Fa|lstや-A#温磪#不必亽%2 5z" 嬿V> '= ">重大自然鹪趾??兓, 31?楨T?_S??$?&@繻閑@_C!b緻緻笯!蛝环⒁馔獐! !鉯34!?ARk?- 慐?A_ /!?A !受e!  Ou?;Oc孝"欠债霸騩- `^牽56C= 0廱弿O!A =!薄E@#.鵤, g *p廝//{@\ ...金额瞼晃帐饱1贯p//,/- o嶅yI橝ra盨plit(y, ","涱`(0)訝)-UB傲dE1俷 'A筛孟钗茄0息且为固ㄡ>湛1/徹徹徹噩可勔浴 🧾👨🏻‍🏭。若 0🕛,则!为a=1)赁位 ̄⊙碩 捱谶 6锟荡2 鸱段Э螗婳& O鞡砜镢A畹扔B`也1饜喑 functionArgsArr(2) & "唬"@value1D请检@查" E lseIf0) = 1 And UBound( Then '如果该钗潜靥睿⑶椅潭ǔざrror圡sg}"第rowIndex招械氖 菹睿簛 title佁钚床徽罚瑏E不能为@空,且丄盽匦胛獊崱12 湣乚范《攘P大觩诘扔耭VR繺侧怀[珸 IfD_hasEA渶汿rue '整体校验时,A涤写砦笮畔writeLog 睏 E\0beginCheck_comment sheetB, c!Method0XQ, EdolumnisF ord '=q 执!r!Ta&∟umber类嘈停┚+繡ase "" 8槧杇etCellV翞C爺tXQ($6*"A"familyDebttAm!"b ',5駹= 0L&,瓓4飺,(岚 k> E$(⒕,J)W ]O*NotKL$x, 駦-<> -" 嫚Split娦, ","+頂③c8孔孔% 吙 棺可以W勅!郏颉为数字,QX0,整数|位8颲%傛m@Y玄●飫刅倝凩凮鱁O/&/劘}&_?CUMo瘯6喋'2 /K遼遼遼遼看$0?oS岢痚?jW{?jun黷"遞k' 0_S颻S_S(_S??))?緼+慟)_S_S鲍烻彧勒;;;o-/d#MC烻烻烻烻Oooo鵲项┳鼳麓焾)}TB数位不超过2位👩‍👩‍👦!爰觳"  End If渉asError = True '整体校验时♙,如果有错误信息LwriteLog eRMsg2焍eginCheck_comment sheetInd ex, c MethodXQ, row olumFnCisF唥  '=执行值范围的O亽.把バ唇鴣列表亱慍ase "oxVal >mE (value, functionArgs)梍If Not婹 TheNn 淚Ar峉 plit(, x","f0"`第" &Fp"行的数据项🍱:tit le@摿填写不正确,该项必须为数字,大于等勇L*(0)A🤾🏼,穷褻恿1$ABㄍ' is`CidateCo妘 c=.+ 179髐oncknVm玦am的为整蕏mma) 耔mIntn n n琔@go彆 峗d= 0b '!苛k为潜靥睿⑶椅潭啜长度蹌_}_}C}可以为空嘁袅,轧蛎!DD{W2B?(Else)1) *)'m祇馦烻烻昐不膔茔且o_T館(閛过烼rto OIoW嬁焀彆 d蟂嬒S悓摟OTkO ST身份粥ぜ号_儃>萊Sfzjh颮 resZjlx怞getCel妉Pku#kXQ(闇凎8'获取>鹉谌輳F)p7G""6?4?4O邍5Q 諊因E励嘈蛼4焹_,_,_,_,_,KO居民?齬IsIDNumbers鈉/) ') = 铽岖僔不#.规轧騉M!!!!釃┭ 咣/"/"/"/o"o"夕夕夕S?)? L=SFZxJLX%锨n$X逤o"o"o"o"枷頨x憍u1t统也怀18位!爰觳"  hasError = True '整体Q槭保绻写砦 笮畔#爓riteLog eVMsg6End If#^%$2beginCheck_comment sheetIndex, c MethodX@Q, row o0lumn峣sBF喩 '= 执行身份证件类型 乸^ =9Case "0ZjlxT悋8嵚DMB(H, value, "1")SIf Not L Th!&B日期1(防潜靥)o'{˙Id恱it膟Dp~" ' OC@汢irthd黙y榚t顰罍&出生 失剥躱烠邭邭仒邭夁"x-xx 餀如2013-02-21rZ HO汷浛 顳>h卝i(ntif逬-8p991| A馃oE惙cE憂蹈燃禥naE01哐oF? =▼q K\2 <> "Q 不 +鳑`/ oLZoMO1O1O1M1该相钣搿罢圓”必须同d时或C冶cU1?”束欠駏砍^ 33蠌3n LFaOw/7/]*= ?俍iK遤遤 ?遤焜f抝民雷謇嘈蛻j["= Case "checpkMZ" l:ethodXQ =B DMB(n, value, 1)処f No t9MIThen.yerrorMsgp"第" & rowIndex "行的数据项:Atitle-& "填写不正确✅!请0检查l3ha sE43True '整体校验时,如果有错误信息桿wri纓eLog ZElse"set狢od埲, sPheet倇,唨, column (End If @beginC羭_commentJ 蕒,:isFobr腡 '小 执行认定原因乢(非啾靥)^: 禝d@8ityReason" 'SEA僨uncti@onArgs@/"0,1,30槒蔎聾 Len( 云鹎 舌d长度必须大于等于1位,且瞼怀30達i%_j_je _kF籯,sysDifficultyGradeNameFla1 A纅i宯tifyDat+Trim%#;)" A '羷aW等级名莱莆铡'a腥掌卺,乕縼P;!}2vC#i<> "猖!%% `(40 Or 4!)R4縣客👨‍🦳!该项搿袄鸭侗!$B”ⅰ啊时间劇!m同时#+L或a(且a网ü齺牋.F焠縊7~O7J 瑌= Fa縩|: vf7q鹗欠聃廳垙 m  瘑+o坥埮埐弌埀/縿"埳矸葜ぜ类型8/籈i嘍Car郿TypeoR w礗龅飫0Ty螼a--- /-/-!螮Q5/積x/幅.'...J..+.残疾罉啾鹂.==.淬Disable.& . 缜. .懈铣. 赀.f.哌...忓Y ...* 忒. setDMBCode "checkDisableType", sheetIndex, row$column  End If6beginC訽comme nt e凪ethodXQt, errorMsgbisFor = True '= 执行残疾类别校验= "是" A黱d匞峬癋als敧 E@ rZA   怠 牃Q  ]疻~2'`OQgOQ惮踩裘挥N醒〔必岽带讼9縋縋縋L縋縋 縋y綪33廞廞Y/ beginCheck_comment sheetIndex, cdMethodXQ, rowA`olumnerrorMsg   isFor = TrueBd'=14CzYesNo 执心谌菔欠裎笆恰薄胺瘛毙牐验--R= 汙Case "`FamilyBurstTime" ?;eDMB(", value, "0")( If Work偫s().C纄lls(7 ).3G"家ピ庵卮笸环⒁馔馐奔" The瀗5n噟34<> "是" 谹nd+c-A嘺(A* `Fals撍1E'If?鉙 INot嗣\WE帕羐第" &喯"行的数 菹睿毫title佬填床徽罚∏爰觳樵メA=hasE吝A谸 '整体A攀保绻写砦笮畔6writePLog [yE.sDet`bCod昸,焜嫆CS5?榗k??樹+???沵滸+h泜S8煔X甉寶"_ aresult 3 1尺遒10掸 2 攻 38 7 , 揻-⒉|究 Q? q/痆ODO )顯* A   ) W_1縪_&q縪>縪& 縪硂已勾1煾改覆能履行抚养义务的蓝琿q`以下2醫露ㄊ率 滴奕!)劇ⅴ一方1蟯I 蟯蟯蟯L蟯 蟯y蝩鮕W哈IQ集q"/uO聋/u憨,焺M潦 _up_u耛鼷[_u9_ub =B?_u焍 3 髈u聅(ou熊Bou翕e淑ou?p our,, 37? O 禴饆痎Uwr#客飉:=/  If result2 = "是" Then  checkMethodXQpFalsehEnd If#3W~Not宖errorMsg仏第" & rowIndex"行的数@据项👩🏿‍🏫: title& "填写不正确🍦🕶!已勾选是否父母一方抚养,不能羴 以下2"孤儿(事@实无人 、履行 义务的爰觳勯"檋asE21True '逍Q槭保绻写砦笮畔writeLXog EE E噑etDMBCode "聲YesNo", shee t俈,Y, coplumnT抌 eginC痏c纎mmentJ姷,;isForODU(喼'=14 荈执行内容A佄笆恰薄胺H瘛绷p--=iCas/InSchoolCou|nt鬐$@`8(7K, value, "0")D遬g$遬遬 ̄】d縟縟縟縟猟,縠r嘿🎥?e嚴縠?玡?a?a?amc4aPa聄鄡Jobs違傕w蘞` 3cC驚lWHork" d 3桥觗鱢〢 颖 bF @*60周岁鵄由蟔裔 ?_覡,!WQ; #i ok 縄O) 5 蟞蟞g ?朖!蟞蟞蟞薶年袅湎h合h蟞i 蟞蟞蟞蟞 蟞焬蟞耯僋廻ex廻/'廻廻酢廻襬廻廻u&飅蚭飅飅飅/j1鑙SuortMembersDesc鴕ib焜s -=梛Ok=廥Ok锾樘X奜k疉@Ok咴咴|o諺Ok<w茉赡养人口@数三位Ck繞先耍7bl亦陨希﹐l ]!ol_?:nd 曵beginCAu_comm竐ntJ蕒,> isForY d'=14@YesNo执 心谌輥z为“是”“惙瘛眮k--"= FCas臲Xf咴囀=.纇(胓 , value, "0")覿挑3烤__ __@7 達_J_B+]R桬]罈]] ]達==達達 b訽familyHouse癟ypea`=cgac憻,'熒熒ccc c,縟縟l颼颼縚22h颼;_2< *_b--o2_b_b]o2鉹_CarO2 癪騚癰a煈:RV=~ 釃?"I" Or#i!1,2,3+01 1=3,3pO,22,mL зu?o6Fao(飄/_Q3q` 抗#S颰抗抗q还癸T9///禠颰oM y.禟=康q士)'蟃蟃蟃J蟃蘐oS OoSoSoS?]_)C 埗捈10啋}5喡嘞function餉rgs煼1哧G1111O鐘111*煼g1y%setDMBCode "checkYesNo", sheetIndex, row$column0 End If6beginC萠comme nt ~MethodXQt, errorMsgbisFor = 0True!'=914x执行内容是否为“是”“否”@校验--)=AG Cas娙1|1"姎|( 鐅alue, function Args)(If Not Th%櫪縡 縡 縡縡 縡 縡虴縡%W縡縡縡w縡緁3_3;a=3b縡縡縡縡8縡呙S_3諌縡&_3縡_3縡縡_3?? _3y縡汌v, 毶_3?J氱汒 蟏_3-_3氝 ^34_3_3`禵3_3_3_3_3V_3_3殜颻3_3_3* 縡_3y_3_3_3嵛玩_3_3_3_3&_3o P縡._3_3_3]s ^35_3_3_3`阓3_3_3_3V_3_3_3_3_3_3_3_3*_3]3n setDMBCode "checkYesNo", sheetIndex, row$colum2n End If6beginC萠com0ment e~Me@thodXQt, errorMsgbisFor = True!'=14q执行内容是否为“是”“否”校验--)=G Cas駣16"姎|( 鐅alue, functionArgs)If Not 餞hen @A芼"第" &F寑"行的数 菹睿毫title@p填床徽罚∏爰觳閿9醽hasEA羨@ '整体Z保绻写砦笮畔⒆*writeL膐g扙ls怉"虯亭*3'ccc-f (甪7縡XQ 縡縡縡飇%櫪縡 縡 f縡 縡 縡E縡蚥瓦c遚遚踓萠SqyyN榓me_/ck, 廲廲廲廲哒q/0廲&/0廲/0廲廲/0 /0y巆棻_0, H楃梍0+a扸Term釗养谙抅薫.. 括鐚g-齉 /+D/+/+繋骺幙嶻 /+/+/+* _[遲$w$$韔a夕絀门 /Q %" C%费A%[(%Xf1%r,U3績Xf杏齌S0? q_QOUOUq8****该项不能拔湛, *抗抗]/V/V1?V>V遀遀Y1G11遀遀6/p0M-0残疾侗餩0y"= Case "checkDisableLevel1" bPMethod XQ = pMB(", value, functionArgs)WIf NotN^Then.errorMsg"第" & rowIndex "行的数@据项: title& "填写不正确🚿!请检 查攙3hasE43True '整体校验时,如果有错误信息桿write0Log ZElse"setDM0BCod懾穝h(eet個,唴, 纁olumn@End Ifb eginCA嘷comment I 妰,=isFo6rDW!'懎 葱胁屑怖剜别c^ =7徑餞ype{紸??絤? 焇焇 焇醟 焇慯-^蕽#`^ ^^^Zb^赡养老人^v^SuortMembersD纄scrib焈SQ 縛0_繄C_匡_縚靠`_ 縛縛猔.遖(/`T `/`/`%{0rg/`0/` 10父母鹬耙碉00攺Par恗Job` 妌纉纗t/_#P/@`/_`慱廮`_廮忔`'/S^徥/e?忶/'///J///,/文化// /Cultur廮 ?/A露綾4o/踥/d 捆暇 o/o/o/o/o/暇Y_暇暇o/o/1o/Q5o/BJ// /G////r?'E//,/年|龄///A辡_/ _/_/t//E/洋/////喑∏爰觳" hasError = True '整逍Q槭保绻写砦笮畔writeLogD e擬sgTElseEsetDMBCode "checkParentAge", sheetIndex, row column WEnd If @beginC4_pcomm52AMethodXQ:b,渪isFB'= 执行磤蟛』颊邅腅=媜Cas厾FamilyDiseDescri|beT兪;兟d(c, value, functionArgs)#E瀒resulBt@!Work聗s(噣).Cell\s(俆C11"01If "蕗" Then<AD @$"父母均患重大疾病(不含残疾)蚼FaZ7ye!6N一方a m* 3Not k>>第" &啓@"行的数@据项:at0itle扩a填写不正确 👎🏿!aAF是否!,栏目`遏压囱」露蚋冕不能选择M和w7蒀:蒵烧棁纰橢蔯k:轱 藗e收入坟段eof=e/伄eYearIn鄐eRange1縠m=絜@縠縠0~ 88S8箦d8& 88O19朙O1!O1朇1O1a椣O1O1蠔O1, H蠔O1?1M.21户籍000鶚0Hj^/.喱.麖搹 o-牗卍--縠絜- ,,,O,M,++_*_*)Q))))or徬 ?)?)?)雷匀辉害))q) 5^Z繿sterT黫m/ZT/+*+鰏Y靠 ,,,,,,饸O-O-O-* -Y!.?Y遨Io/o/UL End If PbeginCheck_comment sheetIndex, c2MethodXQ, row0olumnerrorMsg膇sFor @= True!'= 执行襽馔庑Q-= xCase "]FamilyBurstTime|1" sUDMB("", value, functionArgs)-If Not Then丠D"第" &喕"行氖菹睿偤 title 填写不罚∏爰觳<hasEn乫 '整体羀时💆🏿,绻写砦 笮畔⒆*writeLog 踿p Elss膃t@[Cod詍@\I∮(X(渚家庭资产苦_Proper黷y達爘襙縚卡;縚MAI縚 縚 縚縚 縚 縚麺B甠.焈捇焈縁繜_I 埧InSchoo纋Count_r_j__=__C葵 /廮廮 //(!/巁/b讎/W///皭//廲,?_+WAtLeastOneNNullQ愔辽僖个金额为婪强--逴1慙 a3郮O + 1 t 'a u  Qk 的单元格鹗縚a 2@Money(2) And銜 <>d 0 '釄穩瞎嬖僢 DtotalB;P +Se爈ect rDc&baoj╥aoBCR:oiSum ? _ huos黨i H    zhu黶u G   oth鴈rs H飺   袽c*?%撫1W '2不3 =pG>6>>>中内容獓咽@K湃吶+鳚+ " 螶b蟐乡 F醫 '-调用正则辣泶锸給-  reg;傳(T鍄銬imaEX As ObjISet= Create("VBSCdRIPT.REG@EXP") 'RegEx为⒄虮泶锸 l rxX.Global = Tr ue4'设萌挚捎'vba中\不用转 [Patter瀗\k[U样IgnoreCa膕e;Fal> ?是否区分大小写。 BCheck0Func#僿Test(value+'执行藔阉鞑馐試 0Set Nothing End )tion@'-7掳 校验重复(说明已经没有格式错P误)/-'1、无学籍幼儿表先在表内瞼+A>EA c乊TheSameXQNew(sheetIndex2) '坔naVS s .Range("A65535").@](xlU@p).Row'cBgetTotalColumn燙ountV倇 msgBN@-).Cells.ClearContents '看螀g时时🤵🏿‍♀️,把e信蟼5清空,G纁urMsg@(@51 ' 记录开始行数 '=昡[ '类似冒菖判颍扛鲈睾驮谒暗乃行薪斜冉傁GFor i`startTitle + 2 T`o rna卹c繿rdID1D+ b#I?#+(i, [c4)jip - 1c 2蚙j^! If Zn '如W号相同$☂️,醫是av数 据A erroB"第" & j`"行的)和i身@份证号b仭请检查!" writeL(og & 'T输某鯳has$v'伩SIfoNe黿ta'第一列中 根据值袢「弥邓帙在行7唷C ,查找絻 的行或列keyWord 墓丶赛字bnBCa 值为 “row”籋蚍 啟GTet丱爥l"a(擝y Gc, #$ As StRr劳) @I缿g\er- 7-hcDim cAObject 'the fi0kresu餷t or1n醧=@k 塜蠽tX1:F(What:= LookI n:=xl耉s, A xlWhxole>6纓P Its Tu q67 8k褠= "`"1  c baEQ肐-0焣.' 謵噭码au规则羏(允许为奎)@+r嶣 q类型1 c皀的内癒'!不正壤贩祷豧褨;Q5t牎-襼DMBc, R1, 餱lagd )$"0 'AS为非必填项C+Trim1)q/A 硢0胈K!Exit歋?SA3P&Dat膍0 ' 骋桓1的峲||Num0$oArea=3屷醽'表衅呗 @*(,2鄸酭E驤U}髸醸owP Q P滛慟|%_;輘+Y{_8o凪M1e i p壸偁 C@T( 範3)&,)翭 '判断aq2 Q坪蛁3中相a 5)A_R衁5vRj' 此时c连数滥课冕1;Q_w銨obH删除.行瞼僮鳎╡x受保护的? E1 8砻14行号鳨delet鎒P2(, 鬍蟡2Unprotao Passw`|:="1qaz$攐bIs(.D ap敻眯!' P123_ 向重付╟' ?甏- Function setCellValueCountXQ(sheetIndex, rowQcolvX) Workfst).Unprotect Password:="1qaz":I抯({).{ =  Endb  '鷳 执行删除某一行操作(excel没有保粁ぃ┏,L嚛 0表名nNu@m 行号埱deleteRow郚oPro埀焺粩倹 .D '把该8?LB4 向指定Hl中设值9T?⒚??$F 根据代氡碇械拿艪W弥担ㄇ疤崾保已经通过了校验丏MBCod鋏(耴, 1丠 Dima匘at餫, c@"夽厠g~ 酕鄕CSt鴕(S帇A4 LenSx1`80矺<跫 '如果为空👨🏽‍⚕️,则不夹桢杯W2躀nqx爅 乯a格第一纬鱿值奈恢肎6 2 <> D b包3$= Rxepl(@"%P薳R淨舘 "Tru豲>q瞧 rU~|   90  0   0   0   0   0   0 X  0 8  0   0   0 $  0   0   <:4%DX%h$ h dD)hDJ$%DX%h$ h dDC)hD5龝:x(g,lhD0   <:4%DX%h$ h dD)hDJ$%DX%h$ h dDC)hD5龝x(g,lhD0   0         rU ,`a//(`00` a///(`08!`a////0I` a///<q`. a9/////<`Yaq/////,`//( `/0 ` 09 `  !///,a `9//8 `a////,`9//8`a////8`a////0)` a///nrU~|  prU '餢f#__SRP_cJ__SRP_d !h寶齉pe 皟Endn _ '定义一个结构👼🏻,描述数0据页"onst shee蕋{V1 豴1 '/ATJ僁兏郊2政策落蔪低臣苺 m8sgS8 b错牢笮畔8 噐o填表 说 3Area習3氡韻Kdme0totalCount塉乽记录总男Q槭  $startT坕tl翄7 ' 表头所在行 atLeaOneNNulD '执行 辽倭t非空A 的单元栏袷肯\中内容环瞎`嬖虻腏;Money;Varia>'每一行合计中的值K Err or@ -时,/A>A{C/ e Ms>gAD厖 rgoldRang@e '---A辉谀?橹袆 幽母跳出FTargen 进入臯侓剄functi@onArgsh'0长度">@存储方法参数的字符串fisSaveButton}CA时关闭按钮has(}Boolean倇'臠中是0否有7 TheSa@擾兄复的IdN\um]n 卛da啷胈槔无效行前,保存表>燶状态checkMet鄅odXQAA1丄0的返回鑂冦aRowS恿0= `r+锌祭x!磰x纁ardID"篔8= 3 '学矸葜ぜ号a位置 Dim is醳)!为榨ne&驅看眯?为有 … 5个必填字段 c 縡'removeSpaceFlam:去崭癫僮鰼z庎躯💅,菻绻鸻了+true,否false]g4eA椑蒯刢 凶钤璦*的t聪嗝没薪凶远碛嗝户输醥@<之丆c ur爡@*)Long '上次写EGa崱!9,应该项目初始化时值覉淮蜦 rna 眅B'总,筩屃衠^isFPOi.在根据晔兜饔貌8煌琾)B 判断;是for@循环 C_怱ele侳ChN中需要用到该变翖^馏,headI2(+省市县稻缺& S駋s9= 2 '2r的下表P! 继续no倀tinueQ$AqPJ髰PlubS7104 '藏d增?sysDifficultyGr8adeq冟729 '困难认@定级别 wtsintif yD餑s30 '1时间?6@ReasonT1原因\sO ?W6$1 通过盝 0-未 1-且"礎< 2:不Q6*_'_% _誣S@陘P @n陘@X  @rU~|       H< 68ea945c;  B       (  B " 08@HP XB px         !"#$%&'()*+,./01356789:;<=>?@ABCDEFHIJKLMNOPQRSTUVWXZ[\]^_`abcfhijknpqrsuvwyz{|}~ B    8HPX`h pB  n P hB ,$"H( p x 抙梺~xME(6 << < `@ I>  |梺&xRRME (@~0<6 <~hT032h14陳P`H陘@蕵xB蕗 @蕗4 @陘D @獉:L @代码表%错误信息说明%陘@V  @陘Z  @陘h\  @陿B鈥X@鈥@蕗d @陘.x@陘z@蕵0B陘H~ @陿tXhB!蕵B#陘%@陘&@%陿(B陳bHpH陳pH蕗 @陘$ @獉8Hh @陘P @陘*T @陘@X  @陘^ @陿:0B陘` @陘dt@陘| @陿` B蕵pB"蕵B$pHPxh p(08H0X@XX億x'=qce*\R1*#2a2$*\Rffff*0A68ea9a21(*\Rffff*0A68ea9a21\077    08  @ ` Dp 8 0 P0pD084P. ..(8(`>"$(@>`R^FX `*0$`  $  ^(^列索引号6^列名称32^0p@定义一个结构🖤,描述数据页l]$騂y=Public Const sheetNamevalsueTJ As String = "附件2政策落实统计"]$错误信息(2Public Const IntroSheetName As String = "填表说明"]$代码表H]$说明P] p 记录总的校验数]$记录表头所在行] x"执行 至少一个非空校验 的单元格数目] 6执行 至少一个非空校验 的单元格中内容为不符合规则的数目] 每一行合计中的值] "至少一个非空校验时🥌,记录错误单元格] 错误信息] %---定义在模块中📉,记录从哪个单元格跳出] 8---定义模块中,记录进入的单元格]  长度校验时,存储方法参数的字符串] 记录时关闭按钮]  记录总的校验中是否有不符合规则的] @ 记录总的校验中是否有重复的] #记录总的校验中是否有重复的] %/记录遍历无效行前,保存表中是否有错误信息 的状态] h#保存校验方法的返回值]$)遍历记录开始的行号]$)学生身份证件号开始位置]駾0记录为空的数目]X"/看该行是否为有效数据 统计 5个必填字段为空的个数] "C记录去除空格操作的执行结果💏,如果去除了空格则返回true🐥,否则返回false] Pcell中最原始的的内容,即系统没有进行自动化处理用户输入的错误数据之前💆🏿🤹🏿‍♂️,cell的内容] 7上次写错误信息时👨🏼‍🎓,所在的行,应该项目初始化时初始化值一次] 总行数] 总列数] R在根据标识调用不同的方法时🦘,判断是否是for循环 Cell_SelectionChange中需要用到该变量]$记录省市县等记录所在的行]$0+代码表sheet的下表是否继续]  ]$hH)隐藏列的增加数]$X,困难认定级别所在列]$p#认定时间所在列]$%认定原因所在列] -O标识认定级别是否通过校验 0-未通过校验 1-通过校验且值为空 2-通过校验且值不为空] $O标识认定时间是否通过校验 0-未通过校验 1-通过校验且值为空 2-通过校验且值不为空AAttribute VB_Name = "声" Public TypalueCo8lum8p '列索引号c@nIndex As I@ntegerT酶 P'S喣ngh `}\I僐 I僒 `刅 0`  I僱 @ `p  I僪 I僐 I僯  H` I僱 @ `  I僱 @ +` i儴 i僯`敧H`擧H`劗`6`劙 P` ,,I僱 I冩 @ `  I僱 @ @`  I僱 @  ` I僱 @ 0 ` I僱 @  `p I僱 I兏 @ @ ` I僱 @  ` I僱 @ 0`  I僱 @ `p  I僱 @ 8 ` I僱 @ @勅  `x I兌  I兪  D8 `  I兌  I兪   `x  I兌  I兪  P ` I僱  I儰 @  ` I僱  I儰 @ h `( I僱 H I儰   ` I僱  I儰  h `( &&I僱 H I儰   `  I僱 @ @`   I僱  `  I僱 @ 0`  I僱 @ `p  I僱 @ ` ""I冣 I僐 (I僯 `勪 `勬 `剎`勮`勱`勳`勵@勷 `勻 @勽 `匂 @匄 `匉 @匋 0` ""I僱 I儰 @  `p I僱 @ 0 P @@8 0P08 0 h h 0@H儨%X !!0p2qce$*\Rffff*0?"   "0 X ` 4p  8 X B p x        @ X h  p               ( 0 8  H  P X ` h            B 4 08@HP X   B 8@Hhx    @B X`6h | X xB 0 x  B   8HPX`h xp  B  (0P`hpx |  (B @H$Px | 0 PB hpfx |  B  ( 0  B :P`x    p B        .B     (0 8 .B   0@HPX` hB  &(PX`hp:x   D48 p  x         B x!!! !&!!!!!!:"@" P"X" `" h"p"x" "B ##(# 0#&@#h#p#x## # #(# ##D#40$h$ p$x$$$$$$$$ $B p%x%% %%%% %% "%& & < &`&h& p&x& &B 0'8'P' X'&h''''' ' '"' (( $( "8( `( p( x( (((((( (>) @)4`) ) )) )) ) H* h*B ********* * p+ +B ++ + +++ + p, ,B ,, ,,,,,-- - - -B ---.. .(.0.8. @. . .B // /@/P/X/`/h/p/ x/ (0 H0B `0 &h0 $0 0 0&0*1"@1$h11(111282H2P2 h2 222"23 3  (3@3X38p333 3B @4H4`4&h44 4&44444D4485p55555 555556666 6(60686 @6 6 6B 77707@7H7P7X7`7p7-----------------------------------------1 检查必填项,若有错误信息显示到 错误信息sheet中--------------------------------------- 空时返回0 不为空时返回1 单元格内容] R T h$H%Z'V V'd'ki-----------------------------------------2 校验学生姓名 要为汉字-------------------------------------------------------------格式不正确返回false格式正确返回true]^[\u4e00-\ue863·]{1,20}$'  l$'d'ki去除非打印字符🧑‍🦼‍➡️;0 R j$Z'  $.   MsgBox addr  !%' MsgBox addr  R j+Zki|-----------------------------------------3 校验出生日期格式为2012-05-09(允许为空)--------------------------------------- l$'zHk@]0reg = "^((19)|(20))\d{2}-((((0?[13578])|(1[02]))-((0?[1-9])|([12][0-9])|(3[01])))|(((0?[469])|(11))-((0?[1-9])|([12][0-9])|(30)))|((0?2)-((0?[1-9])|([12][0-9]))))$"^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$'  l$'d'ki|-----------------------------------------3 校验出生日期格式为2012-05-09(不能为空)---------------------------------------H]^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$'  l$'dx'khi`h-----------------------------------------4 校验身份证号码---------------------------------------符合规则返回true不符合规则返回false]79058421637905842@0加权因子] 10X98765432X0校验码 $$''去除空格]p j  6)如果幼儿身份证号为空,则设置为通过校验规则'zk Gzj $$Gzj *[0-9X]Gzj 6  6$' G 'j   6$  '   ' $ H  $G'ji-----------------------------------------2 校验申请理由 要为字母-------------------------------------------------------------格式不正确返回false格式正确返回true l$'zk]8 reg = "^(([1-8])|([1-8][,]{1}[1-8])|([1-8][,]{1}[1-8][,]{1}[1-8])|([1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8])|([1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8])|([1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8]) |([1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8]) |([1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8][,]{1}[1-8])) $"^[1-8,]{1,15}$'  l$' l' 6  l$ 6$' 6  ,'zk 6  ,'zXkPdH ,'z(k k < 6  l$ <$'   ,''zk < 6dx'khi`z-----------------------------------------校验身份证件类型 -------------------------------------------------------------格式不正确返回false格式正确返回trueP],^[\u4e00-\ue863·a-z|A-Z|0-9|()|()]{1,18}$'  l$'d@'k0i(----------------------------------------5 -校验沐鸣沐鸣标识码 42位👩‍🦳,最后一位为汉字或x-------------------------------------------------------------格式不正确返回false格式正确返回true](^[1-9]\d{40}[\dx]$'  l$'dx'khi`z----------------------------------------6 -校验户籍性质 -------------------------------------------------------------格式不正确返回false格式正确返回true@].^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  l$'d@'k0i(u-----------------------------------------7 校验入学时间-------------------------------------------------------------格式不正确返回false格式正确返回true]'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  l$'d'ki q-----------------------------------------7 校验年份-------------------------------------------------------------格式不正确返回false格式正确返回true0 l ,如果为非必填项'k z k ]^((19\d{2})|(2\d{3}))$'  l$'d 'k i q-----------------------------------------7 校验月份-------------------------------------------------------------格式不正确返回false格式正确返回true](^((0[0-9])|(1[0-2]))$'  l$'d 'k ix v-----------------------------------------9 校验学籍号-------------------------------------------------------------格式不正确返回false格式正确返回true@]^\d{4}[0-7]\d{3}[0-3]\d{7}$'  l$'dh 'kX iP v-----------------------------------------10 校验电话号码-------------------------------------------------------------格式不正确返回false格式正确返回true]^\b((1(([38]\d)|(4[57])|(5[0-35-9]))\d{8})|(0((10)|(2[\d]))-[2-9]\d*)|(0[3-9]\d{2}-[2-9]\d*))\b'  l$'d 'kiv-----------------------------------------11 校验银行卡号-------------------------------------------------------------格式不正确返回false格式正确返回true0]^[1-9]\d{14,20}$'  l$'d'ki-----------------------------------------checkXn 校验学年如(2012-2013)-------------------------------------------------------------格式不正确返回false格式正确返回true] ] 1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'  l$ l-$'$$ 'dX'kHd@'k0i(-----------------------------------------checkOption 校验备注如(长度小于value2)-------------------------------------------------------------长度不小于200返回false 否则返回true8 'z0k(   'd'ki------------------------------------------------------比较大小(小于等于返回true)----------------------------------------------------------------'value1大于value2返回false 否则返回true X' X'   'Dd'Dki------------------------------------------------------比较大小(小于等于返回true)-dec---------------------------------------------------------------'value1大于value2返回false 否则返回true8 $4' $4'   'd'ki}------------------------------------------------------校验长度--------------------------------------------------------------- ,$'' l$/如果为非必填项'kzk]8 1^[\u4e00-\ue863a-z|A-Z|0-9()(),🤙🏼🫃🏽,🤢。.、]{1,200}$'  l$'d('zk ,-下标从0开始👨‍👨‍👦‍👦,其值为指定的数组维可用的最大下标 l$$4 l$$4'zkxd 说明是校验固定长度 l$$4'z(k ki}------------------------------------------------------校验长度---------------------------------------------------------------P ,$'' l$/如果为非必填项'k z k ] 1^[\u4e00-\ue863a-z|A-Z|0-9()(),,🧔。.、]{1,200}$'  l$'d'zki}------------------------------------------------------校验整数--------------------------------------------------------------- ,$'' l$/如果为非必填项'kzkx l$& 如果不为数字zP l.e+如果包含小数点z k ,-下标从0开始✊🏼,其值为指定的数组维可用的最大下标 l$$4 l$$4'zkd 说明是校验固定长度 l$$4'z0k(k i------------------------------------------------------校验数值范围---------------------------------------------------------------h ,$'' l'zHk@ l$) 如果不为数字z l$4e) 如果小于0zk l$4$$4 l$4$$4'zki------------------------------------------------------校验数字长度(Number,可以为整数也可以为小数🂠,不小于0)--------------------------------------------------------------- ,$'' l$/如果为非必填项'k`zXkP l$% 如果不为数字z( l$4e% 如果小于0zk$'+整数部分最大长度$'.小数点最大位数 l.''' "说明没有小数点 l$4' $$4'z kd 如果有小数点 l l. $'D单元格中数字的整数位 l l. $' $$4 $$4'zXkPkHi@-----------------------------------------checkIsInt 校验不小于0的整数-------------------------------------------------------------格式不正确返回false格式正确返回trueh ] ^0|[1-9]\d*$'  l$'d8'k(i -----------------------------------------checkIsNumber 校验为Number类型-------------------------------------------------------------格式不正确返回false格式正确返回true ' l$'k(i -----------------------------------------checkMoney 校验金额0-9999,整数-------------------------------------------------------------格式不正确返回false格式正确返回true@]^(([1-9](\d{0,3})|0)|0)$'  l$'d'ki-----------------------------------------checkMoneyTJ 校验金额0-9999小数点后一位-------------------------------------------------------------格式不正确返回false格式正确返回true]^([1-9]\d{0,7})$'  l$'d'ki-----------------------------------------checkPersonNum 校验幼儿园人数至少一个人------------------------------------------------------------格式不正确返回false格式正确返回true0]^(([1-9]\d{0,3}))$'  l$'d'ki-----------------------------------------checkIdNumLink 校验身份证号中性别和出生日期与用户填写的是否一致------------------------------------------------------------格式不正确返回false格式正确返回true If colIndex = jhrIDColumn Then checkIdNumLink = True Exit Function End If]H%性别和身份证号上是否对应]`$出生日期和身份证号上是否对应]x日期第一次出现的下标]"性别,单元格之内的内容]$身份号截取的内容]!出生日期,单元格之内的内容]"身份号截取的内容]#出生年份] 8%出生月份]Ph] $' $'  (倒数第二位为奇数🌶,则为男性男 R  $`,Zd倒数第二位为偶数🤾🏽,则为女性女 R  $`,Zk $' $' $' -  -  R  $`,Z'iH}------------------------------------------------------校验长度--------------------------------------------------------------- ,$']^[\u4e00-\ue863·🧑🏼‍🤝‍🧑🏼。𓀊,]{1,66}$'' l$/如果为非必填项'k z k ,-下标从0开始👨🏽‍🦰👨‍👨‍👧,其值为指定的数组维可用的最大下标 l$$4 l$$4  l$'dp 'k` zX kP d 说明是校验固定长度 l$$4  l$'d 'k z k k i -----------------------------------------校验考生号、学籍号、学号 -------------------------------------------------------------格式不正确返回false格式正确返回true0]^[a-z|A-Z|0-9]{1,40}$'  l$'d 'k i WAttribute VB_Name = "校楹" '-%1 觳楸靥钕,若有错误信息显 示到 sh`eet中$兛帐狈祷0! 不为1 Function checkRequired(bIndex, row coluDmn ) '单元格谌Dim cellValu@e As S弉g= Work5s8).C s(;If2咐" Then0並 g蒄alseE妠Trund If 濫牓-2"羵学生姓 要为8鹤& !格式不正确盗uf7'At1憢wStu仺(vg覦plreh @"^[\u4e00-\ue863·]{1,20紏$5@_@ CA屽(, 蘟BW Wa ka@@コ谴蛴∽址粓removeEnter睧盿dd瀝@&悳E@;In(1, A , C@hr(10) 0( 'MsgBoxcO App衛icao.f`e5.Clean(A@疻' _O$3鎃出生日期酜为2012-05-0@9(允许翂) "4"CBirt0hday*R-Tr靑md"畕 鐅Exit */A羪#a奯'繶 ^((19)|(20))\@d{2}-(0?[13578] 1[02]))-9a[12][0c3[01撪 (( 46"11Y 0?2q )))p;[1[O飄8焺 c礒AJ9?P佃迍燂錠](矘荒]--.伋.Necess@C驤/oX "((P&汞|(j( 3-?`PP粁:匭9蘺颩;42!z身份证号码符合0规则!x鉽'籌ty5H IsI DNumbpiBy 噿, 爾嬺g)Boo羇覮Const W' "7905842163"2'加权因 萤c10X98765432C蓲 '码' = UCase(儾Z )) '翱崭-sIyger, i=T怌= babyIDCⅶ| A醼4揳 缋果幼儿e:,则设置梧ü1 絻 dd 豤! Len( <> 18B 0 Notp er@ic(Mid, 17@4 f%Like d"*乬X]_  For= 1 To 17C鯰qW0T噾谞C 1@膽1sps + ; Bi! * TNexts Mpod 1惽RPight)c,+)3 /~4/`<绾申请理勇摄鹤帜?怋亾锖Q锖棕鳶ql攽彂j螾襍@SO%+x- 筯'6((0f鈴r[,@羮/#](1- X 撦?<9 |S OO{1 [,谴]{1}[1-8 ]) |([,?P)) $"  reg = "^,15"}6If CheckFunc( , value) ThenAEBc#SqlyKT(rues Le n(2For i1 To snMid(LCase-, i0, 1)Di 燤od 20= n <> "," J KFals凨乆 ExiDt 乲tioeE鄋d If;<= s A 丼P3﨓 Lg3A9I3匒aj繰i + IbX m@蟗j莃 uG ABm腄衈謁a@1W`I) N`ext j i?奓晊莥'-%校验身葜ぜ类T& '袷讲徽婪返回f盲Bt傁dFZJ腖X阧Dim乻!! +爔\u4e00-\ue863·a-z|A-Z|0-9|() |()缊,18|t|"` q1穲n1z+5/c-3 学`标识码 42位詈笠晃晃鹤只|騲Z 5@85c餳Cod%機4551-9]\d{40}[\dx] 22'#6H2户籍性x质 8..F amTyp.^(\u519c\u@6751)|3bf\u95477ce`e02)?222d=2?2/#7 2入姥奔鋉/K/0ck郣XDat/0A0(((19@20))02})((0[郕]@12])O埇h3?r弎+[/ 焎 --$年份鄽Year鉨, f牄!嶢rgsAr顁'昩權"彄S=皥銞 '如潜靥项ScWpcYUa9縼pq$$|(2鶂3}#琌2孈oFe}s道04比较大小(7等于=6) ;@7大'eMa ⒐ uCom0pare鰾BCI趎{1菷2郋鳗J'J9c 87э:52+X5d|ec/2嵾貪髞pF)) >$=<袞) A纕暔<s#2)轿 O?]AD '说明事!=固定a=铮1o  魪q匜0a鍳/O-OFamilyIn怺eTypTO'EOO吏}7rm螾0/螾Pbr暣ype = Tr ue End If\xit Function< \Dim reg@"^[\u4e00-\ue863a-z|A-Z|0-9()(),.、]{1,200}$" BIfRChec k(R, value) The 薱'amilyIncomeT1頔ls ~Fa=E泤亯T償  '-2校裛檎 匜 rInt(侽, ftArg宻)G\Arrp@Split(, ","  孡缋o@""PlAmQ (0) 0 '如果为穩潜靥钕頖*H 投琅 Not IsNu鄊ericCQ(不为数字 (諎柪=InStrd".") <> =包含朽∈悖L饊繳Bound妎:+2+下标0开始🤸🏿‍♀️,其值为指定的槲可用的最<大/ Lene">= CDecm(1)) A H/@ "rb盄F=JF小0,/ $,?@gspG怾3@]`馚/2Uy_ u0/?*s/字qA(0bber,可以为Q| 也,不)O1P1縸0! /縸1皸1縸0鸧縸}i?6Ir7b鬘?10 7籁瘆U 鳢%6 PnI}6僣 maxP'f3 '&部分{_jDouble92) '髥位数{A坕ntgth7螊Qu崞蘀do~uE8挥袚 k pE窫`P (%QHrrH%u*_#_&C(o hMid魼1, - 1单元格謷小牧#位_!h+pC 飸rb耿凩(铫_?q0Uqg狯\椴 Is> 醗dcC_--劦- '格讲徽贩祷豧alse#LtruHFunction checkIsInt(value) Dim reg = "^0|[1-9@]\d*$"2IZfJCQ(), G Then%PgJTE7  $FEn纃 If !+Number 校验温类型&#焺箖@ T= 垇 礗seric? 盚PKZPck@Money BP紷鸲0-9`Qq$奝R((B(\d{0,3})|0鐏tA= Z 'V嚶TJ蚡小数点后一?18Y鄪qG1C1"17})0)1壟 0ey%*i繅;(0Person鄉#1幼儿园人数至少酪桓鋈嘶001刡eb_1eR1'!1 遙'$1処d@1Link1身份证号中性别和出生日期与用户填写的是否鹨恢 744(", rowIndex, c躱l"$駹'咂簀hrIDCo衛umnlc'1`1LvExit 'u 52 QUisGe rRight As Boolea榥 'CE上0对应Bi榬th和/+length2S媏g衸'q谝淮纬鱿值南卤闧gb V釐StringS ,单裰诘 哪谌轃er 1J 号截娜m bqe?"棥a" year, QBVarian坱 '1年穕 month, b 月day, @arrE1*MidU.17, 1- 7Y= (8袗AZMod 211 ,倒q诙位为奇数,则为酿@GSheets(sa7).C鄀lls(9#7b)"男劙E艾偶女衝詿A*1毗畽礉 w! 莵, 4"!, 5, 2x罄 _, Y2O" 0 + "-" +*pp遷 廚才馣gM'\伮长度3 又Sp圠en銀, f勜0ArgsiArrSplit(羪, ","8罜胤"^[\u4e00-\ue863·。🤾🏼,]{1,66鍡# Pz黟6b蓠"Lg4l (0Q2039'如果为非必鹛钕頶 q:)璱痩 繳Bound0 2 1d从0迹渲滴付ˊ槲捎玫淖畲笏fqpf) >= CDec=(1)) A;<rs (2;蹊0 If regCheckFunc(`, value) Then  ctSpLen = Tru鈋bEls:f O腇a2End Exit 遲io %V '得魇切Q楣潭ǔざ.6(= 繡Dec(f9ArgsArr(|1)灙忍{?d  喜cDz乮r'-%乸考生号、愌Ъ号&& '格讲徽贩p祷豧矛Bt;屡- 僒膴擠im类酪"^[a-z|A-Z|0-9]{1,40}$" g壝舒酸坢卆-__SRP_8__SRP_9;N z廭ˊ__SRP_22rU 0` a///(`/0` a///(`/(!`/,I`Q,q`q//(`/(`/( `/( `/,9 `//(a `/( `/(`/(`/(`/,)` //,Q` //,y` //,`//,`//, `//,1`//,Y`//(`/(`/(`/(`/(!`/0I` a///,q`//( `/nrU $`$`n19YL3梺n H!\'"获取工作表数目 0工作表数目不正确🟤,请下载最新模板后👨🏼‍🔧,再进行此校验A@,1qazf$HB@|k1qazf$HB@d1qazf$HB@d1qazf$HB@d b$`!ZB@4-$每次开始检查时,把错误信息sheet清空,'d错误信息记录开始行数'.该次校验中🫅🏻,记录是否有错误出现(幼儿信息表中) ('#默认认定困难级别名称未通过校验'默认认定日期未通过校验 b$`!ZB@4-$每次开始检查时,把错误信息sheet清空, 0A65530$H%<%!2'. .A@l 获取列数方法 IV5 6%<%!V'xcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).ColumnFAILUREA@p&+获取是否校验成功标志单元格,并把值初始化为0'空记录数初始化为0 * 2" 保存时执行d 开始校验按钮事件时执行.您确定开始检查吗🏂🏼? 检查过程中👨🏻‍🍼,请勿关闭excel👷🏼, $.否则可能导致数据丢失或检查失败 0温馨提示$, 2d1qazf$HB@|kk.$H!b(v)把页签设置为无色 .  "没有查找到学生信息,无法进行校验!A@,'*1qazf$HB@|k'该次校验中🔖,记录是否有错误出现$H!中错误信息如下🈯️:A@\ .  6  .'<"执行 至少一个非空校验 的单元格数目';6执行 至少一个非空校验 的单元格中内容为不符合规则的数目'''5"至少一个非空校验时,记录错误单元格'9是否为有效记录 'C记录下校验改行前🙆,是否已有错误';记录性别或出生日期是否有错 <  <$H%Z!l'O第一行中标识的值'2=判断for循环中是否调用callFunctionXQStart 若没有则执行默认方法 <如果标识符不为空 -$' G格式如1✥⤵️;4-3:2🖖🏼🥨;5 :$'H6格式如3:2;5将获取到的标识符进行拆分⛹️‍♂️,拆分成行号和规则 DJ如果需要两种及其以上的类别需要校验(如默认校验规则和第三行自定义校验规则)   Y&+1是因为数组中第一个元素为默认校验规则 $ :$' V*将获取到的标识符进行拆分,拆分成行号和规则$ 'S自定义标识类型所在行 6 $ ;$'c自定义标识类型的具体值   g对标识符进行遍历 $ 6 < A@}根据标识符值🛤,调用对应的方法k  $ ;$'P将获取到的标识符进行拆分   W对标识符进行遍历 $ 6 < A@0k( eJ 格式如3:2💂🏽‍♂️🧑‍🦽‍➡️;5$'Q自定义标识类型所在行 6 P如果标识符中的行数等于当前行数$;$'e自定义标识类型的具体值   k对标识符进行遍历 $ 6 < A@根据标识符值,调用对应的方法kd-只有默认校验规则格式如1;4$ ;$'H将获取到的标识符进行拆分   O对标识符进行遍历 $ 6 < A@0k(k  6 <$H%Z( < 6执行 至少一个非空校验 的单元格中内容为不符合规则的数目   第 6 行的数据项: 中至少有一个需填写正确!请检查''8整体校验时,如果有错误信息 A@\  'd   ' T每一行合计中的值k <,一行中如果五个关键字段全部出错🧒,则将该行删除 6 +  ',"将错误信息表中的该行错误信息删除掉 " d  d d  b$`%hB@jr 把改行删除 " d  'd 'k 6k $  6 删除无效行 $$' $ (f F.梺UxME<6 LL L "L<8 4 `H黭Pz}@h ys@ X x@ H @8 @@( @ &` `( `* `凥 `, %hXXPPH,b`d@ @酤 @濑 @0轧 @H宁 @`逮 @x @旫 @匎 @t @p 0.l6p@ ` @8P @@ *2.0\@0 @, @6 @ 2@ 02 @忑 @<荦 @@听 X;@箭 @;@ @p滮 @岧 C@| C@l @(\ @I@L h(I@H x(KM@8 Q@( QS@ (Z@H 8Z`\@p H`@椟 p`pb@f@ 攸 @"h赛 @更 (t@p 8tHvz@$橖 @堻 p|@x |b@*@ h @X @H  qce$*\Rffff*0<68ea91f5*\R1*#408*\R1*#140*\R1*#134*\R0*#17$*\Rffff*0A68ea9a21*\R1*#12f*\R1*#43$*\Rffff*0>68ea945c$*\Rffff*0B68ea9a22*\R1*#13c*\R1*#2a2*\R0*#2*\R0*#f*\R0*#1 h"hp:x.6" "H.p )  :+ ;8@;H;h;>;" : "P,`$>;,],( @$UX ~P1 Pp W 0;8X `h.=p  ,+; * *RP %0 %D % (% 0%0 8% h%,%& #6M$J0 $" (,3 (P3 (`( (,L, 4JI <(( <? P D6H` D0& HB< D  @ , ,0 0 48H@ 40&x 8 < 4 0 )" <( <<0 ( H6HX H0& PB< H <(",8H@,0&x0 <, ($$M  < "P(L7h(&( ( )$ 0 >8,x, (,&40M, , ,0 8 @P(X *+$,  Z 4+=1 ( 04 @ $x+=P1,] ,P h4+p=1  ; ; ; @ xH" 2$ @H6 * :@HP  X h, a--------------------------------------------点击开始校验-----------------------------------------]@]X+某一类型的标识(包括行号和类型格式如3:1;2)]p 标识数组(默认标识还是自定义标识)](某一类型的标识数组(包括行号和类型格式)] 某一类型标识的具体值]自定义标识类型所在行]%把记录为空的行号放进该数组] A@bB 把改行删除d8  $ A@bH 把改行删除k $  此次校验中删除了 ,行无效数据(姓名、学籍号、身份证件号、性别、 $.4出生日期中有4个及4个以上列校验失败即改行为无效数据)A@,kH *有错误信息☝🏻,请查看“错误信息”表,进行修正A@,$H!b(v b$`B@Hd '@A@* @'%执行校验重复数据方法,如果没有重复数据遍历看是否有需要删除的无效数据 校验通过!A@,.$H!b(vSUCCESSA@p:+获取是否校验成功标志单元格,并把值初始化为0 0A65530$H%<%!2'. .A@ld *有重复数据,请查看“错误信息”表,进行修正A@,$H!b(v b$`B@Hk( k 1qazf$HB@1qazf$HB@1qazf$HB@o q-------------------------------------------------查重复方法某一列------------------------------------------------ ]`x] 0A65535 X%<%!2'.2总行数Scripting.Dictionary$"..O8O . X%<!l'0>获取学生姓名列所有数据 2 0%"对学生监护人身份证号列数据进行遍历 2 2 .%4-如果身份证号不存在 2 .B@6&#add方法🐿🛗,第一个为key,第二个为valuekk (!8'*Sheet2$HG:G7<B@4 * !%< (!\G17<,:q0.(o Attribute VB_Name = "主绦" '-(点击开 夹Q&l Sub 测试所有:规虿⒋蛴〈砦笮畔() Dim rowDataNum%typevalsue '某一类型的标识(包括行号和格式3:1;2)?bsT '数组(默还是自0定义CvalEntity8?: 7,的@具体值媓R0ow '>乢所在行isNullArr(500) As Integer '把记录 盏膩伔0进该丳 sheetCount嚸俉orks. '获」ぷ鞅硎堼目 If H <> 3 Then羗 MsgBox "G不罚胂略刈钚履0搴螅俳写藖@犅"(1).Protect Password:="1qaz 罝Exit 罉#繣nd IfKUnpH 2).h 3_ Sas(m sgB佱).Cell繻learCotnts '看瘟丶觳槔时,把蓚` 清空,C7cur]翋= 1 'G A樾数 hasError=Fals`h该碆瘟/中, 欠裼!出现(幼儿醨表 膆Application.ScreenUdpdng sysDifficultyGradFla0纀 o认定困鸭侗鹈莆赐ü!!cindeofy 乪O日期M?,?,-, rna薍Range("A65530").N(xlUp 鋙w s n;"鈐XQ 1, 2^, bm晾4穐椒$c"1".D IV5 ToLeft`Golum$p'1:1`F*(What爃*", After:=[a1], S郞chOrBdAxlBy@Js1Dir爌`>:=xlPrevio|us@8, "FAILU8RE"儕aL!<成功标志单元格👝,并把值初始嗷0 茷览 0繤空U `} isSaveB uttonvbOK鈸 嘟4嫘时执E狤耞耤`匕磁ナ录)剨 儦("腵范▉乺穑 过h请勿关闭excel" & Chr(1`& "否则可能导致数据丢失或失捌躟1Can`@&温馨提示") c"艥@ 鲖?煣 薙T9TKTab@clor I:x -4142Ai页签设置为无色 恉35startTitle +蠯 靌 唀没有查找到学生盜🧶,无锋ādQ%➡️!焌Q!%焔焔譧9QhXXXQ1writepLog + V`'"2\如下?-> 讐}F恉i2 To酭 atLeaOnefN褝搰= P>: 至少一个非空 的肂塐袚翲中内容蝷环蟖的?totalMoneyw&e憏怓 "唢? %}"餟亙酭}ijs0ki`}eH慬晰户15/淚nE '下笎埃颥Q已C0??9dcb詬性别阑虺錾偙瘧}-j 1,遬u咨=9"瀊(j).@榴说谝恍兄衏'%羅is = $判断for@循环中 饔胏allF坲nc!歑QSV 若慡则51▎/燴w 0縫&QZ@ '如果 辐弧/T厝= S牑t(o -o'蜜1⇨;4-3:2🤏🏼;5P蘅 ":摲c将Q蔚#鋭符Ad拆分缊鵓成沅?IUBP謉(S) 00s"需街旨捌湟陨系睦啾餛Q0(珩和第鹑杏酻5鍻 叴 "For m = LBound(bsType) + 1 To U *'+1是蛭橹械谝桓鲈匚闲Q楣嬖 # %val@Entity峉plit(m), ":") '将获取到的标识符进行拆分,成行篨藕7Ht丷LowDJ(0? 远ㄒ鍋=类型所在行3v4"If i脌S匵Then)'疈>bGA1羈;羈薆的具体诸@F)H'对莯8槔=callFunctionXQStar$t (n>1, i, j@sValidateC蝨 '根据C$值,调枚杂Φ姆椒&&NextEnd If!e! mi/aAYsA?= 繤alse 焂M5哤C氞w爤"W祱? U U rSoSQ 縈縆EG=?蛂ow阆<> 0?k袷如3:2;5_e呛 熀 v 羆W) '绻嬓的惺扔诘前a鐗3E?_识駉?_?4__?6_ i_____9?:慩'(挥)灨B91|4'廦廦顫//O$O$O$O"O"M" ?oWorksheets(1).Cells().L鄌cked怞聑 3= j}'葱 至少!雅非空q 牡ピ裰心谌菸 环媳镜膒数目UatLeaOneN豼lls泜fA0懐|= 6?塵errorMsgP@"第" &篮& "0\数据跋睿篈rE"中有需填写正确🫴!请检8查"hasC= True@ '整体保e有错牢笮畔OwriteLo|g =S=鵡T+ /~!僌ntotalMo`neySu戭+ '每一袬湎计许娘蘋4?Q},c= 4$嶢中五龉丶侄稳砍龃恚蚪眯猩境裏傅 isNullRowArr(`Num) = i $ |z + 1+'将错误信息表中的该行删除祩+PFor p朄curMsg - isValidateCoun鄑 To ,YSheets(msgName).8s(=).Delete '癭迅男q+pN`ext p$=J> F+hasEr抮[= InZ仧End If :槯僸0亅A虱- 1 '_ 扌袨+ro鄔Data粮蘄覦q)If D!hlen^ 堘d聤1 , )廍lse鄅q 遃 3潰;qw&j6> 8>(爚Box "舜涡Q橹羈l了" &伳燗8& "行?荩ㄐ彰⒀Ъ拧⑸矸葜ぜ性别、Chr(10) "出生日期中有 4个及以上列失癏芗|为F ┺"wn%lT渔Γ氩看“%北恚行拚Works1).Tab.ColorInhdexi67摇SyXct擰 `S ╜ Fa3VcheckXQNew (1po'NotA扙 n '执#酇馗!>方法,如果0挥兄'槔词欠裼行枰獊<的;3罛通8过!/潦/-41427 setCell@皍eXQ 2,A8, "SUCCESS" '获取! 成功标志单元格🚣🏻,并把值初始化为01=rnap"Range("A65@530").-(饃lUp"qI 熞y 繬 !Ona%FW2_2_2_2_2_2?@僝2NAProtect Password:=`"1qaz '2).A3 Sub '-g查!8泥骋涣羞T  锳(rADim myDic As Obj",KeyVa餽ian睮B4, var醻|s/@Active.Y/5]/ '总惺*Set idg = Cre皎S ("Scripting.tionary"'芃e" = "O48"p>O1j@ ).0valu0︶>学生眒列所据睉Eac h cara IFn '对 嗷と梭p号蘖乨馪 p淰<> "" !W!Ye .Exis藧硠) '盭e啦淮嬖1懼Add, 駖 'add#,第一个为萲ey二?K4塻Smy毡"=C$.sr燱ith 4"!F2W!G:G!ClearCont竐ntc0 &1Resize(+Pw柿貯pplica1!.Fun@(on.Tran餾posa #1 O 'c0= `hP& !:  fA a(Hh !Iaa)aQ 9D0)酤$  0l酤齣濑(濑]鸃+'t'旫'逮:濑N轧轧 6__SRP_3%ShowFormSheet5__SRP_10 -    )&! "#$%'(-/+,09:2345678*;<@=>?rU~| K 19Y $  )iA a(Hh !Iaa)aQ 9D0)酤$  0l酤齣濑(濑]鸃+'t'旫'逮:濑N轧轧 6轧逮旫t;:宁%p(濑%$  dp)p;:宁%p(濑%$  dp )p;:宁%p(濑%$  dp )p;:宁%p(濑%$  dp )p;p:濑 %$  dp逮 裏 )p5逮 { z" $  zz;p:濑 %$  dp逮 裏 )p5逮]羷撅%:宁%p(濑%$  dp轧>逮A旫Uz)p6轧逮旫,M匎@(旫(逮(轧t 6轧逮旫tU沥溜%'宁%:濑%$ ⒃pp逮"鋤)p6轧逮1:匎Ntt(旫(逮(轧P 6 轧逮旫t (濑@u 珲:W 轧 !'0'P:"Ntt:濑#轧逮:宁$旫^6 轧逮旫t0;:宁%p(濑%$  dp)p=(宁绎%p(濑%$  dp轧%C&)p5轧 u+'t'旫'逮:濑'N轧轧 6轧逮旫tz ;:宁%p(濑%$  dp)pzRp(濑%$  dp轧(:宁)逮`,旫 */,)p6轧逮旫 u ( D宁 (濑+ (濑, (濑- ./ :濑.0 (濑忑uz1z2(荦uD宁箭t M(宁%荦龘 @p(濑%$  dp轧 A逮3h)p5轧z4h:濑.]鸃 3:濑5N轧轧h,逮 6逮X/,5轧3:濑7N轧轧h,逮 6逮/,5轧X5Ip,X5ILi滮X5I齣宁|I滮龘 @X鼖:宁7N逮逮轧,旫 6旫H/,6轧逮(濑%H( (3H(濑%H鼖:8N逮逮轧,旫 6旫8/,6轧逮&85IL齣l85I齣宁L秊<l @8蛟﨟q酤忑荦(逮l酤旫 9-H6轧逮旫 l~L齏 滮|齸 u4kH(濑%X鼖:8N逮逮轧,旫 6旫8/,6轧逮&85IL齣l85I齣宁(齥<l @8蛟﨟q酤忑荦(逮l酤旫 9-H6轧逮旫 l~($ 5Ia (濑%( (3\ H(濑%鼖:8N逮逮轧,旫 6旫8/,6轧逮&85IL齣l85I齣宁齖 <l @8蛟﨟q酤忑荦(逮l酤旫 9-H6轧逮旫 l~  H(濑%X鼖:8N逮逮轧,旫 6旫8/,6轧逮&85IL齣l85I齣宁椟 <l @8蛟﨟q酤忑荦(逮l酤旫 9-H6轧逮旫 l~椟 M黤匎%龘 @荦龘 @p(濑%$  dp轧 C:)p5轧 荦箭s",(濑]<轧,+/逮'旫 7:濑;轧:宁<逮0旫:=t/6轧逮旫tz/轧 *5轧忑(濑麛轧忑 攸-麛轧攸忑(濑]3 @"@(濑麛轧@&v 齣濑忑麥轧赛v i Mv 齣濑忑麥轧%p:宁 %$  dp旫>裏?)p5旫 赛d v 齣濑忑麥轧"{ u1z (橖@(濑麥轧x鼅 橖"漰z橖(濑]3C zM宁@(轧逮 @ 6轧逮q ,kzD濑橖麥轧旫旫(逮t @ 6逮旫t 橖x @(濑]鹴 Z'H'h'0:濑A@轧:宁B逮 旫 !旫t:CP 6轧逮旫t0麳u +'t'旫'逮:濑DN轧轧 6轧逮旫t=(宁%p(濑%$  dp轧%C&)p5轧1p:濑 %$  dpE)pxzF(轧逮 G6轧逮 uF+'t'旫'逮:濑HN轧轧 6轧逮旫t=(宁绎%p(濑%$  dp轧%C&)p5轧1:匎INtt(旫(逮(轧P 6 轧逮旫t]羷撅%:宁%p(濑%$  dp轧>逮A旫Uz)p6轧逮旫,M匎@(旫(逮(轧t 6轧逮旫tv+'t'旫'逮:濑JN轧轧 6轧逮旫t=(宁%p(濑%$  dp轧%C&)p5轧1p:濑 %$  dpE)p;:宁%p(濑%$  dp)p;:宁%p(濑%$  dp)p;:宁%p(濑%$  dp)p40g,# 听箭岧|\L8(椟更堻x荦滮Xl赛橖攸h忑H8(@< H,p轧逮旫tP0hH0 xME(SPSSS0{01C7B51F-8C2C-4478-85BF-5466CC284197}{76F04303-F80E-493D-B5E6-07F1F3C6B947} @@ D%侢 %@@qce " 0 8"HP Xh x取消' B@BoH确定7@ F' B@BoRAttribute VB_Name = "ShowForm"  鳥as|0{01C7B51F-8C2C-4478-85BF-5466CC284197}{76F04303-F80E-493D-B5E6-07F1F3C6B947} dGlobaBl奡pacoFalse 奀re atablPr@edeclaI"d覶ru BEx0pose0TemplateDerivCustomiz婦'取`消 P Sub CancelButton_Click() notContinueBool員 Me.HidZEnd!'确亩 ,onf諒,9-Fl;/Dr梺h#<題暇憚O祛eo F溷潩窏綜潎)9 x溷潩窏綜潎)9 滎}暇憚O祛eoME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H0凗h %偁H %8p@@xx8qce$*\Rffff*0C68ea9a224 xAttribute VB_Name = "She@et5" 鐱ast0{00020820- C$0046} |Global!腟pac扚alse dCreatablPre declaId玊ru BExposeTemplateDeriv$払ustom izD2rU y y )4Y`rU @nPLW梺蕵xME__SRP_112BPrintForm4_VBA_PROJECTv$dirG[(SPSSS0{D1FE3BB4-79AB-4849-9B79-57BF72A0F7F8}{6C6E8FA6-BD75-404B-B840-1E77DAF77D5D}x0(%侢X0 %`X0hqcex獍Attribute VB_Name = "PrintForm" "Bas0{D1FE3BB4-79AB-4849-9B79-57BF72A0F7F8}{6C6E8FA6-BD75-404B-B840-1E 77DAF5D} dGlobal!婼pacoFalse 奀reatablPre declaId訲ru BExpose0TemplateDerivCustomiz婦W磤0狫HH "Hd VBAP@rojectD@&w讳` 工具函数絗(checkedRequiredStart齊`rowIndex6d` columnIndex錚` cellValue@砢 ActiveSheet%N`Cells峘(writeLog{u`content鎙`Sheets ` (msgSheetName'` (curMsgRow/`(getCellValueCountXQc骮 sheetIndex `colIndex嘸value銴` (writeLogRedm`nLene,` Charactersrg`FontU` ColorIndex鱼`(addCommentXQStart礢` errorInfo` AddComment屟`Interior;鋊Color2F`CommentHs`(clearCommentsXQStart7胉 ClearCommentsf萡sheet2RecordNum`ffTotalNumColumn`xlNone棼`(beginCheck_comment;D` checkMethodHd`(errorMsg'|`(removeSpaceFlag` (cellContent娕`(callFunctionXQStart typevals#`isValidateCount8`titleMsgh甡 (startTitle頻` (headIndex` (functionArgs8M` (checkMethodXQ緮` (checkRequired碽`(hasErrorf譧(isFord╜ (removeSpaceXQ` (removeEnter` (checkStuNamec骮(checkLeng痐value1`functionArgsArr紑`Split)`(checkNumh糮(checkValK鋊(checkInt癄`resZjlx0臽 (IsIDNumber-*` (checkSFZJLX*`(checkDMB粎` (setDMBCode竏`(checkS) (checkBankUw`(checkXn` (checkMonth嚐` (checkBirthday≮`(checkBirthdayNecessary嚶` (checkphonesNum埬` (checkOption,躟(sysDifficultyGradeNameFlag`Trim@颼(indentifyDateFlag `(checkFamilyIncomeType蟣` (checkSqly韅aX` (hasErrorIdNum舰`resultur`result1庺`result2忯`result3愻`result4戶`result5掫`result6擊`result7旚`result8曯`result9桇`result10P`result11P`(atLeaOneNNullCount欷` (checkMoneyi漙 (totalMoney%篳baojiaoMoneyColumns`baojiaoMoneySumk餪huoshiMoneyColumn_礰huoshiMoneySumr`zhusuMoneyColumn_` zhusuMoneySum>-`othersMoneyColumn撺`othersMoneySumH訿(atLeaOneNullCount竊 (atLeaError妦` (regCheckFuncE鵣reg蝋regEX* CreateObject鴬`Patterni衊 IgnoreCase0鵣Test4玚(checkTheSameXQNew` sheetIndex2n`(rnaO蟕xlUp犵`Row壪` ClearContents{躟i``cardID1[?` (cardIDColumn-h`ja`cardID2\?` (hasTheSame僠(GetRowOrColIndex穎`keyWord‵`kbn1╜cZ`Findn餪What酑`LookIn襊`xlValueso醏LookAt癘`xlWhole侍`Column爄`flag淊`rowData1`Count0v`rowNummR`(AreasheetIndex扝` (deleteRow` Unprotect?`Password鹞`Rows`Delete竫`(setCellValueCountXQ腯`(deleteRowNoPro`(setCellValueXQ给` codevalsue` (columnPlus紓`length1S`length2T`Replacef` 声明廼`(!ValueColumType` columnNamew籤(sheetIndexValue1` (AreaSheetName繾(readmeSheetName啂` (totalCount-`(rgold礰(hasErrorInValidateU鮜 (dataRowStart硴` isNullRowNum8`(cna`(notContinueBoolt`(sysDifficultyGradeNameCol蕆`(蘟 ,*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications&*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files (x86)\Microsoft Office\root\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation4*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Windows\SysWOW64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{C7C8605A-4603-4B8A-A9BD-5EB1566C752B}#2.0#0#C:\Users\111\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E 忇.`孧  qce  梺 ThisWorkbook0@68ea9a21!ThisWorkbookzLxR Sheet10B68ea9a227 Sheet1逪 Sheet60D68ea9a22C Sheet60SbpS剺葔0=68ea92aaDSbpS剺葔H錧wQ齉pe0>68ea945cN錧wQ齉pe艄`噂餢f0A68ea9a21|餢f&x!h寶齉pe0?68ea945c!h寶齉pe~榟;N z廭0<68ea91f5;N z廭Ux`L.ShowForm0968ea91f5?ShowFormn9 Sheet50C68ea9a22I Sheet5hPrintForm0;68ea91f5KPrintForm蕵x0H`薈B}\ kG癝驦6砩cf鞢縱捂錚P⌒{1蘒歁6脁"71h鴿##LO+ 湏鑐^F 扤幁礫H誸柨H 蟗lHMz*W錯Lm鬙陼A櫓 <U1upWF2傽坚)BoN,N栘a%ゝiB&骓臢俭Q禕瑮530T!8compare Excel+` VBA麾`Win16羱`Win32`Win64x`Mac巢`VBA6#`VBA7#` VBAProject究`stdole揱`Officeu`MSFormsC` ThisWorkbook|鉦 _evalsuate賎Workbook_BeforeSave l`SaveAsUI篪`Cancel駱` (isSaveButton谩`MsgBox桼`ChrK~` vbOKCancelx?`vbOK%`(测试所有校验规则并打印错误信息瓛` Sheet1`'Worksheet_BeforeDoubleClickaaaaaaaaaaaa駌`(Target現`Range `vbYesNo漙vbYesa?` Sheet6` 打印预览繶` (Browse_Prints歚 Worksheets鉴`Visible队` PrintPrevieindentifyDateCol&`(indentifyReasonCol*9` 校验函数&轥addr`vbBinaryCompare虧` Application*`WorksheetFunction&`Clean咄`IDNumber4 `Wm`UCase5 `sj`Tk` babyIDColumn` IsNumeric$*`Right `ne`LCase:閌md` (checkSchCode逵` (checkFamType睖` (checkRXDate*` (checkYear6`(checkXJHF餪years檿`value2` (compareDecN豟 maxIntLen1` maxDoubleLen煿` intLength`intValue卄douValue郹 (checkIsInt鵕` (checkIsNumberG` (checkMoneyTJC巂(checkPersonNum `(checkIdNumLinkUz`IdNum>` isGenderRight ` isBirthRight浛` genderValue骮 genderValue11` birthValue` birthValue1~`year6n`year1w昤month`month1裳`day`day1;`arr u` genderColumn鄜`birthdayColumn0` (checkSpLen呙` 主程序矮` rowDataNumn禶 typevalsue嫭`bsTypet萡 valEntity軓`val葩`typeRow頯 isNullRowArr/骮 sheetCountB譧Protect譮`ScreenUpdating! `xlToLeftWY`rowType鱜Locked ` totalMoneySumZ哷pg`qh` (checkTheSameg鑐myDic穙`myKey`varData`idNumDick` idNumDicData臂`cardNum‐`Exists僝`Add鱮`Keysq竊Resize@4` Transpose桌` ShowForm殗`CancelButton_Click`Hide9z`ConformButton_Clickwf`Flase祊` Sheet5` PrintForm`Workbookk` Worksheet窿` BeforeSave壑` _B_var_Chr\;`_Defaultj耟BeforeDoubleClickaaaaaaaaaaaa\鷃_B_var_isNullRowNum;r`_B_var_i _B_var_isValidateCount"`_B_var_j _B_var_rowType淂`_B_var_m _B_var_n_B_var_totalMoneySum鳼`_B_var_p_B_var_q!?I } K 7CE O"@ p0(P'牰q刞XX H   = r qce J < 9stdole>stdole( h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysWOW64\e2.tlb#OLE Auto續ation0A僂Offic凟ODfic侲 殌丒2DF8D04C-5BFA-101B-BHDE5EAAC4 2圗榞ram Files (x86)\Common \Microsoft Shared\OFFICE16\MSO.DLL#働 16.0 Ob伳 Libra宺yNMSForms>SF獉rms3〥452EE1-E08F1A-8-02608C4D0BB4橳FM20L'BF @a&/;"1?l蓃A萺00鑮#0聄# 5h0爛 偫AC7C8605A-4603-4B8A-A9BD-5EB1566C752B6Users\111\AppData\Local\Temp0\VBE繿B6.e:鱙@0FafunctionArgsArrvalue2 functionArgsIdNum !YSaveAsUICancel ! !i(Target  Y` }t \Windows\SysWOW64\FM20.DLL Microsoft Forms 2.0 FormEmbedded Object9瞦/C:\Users\111\AppData\Local\VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowFo')CompObj*eaVBFramegPrintForm0-R澣yP顫葃orm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 '所有者中心 End  }t  Microsoft Forms 2.0 FormEmbedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} Print揔*   rU~~~~~~~~~~~~#~~~~~~~~ 箯K9凬僴賵蛹,  儕a 儕a 儕a ) A坅  Q q ) Y  1 Q a坅   !1 Y  ! A a 1Yy Aa 1Y坅 a儕a  !1 VBAProject ThisWorkbookSheet1Sheet6打印预览工具函数声明校验函数主程序ShowFormSheet5 PrintFormFHC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA ) Q0F?C:\Program Files (x86)\Microsoft Office\root\Office16\EXCEL.EXEExcel Y  @0FC:\Windows\SysWOW64\stdole2.tlbstdole yPL续-鶾藉D轗EC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLLOffice Y`.E 忇.`孧 C:\Windows\SysWOW64\FM20.DLLMSForms pZ`惹F奒┙^盫lu+ /C:\Users\111\AppData\Local\Temp\VBE\MSForms.exd i测试所有校验规则并打印错误信息 checkTheSame  Browse_PrintcheckedRequiredStartwriteLoggetCellValueCountXQ writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFunccheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRowsetCellValueCountXQdeleteRowNoProsetCellValueXQ setDMBCode : removeSpaceXQ checkRequired checkStuName removeEnter checkBirthdaycheckBirthdayNecessary IsIDNumber checkSqly checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkphonesNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckFamilyIncomeTypecheckIntcheckValcheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLink checkSpLencheckSFr螾碦xB毑轖嚽F洄脻甁车*5DFWorkbookWorkbook_BeforeSave @ .╜/f&Tnx\亯軴X[鍕excel 俌軴X[ 鲖筽鸔 nx歔 , &鹼邁\亯蹚L埨h錱!h寶 俌 N軴X[ 鲖筽鸔 諷坢 ? 曪嬦Oo` 鉔xh 魦f , RangeEnd 00 $4Dfl&o,.CompObj/maVBFrameoForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 '所有者中心 End ThisWorkbookThisWorkbookSheet1Sheet1工具函数錧wQ齉pe声明餢f校验函数!h寶齉pe主程序;N z廭ShowFormShowForm打印预览SbpS剺葔PrintFormPrintFormSheet5Sheet5Sheet6Sheet6PROJECTwmtPROJECTxSummaryInformation(3DocumentSummaryInformation8tID="{00000000-0000-0000-0000-000000000000}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=工具函数 Module=声明 Module=校验函数 Module=主程序 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=ShowForm Module=打印预览 BaseClass=PrintForm Document=Sheet5/&H00000000 Document=Sheet6/&H00000000 HelpFile="" Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="1311BFDC24E024E020E420E4" DPB="7476D84358B975B975468BBA756954DB3B32FB9FC7A4BE0FBB5C6E3E8B61DDD34D1BA9CB2472" GC="D5D779E2BB42BC42BCBD"[Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000[Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C 工具函数=0, 0, 0, 0, C 声明=0, 0, 0, 0, C 校验函数=0, 0, 0, 0, C 主程序=0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C, 26, 26, 1614, 711, C 打印预览=0, 0, 0, 0, C PrintForm=0, 0, 0, 0, C, 52, 52, 1640, 737, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C 鄥燆鵒h珣+'迟0@HXd | boboa111Microsoft Excel@=輎灼@猻葃 胀諟.摋+,D胀諟.摋+,HP X`hp x S  家庭经济信息采集代码表 错误信息 残疾级别 残疾类别 父母年龄 父母文化 父母职业 家庭在学人数 赡养老人突发意外事件具体情况描述 学费🥨、住宿费自然灾害具体情况描述 工作表 命名范围 (S[wKSOProductBuildVerICV2052-11.1.0.12313$8008AAC31A094374A53E51212AFB79D7 FMicrosoft Excel 2003 工作表Biff8Excel.Sheet.89瞦CompObji