ࡱ> }Gz  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFoIWKLMNOPQRSTUVHXYZ[\]^_`abcdefghiklmnpqrstuwxy{|Root Entryj@%Workbook_VBA_PROJECT_CUR"CĿCĿVBA gĿgĿ  "#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKMNORSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxz{|}~n2BhDʐZOL^آATS Ca/o]{EW>͛*_ǨЛ!s#J7<#P0GQkW!6#rA& ܱҊds}j$^}.3wmvnnBԸ|ͦw{DFxYK02RLJ<6 Rx#*(Ȫo,>]O#ymK>bu6^(2&ףhM O. P5}rU/3]2ۉ%yq8/+:W0WcGJr"0Fivn2Q}eIr@2syeSu <'LK{x@O b^5.NM7yȖ^Fhtf f_G#@MK:䶸D]1>2>#T/脙qo9,>DOh> h%k( ňJ9h*C-_B]*ؑ55̓98,T77@zkd FE%xGNY Tx`))%KLA@ tv?Ÿ+\y´,bK;yӢU{ڕd"pL|vG;&9TW8hDTzj?PílC䬒F i}p`”|$ :IHYn5/ 7v?篊yy1 ?7)-CۼH գ{"2DOG{aIGV`)aqm^`- AF"oZՎ >f7PT^"oa?~1 < e/?ޕmLYLs&ĭZ#[_5~.n7avCRT2ӎ%ΈpQx; OFS"|%ux}e%I=㐂n678!pzgMlڤK{Dd iG]iW,VЬTzcX%\c&') F1d_`s v"|deC2rݕ1 8cu0y:}+/`Cp Z*v` >UX6w6oXLcPyrs7}n!»E;%ŀcDasyZHAS Ɲ'nݻO  :3;L%bs|QNq׭Biav<h3 LfO y1måw,hn`yV *(@xTq@|e*(EظJs"&wO} ;Xt$m#*DfD`Yl>g26L@ m(bȤ\pCtz* 3~쎟Ni ^RWeFB1:|O̾ecG&Lw*`Y;ű= #FlOhT'JLBaZ=MyK3#ē Ҝ% uT7z;= =gg,L@@RU" eIz-14v RUƩUq(V6 1VQ.f`3!LBe;L1(KnҬhXWo^f*1d(2'_ Ĭ1oIq& T6Mx/Pxģ10j | iK52HGCseu-ʌ lq<-_,W10PipH96HlT aZ{׽E&)±4$mM10urwa/9_q%$m1R/ kukAl119M,z!"֧]庼1; ^ґjAh壕0:1"t&B;^zHm<*=1"je\]NAhE;Z '?6ȏ)zt1#2y!:n6'x|=_G1PkNk< :ȍ7Dƒ-p1"+>O9i6/|m81"J oYeyY;<.7Rw4du 1O.MO?͒YؽNP>1"'I4(U#ei6udQfSRׅ1wV rU}-O[>N1"61`XO4Ȧ`l1D3Im1"'mS_z-yEx'laRܤ #e1",W-͉2= j#5T18euRv"x1"%m4emׯo![DXZ2WqA'dM1&aW_N^g.&7er>5p1k$#5m 41ZΤg(%^><@R9=t1"}7٣*gbxteUX1"hB/XphG \ѕQΧ4@1"b6%S˰1]/1{*F,y _飉`^1}J+uEP ̱De1"F'L>DP}濕u؟ K1"[R2*TホOJP167!#D$3HI02(.10?%==wke K?>ɹdj((%1G0S[bsO4"iU˓Sn81s$rf1 蟃xVa6$dY/%|hN&1^$ߏm!kvKUrU9 r +L\z"(ݚd\;xRE9̚x/vה'[ Lw-Wډ|4gمz9 Yv\l67`MNr:V \|~J'͉F laYUQŖb9[aAN.up{*Ph&{f%?K4&Tڅqe ?<0Ǽ|#iƹ u7L yƵ29Y%"6}yG4WLU06`e jX@)=y\p)Kk.?C_aB.'RE8vZXX5C1=#XZ'<)@ALi4QAͰGe0w/"o=4g@Z-LyxE݉kd~l# u@]%yrK_󨴙 $X]׀) $.`v(m0W,$֯#%ټUxチ=/Y 0Ȧc儺 TcJ9]LX~: 9|L~*"af7(7. _cTL~\y2PN s r1bnnF62(` ڨ\o{p1|C[4 2N-)2Z| -YޜT h*CmhAs,$%C\ CDQ$ WSKn.5u8#I[ED~bu~~,A١˞TJ.+ >)r+ں/f0؈QVlb{/I~ڮ;$ 5`- {+ gj79iO>%'w 1[Lh@84j[g/9 {+榼WLIq#/b@ȟBBG6Puc&V‚DC˔yl-wPECln`dWc!mc#8LL[$y 6΅R; p:6,h=Ukgqhۨ*t"A Wŗ\%U}sӹHqy3EM5ѝegw-(KIgB:21< g^3 g?;+[{`X/9Yy !XX FԢI$Bjr"1NN&}#J]H(D4ŘElnK e ڇJ St{jv%Rwa5$s,(bGi55ö`%0Af ߈;Үd˅q2) _CV,b3xcNhF0W(zBnQR n7H#%òV@ _(ћ2i1:U[X1rKN]!ne{Mv,*Nyϩը2hhJ9ks< AN>Az!~c.@kdr/2x } 1%,hjсۀ 8[@ /iE6Ӱq\2@ 5ł0&$_%rh2 g JIhl &)ls} "ǑGiC5D 1z"B,@.|<3@z(9/=\a|^3Htv~FTH}wQ7U&}]U5beggmq<<0/੽D8N@0)ga, Hsj42WykBEr;izL[q$'1އ/bV"0yă )e/{jMm zp6n(FMv9}y^ӌ)moqdU5*1w`AWWete5H%JGsSmr(ܪT2cSY/@QIh͗>V(mQ!ga 7&/Hx0.Ȝ}ZpjN2CćZ:*)BG7Z?A]&!}Sg k%=+쨩svT{f3%rwl{rNi|@*'Uc <`$,N.MK?6U;pwL:Z*W뷽#f}dV}W Df##L _$o;<~:g FOp)j = [8uXEm` 2 EV$|.\g\7d6 ŞǪJIKO2.=3❲譛t)m2B]t6 Le2JfBE .cVԛp[d<@]&ڜ g%3*-=rg#DW(hexGѧt}ۦ BcifVkٮ E#O&orͦDFmc:HWx*Tq姣z= 9(N;041E(1dS@4syU4xPH6;J:v7`-_Qrý\  "cpjq_ pnk>3CIOl@]h<Kߜ}2Ǖo?ʱ+)DC3Bl]),7QxG|_^GOWX8`J.KXb:|_,˟"^ьN"Љ.l8eGwݛwz]gR-l-:gAfz? ahV00(J_µHs*u4r^cuUphNR@#`* BGDoIiYBeb99QQpc m$W-K9<;dL5SzU+ 4~ckXu05FR0kAC5h sэb-?tJh$=?tD}֜7LQ߭,8/wOjF+r{"tr=rOo.%Mzh)|k9*"Cg&]G6JUf{y)v TF@69І\5XYҟ Ba9ӤA} /*5H0=䌗auSrS-k&TV[*p&/S.w?qNP [O9`֏R;RP}lM YY;/~L% *4p )w*>a~sw,=!vudZs SZ}ܣ`go e8kGȑ t֕Uߣ!:'$\"J yfb'U~J9:R}wP (3qP.T1vn-z^j՞z eF!b|lsN QcYP$Ԫgp8a%]//}+ |y65R5!c#A>wڲ1A)@+pe~]_ʫ݄zq-):MǪOw|W*S0nlI <j&ؘDɟ2;8<'"B`5hu-0+!XΖw0rX4jxSH u@`:i%ŪQ]Q C+b'[\+{׎wf sh#nD979wx0N3t:Մ1Rg};~\GG#2yq x^;9 84"DA^tO334*:N :ƩC6 HpҗqGG wMY- ?nP+>s@4DC)O&X7Dw*j:!0/̪? E5n7 @P#iI+V`ϒ=_ڗ֞6%^kN^,sGw=h)+y )p<[m+ Yp:+ UNt1:,z\B /mD8!5w F?rDk @LЯݽQ ѝlv Q+bTZa/Q(v@Pٵ hXn{ Ϡk uZFdY`KNz.*W?1t[1BF.p ܲ}՗a0/ȥƨt ֍:5o0CM>Um>E}l8$ǝzjo5']_/ztVQGEdMڟʥ!e4_ ? (GfWeyF)j颛완;*| {=W@ID`5ex9th];W$f3Tr4 7C,8 Q$zRGcؽx 4VsEB\ &DgZpJLAA1?ZYlC4(@e#r3LC8'Ls4[D`?&  1pN.uX CJpOAn]8 ]fvg;<ThȌu;!m%&ꓤ!9$aJ 5+ k_ R{k~% ?éW1NWSEh4L~2nSMܤ_T8aP`}#1TʅC UBOTѧ؄ ŽʭOϨ{akA@TX2kV:dꏵ; yb~1;/6\f&+E9U^``e|};y׭ o9N\ 1x扈IELZs}F>I6 ?oP+syޡ簜htPyBQ3aEcu-,״H)RG~ {2¤)Fl +,iq5?.X^SJ3fo8kꙃ?p;j\&[pw<<FcMt ;Pjm:g7wJ?R%Tjx2@&]An/bT4]m_9E`dN 2h.sM8+IxZ2&<>ڿRG_N$pNPɷ*b(D3YϾbYj$i콲u\"/Rz8а@=|~!6q>6Xg#;8ZГJR7' i{KΞ1(=b)mCg}!Ц_|w}^s?9AW!d#2;FeuE5%$^OQ{!O} UO!rw"p؈i2'6tL^ZonaqL`#w5qI wYTo]X A$:`}S-j>{o#VG+ÍN/#@k{;P\i.08J`\ %@?s\=\NrXfH/2;"=Îxӗ3*и;%[2dY;9 r|5_λF՝nT\$X dKhCD ,iarvMiS*w!(*'7Db{$;~I\A>4TgհsA n<}+PLCEZ%ѠeX b0Щ:K @] _7(5݄>Su mlA`%&ܣǶq ͑;8X<@m(ȎeOIwEyHYJ*E }Tj t< <4f]n^xB?ӏ֨h5.rpsYHo YeMBC *LU{U_VjYߔo*X#;Vn1u_<6$BM~%θ~ˍZG]>Y+W]zy7Py'7*Q.Wb= {AsMȍlrdP6&JĨEn:H+-ȍ4OԼlfy2)L 6ExJ9c] ŶpUD!&m{(o ^D4XOn+fi h2Q?Q3.@^"A۔UbWDTǣ"[mz3"2/GjMn*ED8Xg"ލ#NJ٢?bEy6Zte&r9"r5KVEn9. @ $&N+Lgj5{8(;ncߛAu>t4U\M5?Zg3ĝlYBFhZM[`eҫʣ(: 2\ DZYaǐ#ft {2W6 4x wj>PQh]Ô$#;me`⎄<'Ğ!sηg mԂGw ?#)fCp hY]=Dq0=֙(畤DAnm$¦457INaMZvd`1[6*|)`Fb]Tu{VIPvM7ECű$> 6#dDJmGEø$ĸ\۠ [0[v(0j2LtJ|/xV]F!uJSƬ5OPLOltwq{D/{J +:[O$VeHtI ô<"v{N6:,ikM*b'ץiՙ"6DPkFSܦ$TqR2q|nX Zyj!osgE5rؐY1 AO݋2T B÷_L{m'IW%tۢ/ \Ӈ*N{)c jU QrI8HGwߍXLG&m{7:j58=U8|sVl28^ JFoWbo'^!US#/ !F2x僐:QTbEJ<:Te= ~w;*m9|xİoMt`x>3_Ҏ@ŰXuYL^u03(@%C4*/ju>W4{ɕz0g ,p"؃Y[+Wrgr+X$-@yԦfCz,>ӟ18S̫郹]l;bWj<"+VDG k i(Sv@p.r"Ġc%Z,'ZX4g\i 4tC׺V7MƎ GoJ H 8(}聓tP}D3C1==KD_!O CѾ)ms R6`l܎ն)iExCIb¸ǘ;L(x\oxv3 a ̑zZDAD K#]* Ι1Z6nŻݍ1 mx"ep*3ֽ]"AGUpfO~:8K"zLs-“696ч'BcP+B Ä鄸$INHpڲzp>Z}r(u$/Է>v1_K ~AEzܠuޚ ]!*+"+ijl ։o9|Plo. Ic$\KE^*55Ep@梌S@Hޟz*7jD7 l=;EA|)Ϋ%R=ɴ4!t&^Qh2 iC.oh>J(IBuX)R5 Spn9B|>!)ᢤWO\ DL[׃|[w626֦57[׽r(L(8ƹ4 :7tT[PK[6zL.@|ɗ󰹻&pcQv Z.mcL)}L1g8:޽ h<rWLfQ6,qYZ&tAD{n;N6i6 2͟;Z)ΦQa5 ȹM0%ϥ+PeLjHdi R2Jڧ]f`VLl$(r~Soad}!Ak^.A-DMCyIK۟`{,;O3}6 7w?c dqd ;姎rDάiK^Wӈq+XHi鄨};q9&&_#յ4TegF^>$O% y))!M878;.Lz}*)FG.&`G 8%B=|Q+Vc3eӫ5i%;Gv,{D(.m#"&TU;ycw g|IrU!6ỹ2b" S?.-ugr;^-f8>53Hr36MYPr{drWE!GKӒ 1N(,;?۠$p+8Z_+~+YzSEWù\."ښc-=ΞwmoG'->+9Q4#uŦCjw܃G!Bh`(_" jdB(L!9b{a !(xqGE2-[C#gxѐg[ U]TLp ~+5Mˀ-q^L}7`49Ҫak-}hډ@ItͤDɔ"Wrܤt~VHIB{dX>`;G gEKԅznʓ oL*H|TLwZ9 tª(C1LZ<9~5hކMD^ZK ] DiIFu?˱`k(ϫ\2Z[t{uM2ȩb^,RWG|ŒE͓lgnZHeg'B֣YaԙrUXA >C& I %/nذLA{ - \2߼}_@dX_*b+FXր+b% !\ k*NL7&O_KS'U;i(Pz vi)#̀KMdmO_u'!8]*DPB|QUSqeҢZ#xAMIKw'j[00eSAmP {O<Ņqnآ@cF \Ɩm{E%@7nT V4l wF ;FͰӼ* CaM#Y~O WacH I V65u6(u6۵QG2dV릂~Wj9I!J=-P="c %>s 0G){j~k~fu5lw,Z)ٺK423"\D5g^Πr}j2덣-'u]#9ڇ=!FŜNE-5sq=s'v$Ko]shFg'_j0l#<߽8) lðp7<δ I6 bz2d,x4>|bQ׍Q2+I @ },}alOJ[,PBМGo X~\V>Ҽ0~@KA78ȍ ~h{n!CLԪޚS]&:uA^UN1Wb ,3WS"9(s7 v0L;Qo-s%o`t;[Ϲ>]Sڑ" DU~ۯ:Z;XD.x]'pMVbu:$<cyz/ϠnC靨kd+6AXTXE"=H,GJ/+[sdd]'YjQ^nq1Ylxinww*B^%YвYaXp91P-c,Q~d .}~ `Ro-1S`{ :$$\:!Vxv: Sè|^e" Nۮ9lI0Ru\uJaiK8cfwGUK} E9Hd} "C`cӏ,ws} D ٴ8G} !67H8>} >Q'} _"m㸺ê1} Lw} 1ʤI5 m} *H &#} $o]Fa7} a@**{d} %fɺ*О} 115*} wFV;y} Gdlr%d} ;b{ǝN#f} L>Mt} vX} >;qu1} lx򖠹|JC} ,.Ϊ[?otAӰ e y"62p.PsJ AmrC[cQRv=Mr;<6zƑtJ8/hB}WV(@,+ 5f(<[7R~]N% C ̣0WÒEOWEG}`>":o-^ᮌ$+%}<t%'(53f˻+ѕYx`~Mc݌Lc55˨R_܆KI9MQa%}?; T†yG<;!&Q}NLFY畾(3!Ib9%q P9XԿO9O,ʿ'/)ce,;Y]٬7PYLF='8ܿ :< O^| rFh5a処X|b6Mqv4\btJHxe4@4,\r;:w]AWMzQM '*UO Je}L[\yF;L]!: D' R {w难.*\q3tG/=Bbc1H8 X9ļf %' z&Cհ|ݮ_( y Q- ^ό ;'fI Wz z`K es\m^mU :}V@t |~V dn(F8A 5<> LV&u& azBG'd  {]C m dA+;G?w={wW^Ծ4v]%ѻ2? P3$f? Yx.PH 1ղT ;wv#* 84Qw$ -kQΩzb4Ǝ.]?tdoa]{Q JQ[.~  ҽIC|_٠~ FHf"1F&nMz*>ۛ]IoƲ B u;8 P 4}Sn ɌԢC2f *L翾&<+DUo,"AfZ.c|BLq81E/x+=֕/U1lbjSXp#Juv}4S3ǾP3V$Vޤ K#堔Q9پ?Z^t^;+mrui4}9sek҄Eu qa=Jӊ- z { *s51f;ԴA ܟ#[c %~? 8=Zl.!oV' . 1y'c "8 ֊6 [;esO,0$;%/ KghT7. )ü9 z1  $s >"Ocf1UTe (z冄v@ N78nڰ 7-Sf E 25 o!4t2Sz%&φ x)a++(OP);.P޹d ΋~մlB+ eW%s4F²TϺV7ʇPZ6 7moh!L , Bgfs0R0jXh1d&pl1@O\dqDQu᧹΍dξBb9+Pѹr byfg]!XhkWCwjŶ/8p\:_h}2:l8HwX'm`eZ]ǑP"P0~ wiYG!`jg6N0b /Q5*8By^`Iۖ '$@Np7?<'aXCK"](Qc tU\" 2EͨAnGs mH cOڤݶ_Gx!zg15{ 2䣇` -+/% k<ɮ,;>4bDmac/se%ξ=h:$姥uO_C2]7sbE9QpOÑ-}YCkZ"J4GaKʹ,<+)q~1uƏ<Y`ͷT4:(;yUƞ,>Ӿm]Kʞ [diҫ"<8gl*Z wͺO2EzpKaK.HX>Fp"8>VFse(%UxIDshm*,nlCS/݆^r]Rѱ(xiL2t NE9%Ъ[~qňÕ |Wot,mI!@|PrUrM#%Qn=,+ ˰2GM7g}a?}詝^*`v6Nzdxk, wLMzgɜXQ# hGwW.t 5GڱkEe&Aŷpyd2luK@n{ @@I[{&t1a3ygd ,Ԛ!HDMpd#w6Z*42]IH`ܰe홞þJ"''/A(2"aQɊA>UOw>H-8%$bnŢ^qS۾nzbzS?oOo%s9AlB!3[TXľ2DJs-t@}?!vMnق%.''oW=F^e<}h>JeV2#%BowJ=a* H.yp r2Ys6=_LA$c)Fg RM>8vR;./+&knЍOy &,gFID`G '&J;2BЉBV2fM!ed1jin-~G ͘v1le94G&v$8\ZFc +Hw퍮/Y#2[._$~= Qi05U*Bf!IT]2 .Ƅs~ZV#.^ֈALaNd*_'k%sꖁ{B2uH\JK#أFѝV`cA몘*md ^%Jjm!Y9 =M+/xJEvq-|2'Iq ={(θ'͆e- [x9mo`iVMӶG9 MNmG]?,WSu+/c nKhpK"s;KbcUw)ޱlj)Q˻d`2bXBgQ94cb]]G1=қτ~&tlIj. ? LT~g&KDEڬU! !"˪`M=E*NKe;+ pI\ÐV'mxz)C'Yk'L;c;?!26k8jM{IKݨ+Ɋ>V#0|vPq v Tt?dv%dt~&*D.pp&/&uϱdT;i?^30w0S{txQ՝>P8Rl3X[b|-t^?VvB)fڹ^Wh= qpgb?sf_& 4:?QZ"55վ2V2\ 5':z`UoRrƚtIp͜ WvG:}/aӁ,r@U!2?$Ik-J%fhN'C˭,'Ѩ ~PYqھ;E^8Cؾ29z;.e 2hYTCXj rHN$.St6w΢x+G* jo?'J4Xf\c"a]ug +5塦"lǾ kAUlnEص ̝ P¼228-R!#y7N Bat ^WY?#!e D6bxL"&74`7G/ca,.Fy>"@λKJl|p"4HdYT9Q#nj{GvS ʕٌZvG yNVa,dCq.p `޹ȢQA쐻DB7V:Cy1bv#2"ɮp rl7*G`.¿I:9H"D8nߵ;MROpY%|A?M r#r@j1&.AGعî*%jњ8bXNuؕ)\KIu@OT J fGxm&H[HMpr.L /wۗ[:3a7g8]ʹ GAyT+%+&DDr3ֈl`McpmX^#;c تt`CzR 2q+Z *R-faMLS TzHVH@@aqAxت!n#ܭ/u+'h*ݞOe2AHbY9`h~4@4n養KRg`,nHσ.6 V8@YD0<@B4ʖ{ݽU}ky:h0\2haʠ<̓@L ,np&2 4Z/7'~ sh'FE6|T 6 kk~ [֙ IO+I?{ Ǟ !Z1Wq*s9'+u1pݷ ~Qe{6 鸄< =0 .Bq$7c( d p~ nl,|h0 Sv~ H96̾ Ayu0"э [0AJg!<(=]=Z*K>XI`,Gr@!ӛ,m„Ynyt7e]v $R5.iu3'F #`IY`0ΝiНfy)J:2:ͤ)A (ё\gLWqT'/*vx!;' 5U%Iwp.\/"OeL{a|GgrFkv]K' >8fYb!90K#Bk"3R6O h{l Nv- lҵ 6o Ez@wQzFaq YaMGu> ƃې HEIM` V^.|εޡ 99., t M>&wܟP0 JPi5 v 8S'}ŽXNK ׶:(bta FL Razԁ­c4<|WF]~4A4)鴉M഑G9i+WHz  }T|;!k,t  sQg2QH3 *_m@ ]^r#(71e`F  {#M&O! 3D9rjNБ mVr ]׾$e^Z5?њi!vO2 oCʜ1[E9Eey ;sh3?7$l/|'m8Qk3nh^sBRn ]'|ty"rNEEn=#ˢQY1>}I{**ő 4Vc @}P]]B gAQTorc%\Ƚ?<(q ѧj}(̷7TE5Vf! {<1qQsGcKv=1j M>,B[XAPl햋Hv'e) gͫ α%h#J'/ȫ$doM?L'7$dgZ/ּ)=UXj l}?(y?3 @M8LV[N#L@y*30miX)舵#~A%i6kd@ԗ 4gx1(GS%+M]tdbYL!VZ$n FrGގ؇L)"Xa& )q@Cğo ʪ)b&Rǿ}]efh(#Cf#DF?ɞX;m>2],_Jx/cfqOC*@PUa ˩4NZ^W3;(kv3W+s*$<]p2}&<2b'(՛5rǮ((<'jv-.2*ৠIP愩@Ds ^4YRƭHFwE57)NkYl~X-`,J^|n@m],qAe- QD\^_[ko;1%VX /GdpYx!x v <,~W<v`KDNnw!h3 x"Cf:tr1I/od]H9 ZD,D7E/[ŔdO< (/Lh>fƱ jHLX}@V)'K0:1 T׬@At0O]EF2;,#*CSu@O/+|Ԙ' Qt^xXQ-K27~;|NH2Eʉ+̀+[% 87GY.WfT_W,N:F !ڍңN zmHw #IE6 oBJlrF7X]75 U&#T -Nwo fW|7ƃ<Iڥȱj4®P֤ 5WrWq4KwLÈ+9m`>n%؟ՏpAx 7,zwT"zHXA|8]ېQ~g_\PePx;%Gl95ST"k.^t_4M x28=2æ8 #NY3Ez}*l>(MWojQF7C1v;h.'sx`zkul:$53>w +zVJ[Bܒ~Vj lߔuX І-:f35YY143yi]ј[q/Tgs$LCe]. xtum_uh 'Bᅆ3PF ^7~|K[}3&5C^17wJb<]Y  Ҍ{D6hX Qkv ՠyrQS(j$.ԶGס-5¬)NJ(iK`'B<zOxd) =%g:_{ ~i`4|k8clJKulb "4$~]t-!z4W,7%ۍ[IL2 $zPV`9"5Q(K_Of{}6e8L=^ ')GXCVɰ~"*\UdV~yK&*+06́,h*@:#*!G%{]ͳ#\‰ίloq.rAa~r=U 0ўضR^UޯP {#T/5rōj9Y˞#^#2_h6UM7 v&KB Z9h?*]y3)]4\O G;AY{zԾbO3[ _kj.7/U᫜Mgd$趭!<>#Јe,;V48Eo҈Ѡ:W l%<[Eb)s<15P}`/'D˶s2 /V/ J[!$|mOx1*h҄}B` /ެWѬE<iq 8IxCSհ Nr=0<р(Hw-K Bja| Tl!r;ZkO ,[tuU=xL(QM Ѹ[-*cu@V^q3<]4^l*aO\Yr|.Z!s2̛d;*qܶ'/Vف=4:j<RHn֠Wb)K`c?ge {4>_C>jbmmM}_ۓ@2L< p)k);ߟ?s;r~nGC3l|=f5~'_GOG4sXMKٞi1zְ @,fǼbghCf)U&ydhHDRُ9щj:jJ$ɻ/]4!hDiq蹲)F&nǠ 2ijxJ` ~VǸKFãMN  :H1Kyb[lHuw<<OHKS0fݸ7˞E :9QJ Tń#5XzVQ-ftՔ<]L8p=>DA:n~$6y,Y&l OG! aA}ԌK~FJdR\]J {rbT a{4;4 /Vd7cL˜ ],U*o!$䗙"Sf) /:~iީ:{pZ[P 5OzNAod<c-P<,][O 7,&01~$ A>cRA߹ηz;*.b,M̉n֎AgCg5=% l [g*9>Qz ɿNn2-}F'sOr6Anv=],Ð:X4 6+Ʈ@/ڏECkL> u @껾p Q=.ٝ<8Ƅ<Yfۆ19~r`&<7m&j6*"i*srZN_T玵I S+P$@zap:??-w JWŝD҅d_lH\ dH]HOe:YEuʤ[uM^ܕ 0"z`T~ qxC^|AO,ȫGfض/"2E,^<W 8l<^zG%*~X7D(nl, |QjhNв֧];||U6ys%{ ꍊK"iH+jd鰽g`qUV37Aߊvڵ h'#V9< "G]H%o]ee^F%NZQ}37n^Ǵ2A*pړffT-O[07eNkK&[G-ɤVYֶEN3x" DL)<f+&W ĽHڎ6<BS/.$>~N^\Z-(9H>;ZEkn,mMeQCRt6u]S/)a3x"R~cKVn5&ӈX߅h5icÜb.݀P9㇆]H_N^ZRxn>*Q d>byO˜aK3hUd'nHM ]ze4[i=2WZڭAh(M>vOO&U;2|M<@dBOi&3.$ٽa<5!RƽOL$~UQn aʽ$Ӑ4?]yW{A"΢Ƣkez-"[\$OrD2HP~cQz&vs r|anIým LKTxq6_b7~]H}>&Pj[P(rلc l;)kʠ·b{;¢!4V'/i1ŶNyyJWi/(&d< b`w)9o.<>? C3P~ ѓV%vk+e&yW_pbRed2~'X,9v}na,]vXuQkJLj&2֣Kxfk!9MqI>/W2dEAJ 5]H}=nOe!ۦCw@АsiХ|p3Od71CU$a\0dW\Bg:GtWaU?'OCKX3{-e-3t$|bpWoQ`se}g]41o"~pD-CWJ29G_KH*Ӏt&"Dt`CڛQ%72e3K(<rg(!4#ADfVKK=lΏnS‘rH{[4FS# = wʏsU)KΒQw$hp ΆW<K0ML-%=x  $ z2zi7y\{fIsdgho7fn4^!VM ϶u#ſ1Fw-&r-!3˵( @Fm9y6GMX]4ޙCIA !B}@xL:c[R}4O{h(lQvT]Kl)NeHu JfK<t̝pnrI1h7 >qbN(Dc&0Sʽ3s`s6-Pq^MNnDƨ뛨UA:d,\/³󔟎&_~(`x<&lS-CSL Qe|vh:H弭:5CKb£_WQAf(={f =dj+JLV֌UUd9v.?eG^ߵ᜜T1:=I=ed@h߿5>g#O~ug8%4Wթ- &oB'@>uIm\YcB=fwF!GN1=SEݧٮe,}ͱ#SkU%"hJ 0)t훠k ϯ3Gں{n mBJŤD T>+tŦ)SyH67wJuZ]Ik{^L9dC៲)^ eJʴ~'X.@%,5 } lJg_ 8{SIa S]4*IE({j/TtYj#mlm؎F9R OC(3c ƁAo;(29 !$Hۗ|*Ci;zFЃr.gW6YjEJeaso ZXOE$:qh@Z}җYޘ}"2ǡMWE^6m}?<)GoU R8LJU5Ӵ V^#EA6O)hDʔr#Nh)@}~)`χ0N()"fñxDzW dmq8(`AoB|NďW⚡8b{Yuoz4w78)d6H)|F]E1ھjvVKkqhPZ o8Y LB;Y뷪ֹkF.xw+RF?]༆)91u(@Za .G Iq,"s+YLK7Rh:7f%+Z> $vM}؏\u GeneralJB__SRP_2__SRP_3ThisWorkbook5-:& PRINT4 Macrotcut PRINTS 4 COPIES OF TER FORM@B@J Keyboard Shortcut: Ctrl+PR1C3 B@ORIGINAL (  !B@ TRAVELER COPY (A  !B@A DEAN'S COPY (  !B@ INST. COPY (  !B@SAMPLE (R1C3 B@lh PRINT1 Macro PRINTS ORIGINAL ONLY Keyboard Shortcut: Ctrl+pxR1C3 B@  !B@SAMPLE (R1C3 B@lphl0( ~%.llow*http://www.uwsa.edu/fadmin/fppp/fppp36.htm B@ZORIGINAL (lK(l(ZZZR12C6 B@ B@aZha !Tomx It is Tom.xDɳA@4<8<<<< <<<<< 6 <$<,<0<<<*9$*\Rffff*25374d4ea20 x` xRIGI($($x "`    $$$ (0*5e$TS 4 COPIES OF TER FORM   $$($ $($($($  `x   ($($x($($($x x  6  6 hp  6X @\(6` P ``Jp @ @ 0( @x  (h 0h X  8`x@(`x@(`x@(`x@(`x@(@ H P X X    ( 0 8 @ H  X H @8 @( @ @ @   (t @d  ` ` 8 0 ( t p x @d N(`  8 X( p@` @P @@ H(0 `, @ @ (  @ @ (  @ @ h(  @ @p (` \ @L @< ((, @( @ @ (  @ @ (  @ @ H( ` @| @l (\ X @H @8 (( $ @ @ h(  @ @ (  @ @ (( @ @x @h (X T @D @4 ($   @ @ b  8mX Hmps ~ ~ @ME"  @%`%&x%%%%"%&0&H&" P& X&x&&&" 'It is NOT Tom.'  $'40  $' Name CellZPActiveCell.Value R .Activate0Z.Cells(12, 6).Selectok2P0ActiveCell.Value = "Tom"lR6C12 B@h !TomTomR6C12 B@ !Tom 32`a !aphhxThe Name is Tom.A@ox(proThe Name is NOT Tom.A@No Darn Name Entered! $'0hR12C2 B@ !$a !2 ah@Net Amount Cello(NO Net Amount, Please Enter!! $'Net Amount GREATER Than $50.A@ 5The Net Amount LESS Than $50.A@ MsgBox "Net Amount is Non-Zero."ThR12C3 B@ !$a MsgBox "Net Amount is Non-Zero." !2 The Net Amount LESS Than $50.A@axNet Amount GREATER Than $50.A@&eh@SS Cell&eNO SS#, Please Enter!! $'PZ'''' Ask to Printa  h!Good Entries. Press OK to Print.A@-Sorry, can NOT Print Because of Entry Errors.A@8 l8 ZZ' Name CellsR4C11 B@ !'h !TomThe Name is Tom.A@ahThe Name is NOT Tom.A@Breakfast CellsR12C2 B@ !$' MsgBox "Net Amount is Non-Zero." !2 The Net Amount LESS Than $50.A@aHNet Amount GREATER Than $50.A@hSS CellR12C3 B@ !$'h Ask to Print  a0h' ZZ' Net Amount'SS #' !2 ahah Z'  $' Z` 'hp !TomP h8 ENTRY ERRORS!!  Sorry, can't print because:      (press OK to return to the form) 'K  (value greater than $50) 'aH  (value greater than $50) 'h  (value less than $50) 'FK  * NOTE: Net Amount >= $50 '   * NO Net Amount Entered! 'X 0 * Tom is NOT Allowed to fill out This Form!!! ' Are  * NOTE: Net Amount < $50 ' Dance the Dance of Joy!  'Because the Form Entries Are Wonderful.  Press OK to Print.  ' (and don't forget to save your file)   A@MSFoVariable DeclarationsVariable InitializationEThis method checks various cells within the spreadsheet, to make sure;values are valid, and that necessary data has been entered. Coding Cells  * Name field incomplete! '  * Name field incomplete! ' Check = 1NOT Z'( Check = 1eld End If  If ActiveCell.Value = "Tom" Then #Application.Goto Reference:="R4C11"If ActiveCell.Value = "" Then> Message = Message & " * Name field incomplete!" & vbCrLfS Message = Message & " * Tom is NOT Allowed to fill out This Form!!!" & vbCrLf '' "%$ "%$  * Coding cells incomplete'ls(5,  "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$''''Z'*'(h "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$STx  * Coding cells incomplete! ' "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$b  * Coding cells incomplete! ' "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$b  * Coding cells incomplete! ' "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$ "%$b*  * Coding cells incomplete! ' *"',Z * "%! b', * End '(hh ,b ( Lunch Cells Break *"d! '( 6 * Warning: $7.00 in-state breakfast limit exceeded! ' @ * "%! H8 : * Warning: $9.00 out-of-state breakfast limit exceeded! ' ', * "%! ou'(',h * "%! * "%! b * ( Dinner Cellsng: $9 *"reakfa * "%! '( ,b 6 * Warning: $9.00 out-of-state lunch limit exceeded! ' ',h 2 * Warning: $8.00 in-state lunch limit exceeded! ' '( * "%! b',h * ( 3 * Warning: $7.00 in-state dinner limit exceeded! ' '( ,b',h( 7 * Warning: $9.00 out-of-state dinner limit exceeded! ' ( Lodging Cellsh{H *"inner * "%!4 '(h *HwH ( 5 * Warning: $52.00 in-state lodging limit exceeded! ' @xH'(h'  "%! bhh' ) * Travel advance amount exceeds total! '#Travel Advance and Net Amount Cells$Contact Information Cells  "%$  "%$ $ * Contact information incomplete! ''Headquarters City Cell"%  * Headquarters city missing! ''  "%$incomp ) * Travel advance coding is incomplete! 'H  Send To CellsH'h  "%$H & * Mailing address cells incomplete! 'HjyH $h8% " * NO Social Security # Entered! 'H(%  "%$  "%$  "%$  "%$ "%$  "%$  "%$  "%$  "%$  "%$ "%$ "%$h%OriginalC1 *%$(  *B@Acct. ServicesC1 *%$(  *B@Dept.C1 *%$(  *B@ TravellerC1 *%$(  *B@C1 *%$(l@$xOriginalC1 *%$(  *B@C1 *%$(l##(Attribute VB_Name = "General" Sub Print@4() Sheet1.Range("C1"@).ValunOriginpT~Out copi es:=1Acct. Serv0ices    0@ p"x    T 2 H" P Xh p x X 2  " ( 0@ H P 6h 0 "  #   * 0H x"      H " "e(PX ` h R ""g*e&@P ` btnClose_Click() Hides the user form$* Executed when the Close button is pressed` B@<pP@lh btnPrint1_Click@N Sends control to the general module for printing one copy of the spreadsheet., Executed when the Print1 button is clicked.  6B@"l btnPrint3_ClickGR Sends control to the general module for printing three copies of the spreadsheet., Executed when the Print3 button is clicked. 6B@l btnSave_Click/ Prompts the user to save the Excel spreadsheet) Executed when the Save button is clicked  FB@Hl btnRetry_Click$ Validates all ValidationCells again* Executed when the Retry button is clicked` B@< LB@LlP btnApply_ClickA Applies the changes in the "Change To" dialog to the spreadsheet !R! !P!$$(A@Tl lstBox_ChangeK Updates the labels at the bottom of the form when the focused item changes !P!$$! !V(X !P!^ !P%\ !Z(X !R(l/Attribute VB_Name = "frmAudit"  Bas|0{9B73F732-30B1-11D4-AFE4-BD6255C9033E}J26J dCreatabliFalse PredeclaIdTru "Expose@Template Deriv%Cu@stomizD  ' btnCl2_Click() Hides the user form! Execd when ton is presW PCJN Sub2 Me.4 Elnd'n t1I Sends contr ol to>general modu@)inting one py of s@&adsheet./22cCed_ 3'LA3G#. 5385thre5i@g+63)64(646Save5Promptks@aExcel HccAO, NbActaWorkbook.p RetryValidUs all ionCell`gain3_ZHe&`He.ApplAAuchang%CiCs"C To" dialogf/.*H R! (lstBoxque)txC aN_B9' ' Up0labe/t"GbotGyAǐfocd item " `qvej 0lblU.ue.Ca|pt>yvx" 9Zٌ" 9Z`" 9Z" 9ZxW ɳ1" 9Zٓ" 9Zs48<@DHLPTX\`dhlp @SPSSS6"`|J ``$$D``xJB@"J`|J' conN`@J /spreT`,k8$xts t$8) E$$ `|J8~H $8$$0$8`$$Ph8P$VZR @x @h @X @T @P @@ @< @, <4$Txx @h Xd `@T @D @  VZR x @h @X (T @P :@@ lx< @, `c!blNe@daac%ListH'Index, 3`oa$`' "& __SRP_8 Q __SRP_9yCfrmDoneq__SRP_a v@)yD) H `1L P ` T ` X  `\))`)Ad)Yh)q l `1p!`ql??D $ 0   0   0   0 `  0   DgT'X%hx x ,h"$ Ta@`#<P P @/<)xTP6hX@ehx x @(XhT T 8@`#<P P @/<)xTP6hX@&:,Nhhx x x5hP$ (<xTPhX@TH4PXlp+rU |$`$)`$i`$`$`$)`$i`prU p!Iq4A 8 `1  < `  @ 9 `q  D ` H))L)Ac ?   0 `  0   0   0   D8@<CrU X$ `$) `$i `$ `ph>DZ*=h8+3q>DZxɳ1>DZ__SRP_b , @*Hx 024@*x ""  , 0"8 P X ` h*p        H B (0B 8 @HB P X`B h pxB  B  B  B   ( 2 .H xB5  $ @ > XB `h&M  ( B 2P B  h>DZ*=h8+3q>DZxɳ1>DZ>DZ#` PSS S8$>LN0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}*9*\R1*#15d$*\Rffff*27374d4ea2*\R0*#10*\R1*#b8*\R1*#20b`(qF$$$$ $bj0<<@ bnDD@bpXHH@8btPP@0$$ x`T" 9Zِ" 9Zh" 9Z" 9Zx6p 6ɳ1" 9Zٖ" 9Z ..p48<@DHL(SPSSS6"<,<<<< <$<0<4<8<<<0{9B73F736-30B1-11D4-AFE4-BD6255C9033E}{9B73F72E-30B1-11D4-AFE4-BD6255C9033E}*9"*\Rffff*5378b56e30($X01 $:`|J` >`|J` $$$$D`xJB@"$$$$ to $` of $$ `|J```hp`x$ AX 2(+BCDx D8` 0pXME"    0@ p" x    T 2 H" P Xh p x X 2  " ( 0@ H P 6h 0 "  # btnClose_Click() Hides the user formSC~1* Executed when the Close button is pressed` B@<lh btnPrint1_Click@N Sends control to the general module for printing one copy of the spreadsheet., Executed when the Print1 button is clicked. 6B@"l btnPrint3_ClickR Sends control to the general module for printing three copies of the spreadsheet., Executed when the Print3 button is clicked.h 6B@l btnSave_Click2Ce/ Prompts the user to save the Excel spreadsheet) Executed when the Save button is clicked  FB@HdlAttribute VB_Name = "frmDone" Basx0{9B73F736-30B1-11D4-AFE4-BD6255C9033E}J2EJ dCreatablAiFalse PredeclaDIdTru "E`xpose@TemplateDeriv%Cus tomizD  ' btnCl2_Click() Hides the user form Execd wXhen ton is presW PJN Sub2 Me.4 En6d'nt1I Sends control to>general moduRinting | py of s@&adsheet.22cCed 3'kLA3G#.53A85three5ik@g+63)64(64!6Save5Promptks@aExcel HccAO, Nb+ActaWorkb0ook.h X+h iz i| i~ iii (Ni$H Ni(hh!Ni,,!hlJ " $) $N $,!Xh |+8$%i ,!h |+((i ,!h |+,+i ,!xh| X0.i ,!h| 41i ,!8h| 84i ,!h0 |+x <7i  , ` hk @ ?i  ,X ` 8 D Gi  , `\J H U `i  y `"4H4@bf8 8@bhP: :@blx@@@brLL@ h `bvX X@X80PxxX(X8@  $hhH(  fhlj$np@l @\ @X h rtv  h  ?l"@x @h h  7h h  %l h  (npph 8p+r1``x8 4@@hX8 7  H8h ?@(x @h 00XH Gjl @\ @L @< @, @ @ ( @ h U@(l @\ (XlL4"ME^ FE(x% Object "ValidationCell" declarationsormsZHolds the Cell to be checkedZ Check length?ZCheck if empty?ZPAppropriate lengthZ0!String representation of the CellZx$Description of the value in the CellZ&0 for numeric, 1 for text, 2 for otherZXValue contraints on the CellZfirst warning valueZsecond warning value% Declares a new ValidationCell objectTN( ~'f |'h z'l 'j z$$. 'n 'p 'roptional arguments 't 'vl8A The following Property Get's all return the specified data field 'j l'jX n'j r'j p'jhx t'jP v'j88 h'j ! Function cellIsEmpty ==> boolean, Checks to see if given single cell is empty' returns true if empty, false otherwise l "%$$'fX Function isLength ==> boolean9 Checks to see if cell contents are of appropriate length8 returns false if cell does not meet length requirements f h' ! j ! j b'a@'h0f(! Function isValidData ==> boolean< Checks to see if cell contents are of appropriate data type, returns false if cell contains invalid dataX p'  !$ p !$ pb'a'hf