ࡱ>  sdpxyzZ{|wtoCEcCompObj0pi167 ANH n``0@L0@Lf?XoKMGdCompObjEpi219 JRP n``0@L0@Lf \pLarry Hennessee Ba= ThisWorkbook=x7"X@"1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial1 Arial1 Arial1Arial1 Arial1Arial1 Arial1 Arial10 Arial1 Arial1 Arial1@Arial1Arial1 Arial1 Arial1 Arial1 Arial1 Arial1 Arial1Arial1Arial1Arial1Arial1 Arial1Arial1Arial1 Arial1 Arial1 Arial"$"#,##0_);\("$"#,##0\)!"$"#,##0_);[Red]\("$"#,##0\)""$"#,##0.00_);\("$"#,##0.00\)'""$"#,##0.00_);[Red]\("$"#,##0.00\)7*2_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_).))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)?,:_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)6+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_) "$"#,##0.00                + ) , *  * (   " "    !@ @ !@  @ )@  # @  8@ @  8@ @  <@ @ x@ @   x@ @  x@ @  x@ @ 5 x@ @ 9  x@ @   x@ @ < x@ @ 4 x@ @  x@ @ 2  x@ @   x@ @   x@ @ 6 x@ @   x@ @   x@ @ ? x@ @   x@ @ 8    (@ (0@   H " "   "@  @    !@ @ !@ @ , !@ @ + !@ @ . !@ @ - !@ @ 5 "@ @  "@ @ 9 "@ @   @ @  "@ @ <  @ @   @ @ ) !@ @ 4  @ @ -  @ @ 2  @ @ 3 "@ @   @ @ . #"@ @ #"@ @ # @ @  @ @ "@  "@ @ "@ @  "@ @  @ @ (@ @  @@  !@ @  $""@ '  *"@ @ *"@ @  *"@ @ *"@ @- *"@ @5  *"@ @  *"@ @9  *"@ @ *"@ @7  *"@ @<  *"@ @ *"@ @) *"@ @4 *"@ @3 *"@ @ *"@ @2  *"@ @  *"@ @= #@  #8 @@  @   @@ 0@  @ 0 0  @  !@@  ! @ #@@  #8 @  +@@  +@ ""@ ' ""@@  ""@  " " @  ""@@ < " " @ <  !@ @ 8@@ 0@ 0 @  <@@ 0 @  8@@ <@@ 8@@ 8@ 8 @ x@@  x @  8@@  x@@  x@  x @  x@@  x@  x @   x@@  x @  83ffff̙̙3f3fff3f3f33333f33333\` sCover uTally{Report etable insert_to_tally Main_Menu"fNf8@ "X([>/WR"B`p vzfӯ"F"B`p vzfӯJFIFHH4Photoshop 3.08BIMHH8BIM8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIMAdobed         d  s!1AQa"q2B#R3b$r%C4Scs5D'6Tdt& EFVU(eufv7GWgw8HXhx)9IYiy*:JZjzm!1AQa"q2#BRbr3$4CS%cs5DT &6E'dtU7()󄔤euFVfvGWgw8HXhx9IYiy*:JZjz ?N*UثWb]v*UثWb]Y5`WMqWP{uqWP{uqWP{ZvpKߚOu;z^I[_e_$Y"|1mły @qYLj 8?fmFೝqqU͑\DS`?q=> AAǷד./W'!ЭWW\I"OKt\;Wv z}15˭-[_[k #! q6`/2×O(OpGBemuy]XmᖂdK˯&8%L(qNGnQc򸿫?): zFXUڻ9D[_cy$a1#*S_h`?RNT Tx{u+ثWN*UثW9[%2/?v0$x"zg Rf diV%*~}9!3%sC_ϗ}6 I>lpIyn)uCXH,GBR3###) ?:iK9 -lygo^hD~ /9C.Ruґlk;穀Y`w#WwB:s K|=Y)v.Rc<*yf9cO[켻uv&e^\[^^>9N_O/Efb}"Э_4m#,k{TtIؼ+0'gxK$cyp}LXix|Yjy?>?/yr[;SKwm $Ki$L{>FG.40X}1HDE_MentNMԦKm;ZX&J@UUS\^y39cLRϏՓ eє|B7jWN*UثWcyQԬC0#r-c;nG}La9JBq㏉>,{b ?/QqˤK&m5U;3<k/v):38g?5HGv\x#bǚSνyi ڴ^mʠMˣO@ʼf1 1 4ˋ<K]R&3M=y. i]-J!x%qw j~eMcb=N/81a5%~P -ԯ qwy(ݤq΋K}>n8,>pk$7'e-uˍF[mj-2f٥8fHvřVuxx3P @p&Ey+:Eۮ[zc~P+< h#x4'T_9fk3#SzX>^$Ó)Rg b=ɷLy=t?1F̶֖ni!%7fk͢|8ɛ6YJ8x>Gtp|v6Az5<.n'✱78!ÇϊI??N>/j>B6iu[>b)dzgqZzW*Gv91?5x[ïyΚ=ދ^Y^^j7YFm:X6?t˗vdAxI~8s$˓\9#&Q-}3,57_N*UثW|~e-40:6b[DIq/f'k3j#8ާ8c9l $XݧqJ<[l b$,٥9,9=TW3@akԼZqZ\[bhѧE"[*=&,\zy<p/Y"9Q.M)Ύj5|hal\W.L߸/ŗ@ [ K̞b?Qi6+o4i;0IHf.ٖNc~<X}X2c8]c ϥHNQK?v?r{V2Y8a 7fXoljWN*UثV9w ikt :#z'(tr8t6}+JjVO2c\1J>;+<e$wKnM_""sN8ܹi]KaFL/Z̒8cw+Ǟe`:}ƣwa{Oy@mm0/#s7gˎ٬BxbσK㟋\sqzg,\rS-V6W`DlH3]AJs.TO Jchі_,y]Cy֧|o95iV8Ɲs2:X{)?r읋fx|s)ed. χ/ΓOg e.?Mˈc1;~~9n6V]̰@IUU$A%.t0}n@P\!eRHFh cy1,16[okh5:xO&̢Id6w2[1WL+[7rAk[@)"2M̝.~Og~No21(.k>]jĦЪ%֖iyrD5ȌeԈ~\[bZǓiZ'.um{Kˉ tjBΗCyLcE %̰b"mgT"d؀ xH *qN9ÿyc!E.!ѴuGˀU>KP0Fǩ&\eԞW򷓭[ B=$D~ڶszfma2.cO9x?XJkzh_RKm6()ʃz~?+6&.pe7(Q:}VBY+#_/OM˶>OnYe5 ƻ|A΁b2TIyi;BZ}8D<דCg2u7>"鈝TL\xϜGcgqT.ECK+zE$ zwv*>G9嗃"xgQ6 i_zޟg\pXoD H vx9>._vh 9<rdQӒJ;ĆW^*ެ Du.+3kGRkKXy);UmMɱyD賱_͙X=Y'?39I ˷k uY䏿f?sgc(} .&rWFŷ<(?'$n?:b2a' "uJ{]V/\ !}B7ܗ?Ư'_G T?+;q}+:*R5~\+'9vgg8r>/NS#"~g zWyC}#W,C*$R$m,2Y3a&18cyzjzPkfGm9|Bq_W l@40'>'M=n˽_7IOi1B'$^_Q#(:XY}0?\#&ߧ䷎)f ;}a2—S'5l5~,\<_oq>;QlRH+rQd .ssv?&hE(U,āXny :rd79>LɨZO 1w s{u$y-݈!bt}KXx1_7Ap2^[k+iI,#MÄS[*ɮΡ+v=>ILIIZ6u>)HQ͗)ljdž-dzGԗT/UV[oc4VY+/4?\I1؍|,R,ʖ6U?[- 袶z志=fweVZUs3)*?/旴#$F9OÕ5o?s43Yb~~JL[g;#.UW_俊ISy0o< 5&ixT1ƒ2vÛ|K 3q/2ݦ<ϨEe<9/Curƭ'n EbQej^y$B=>(ڡ@?\V'=F^ykM'ᶊG'<}oOPrKB~0n&:G$ߕ^hc]+q /T_ZPMh?C["}q|Og}qK?[iG?Cj)w0xOy|e,)G/\I.p#'?eM*]v]\\] I(Ic9Uae! 8JWP< oo|)k]SQ{=xҟ reIޑ+6yyS^U/0$WbR4Li'IY<ߩS I"4F4Li'IY<ߩS I"JFIFHH ^Photoshop 3.08BIMHH8BIM x8BIM8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM@@8BIM8BIM p4PD@ JFIFHH&File written by Adobe Photoshop 5.0Adobed            4p"?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?TY?X`}^99G}ϑfJ Y}{Njq;کYcK~\f.ǽ\{^}tonX~| Ki;ٿ;Եf[W>eW]]bQ[X[ć*_hJ8/XSTyRBƯ+m4>i੽`e\S0\~Q>1-v~7-[E B4#s}>ҖH)K2iRI$)$āT:ZXnt3\vk~ޒb EFH䇵MO p#wGI>eӾcM}(n;^o%Ӻ#eXEtW&ZV?MɣcDdenĻ516*캭-Rhi9՗]vuarNAC k:RY'&SkO-}ǭk Ot޽w?`:cbSMcv9dngr,=[nRbxlFf0#(WE ^pӂm]Z_ṙ1ܟNJY,?k-fGQ􆸴뫯'&`{l]ͫuj6ָ9ǻ(^9e݉V_kof g[cjuYk~9-x˳{>ܧ*<z\v_O|cMөs vz-dFhl|Ow.Z~`ұ~ٟ} Ʃ!7d]60zcl##@o٩I߹{wg!<Rrg Jq78e<|^$'@5w ǁu95S~V5[>mCY?mv-?c@etLÑX?o's'63)V. /~VU*Mu=g}K')ή^gLy;vG-~u7tZwW:ʽ9~C. L#gﺚINO{xGˋ(]\*=Xk166뮹mU뮹yvwG23sd0яEl-?ӯuzn=MGF&ף=X#9q\qIk??CT NfmM~koGI+7IB/ñv=V~km{*'_~*m=OUQ\~=,ݫ]P@kD-Gn/|^ wUu z>*439k^is-4VQPf>ڏ_laJjikIK6ۊh[Tʩ$ꤗʩ$ꥅk۷s7z>~z$;tr/?SQ5oz^lOofߢUI#I/RII/RIOI/RIO8BIM XICC_PROFILE HLinomntrRGB XYZ  1acspMSFTIEC sRGB-HP cprtP3desclwtptbkptrXYZgXYZ,bXYZ@dmndTpdmddvuedLview$lumimeas $tech0 rTRC< gTRC< bTRC< textCopyright (c) 1998 Hewlett-Packard CompanydescsRGB IEC61966-2.1sRGB IEC61966-2.1XYZ QXYZ XYZ o8XYZ bXYZ $descIEC http://www.iec.chIEC http://www.iec.chdesc.IEC 61966-2.1 Default RGB colour space - sRGB.IEC 61966-2.1 Default RGB colour space - sRGBdesc,Reference Viewing Condition in IEC61966-2.1,Reference Viewing Condition in IEC61966-2.1view_. \XYZ L VPWmeassig CRT curv #(-27;@EJOTY^chmrw| %+28>ELRY`gnu| &/8AKT]gqz !-8COZfr~ -;HUcq~ +:IXgw'7HYj{+=Oat 2FZn  % : O d y  ' = T j " 9 Q i  * C \ u & @ Z t .Id %A^z &Ca~1Om&Ed#Cc'Ij4Vx&IlAe@e Ek*Qw;c*R{Gp@j>i  A l !!H!u!!!"'"U"""# #8#f###$$M$|$$% %8%h%%%&'&W&&&''I'z''( (?(q(())8)k))**5*h**++6+i++,,9,n,,- -A-v--..L.../$/Z///050l0011J1112*2c223 3F3334+4e4455M555676r667$7`7788P8899B999:6:t::;-;k;;<' >`>>?!?a??@#@d@@A)AjAAB0BrBBC:C}CDDGDDEEUEEF"FgFFG5G{GHHKHHIIcIIJ7J}JK KSKKL*LrLMMJMMN%NnNOOIOOP'PqPQQPQQR1R|RSS_SSTBTTU(UuUVV\VVWDWWX/X}XYYiYZZVZZ[E[[\5\\]']x]^^l^__a_``W``aOaabIbbcCccd@dde=eef=ffg=ggh?hhiCiijHjjkOkklWlmm`mnnknooxop+ppq:qqrKrss]sttptu(uuv>vvwVwxxnxy*yyzFz{{c{|!||}A}~~b~#G k͂0WGrׇ;iΉ3dʋ0cʍ1fΏ6n֑?zM _ɖ4 uL$h՛BdҞ@iءG&vVǥ8nRĩ7u\ЭD-u`ֲK³8%yhYѹJº;.! zpg_XQKFAǿ=ȼ:ɹ8ʷ6˶5̵5͵6ζ7ϸ9к<Ѿ?DINU\dlvۀ܊ݖޢ)߯6DScs 2F[p(@Xr4Pm8Ww)Km&File written by Adobe Photoshop 5.0Adobed@       F  s!1AQa"q2B#R3b$r%C4Scs5D'6Tdt& EFVU(eufv7GWgw8HXhx)9IYiy*:JZjzm!1AQa"q2#BRbr3$4CS%cs5DT &6E'dtU7()󄔤euFVfvGWgw8HXhx9IYiy*:JZjz ?*UتZִ.w:ֻyYswp#E7'&u'a%3QXNqLhUյ7S%ť,OHrVVZ5dH d p%ثWb]v*Uث<Wb]*U)7/'^a%vMyM;l:EE1c,Z8Hq9a_͔̺{9ԕ}Y%&5Ou }F^S)zgk8'ͩER{;[{y8ik#.I%~ΤNYLqe]CXGurG4i4.E"D!AlAwRUeE.*(%RN*+mq+Q' sb$"Wb]hkB ?h =]GkٝF9OCr+t!*zs{=:h>Tn5=R {KV sq4bC9f$W_%Uoir xbg#~ڄWI \yZRG85_Ϳ2v.΀98:st/㇘0O0\kט بkǜ3<lZ(U*}ha1 \]?u}[.]@:߂RU#@My$*Soe)p̏O'h~Xnl5 uxagIhQBHd-GCp#wgzN)Or>\-WH4t~UnX[ޓ=uE\k澗O}D,nY{Y=+%y!bUj'x/ >{ )LM\M=ȵ?<ݤ: tIDHdv$Uwf Ta,2ӛ,q@\R恦izך5&ʚ$:Xo'{PPo'>;(K̨J@o?aA/JuTo;Q FIˆ3.~rO_/'j_]6JbG?HcP0dfG/~sQQ}X2N՗z?wO䵃Hv׺z}Z('&@eflȺC庭R93dyq? 'Dk((gV/8O9([xJN!ȏOGS܃bB 9+ҵ醊,]:{m*Gi~D-3vs e#qJR<\ >?~@@ԴRh/#gBҥ`wPY^&~O?#?4+icu>gzt;9y5eVhYx#NgLF[15K?OO;M9.\p}v6P(y*z*Ĺڎ(fc}?@LyoZ5Xoist.B$(iiPgSGG}?7aF//=:}FK1\GFZ132ƊWsSn4Ʉp&~)є'\~nz=-̷dq/ olnӕIùQG% 9O,7!:hcAtCm;OkZO yUcPcy@h냌 ny1$f"D?"=Sxמ6,|e[]y8|}ssk}0,cÓ|roke:8!яvΞe|ͣQywR_C/Yg4YeʪeN^]%)pa=~PrF$* p_LPZ6hڶHyWKvԥknHQG 9ՒkHs;cF5x1C68CU~aWGvh_kfwث8?5D4w$ 2\F"I@i;e_Zhe>Xֵ9FIӁWlӍPnA#=smeywJ4ջ}ّT]HqXQNj8뵢Qjo~6|£Ŗ}?$c~|WnQM@,А@(]#P@I$WhOc쾗H#oB ZOgqˇ&'yc GN-u" ^U?>C`NPgU_EZ%cjX'tv<^4,,xa/N I,#Q-zd\3XEħY?f60e0♎8O/AO&~]y(}bLkqnܐ!G$ y/99LJg{>R(8OّF/(5\Liw~` HWͯ$:ldQjҡ"4mj;8}4!N8OPɚ_Gмuy̗?^Eֿ25˺%R߾HDb"żlCl;ݣ \_cc'}G@͟~Ņݧ`/G fͬEez#'͖r/5P%,߉?FG+DW[(`j4kD[\.ᯯ%$z`w-zh<81ۧO#JS?Α|sRYu=cU-m/ AV8˓_$eG1"ŎF1DŽ/<*Ul4o ȲE"7 A|=JhFeak0koPJXU34?}}ɏS 3d>o5xNOܩ-S\j~q,EK=V#_~IүFY<,;GuNG2Fle=?6>]ЯkQ'Unq$RDd SPQW?} (gv]9HLuVy˿yvԎ O !Y$Ż}!z]G&]19?|U]ƨu:yY,I>};Gb9UYer,H˒m{c? Kͪ҃'~cхEAF8h eoI22$zZf5Pub vau[8-`}7WΡ=o/dmYFDRtžr}]όcL%[~RJXZ*`Y09UCP>Čcs+ʖFl|};B"%dCAD'>G4{h߸b.ɩy69$<)W bx|J|05O׶Hx#)h󖿓ڐUؚqwP36fc{G#?/^[༼+iZWG^kӺ ֫:_qrdX]z}k{m~X~b@?{S$%@$n 2,*UثPQv*U |=!51i xsY%zWQYGO;%h32xxbd~|9Q;j_.1H{|~b (ZE2}/M쎗I[m!ÅFq*H_?5rSY5 TBG_yGghή9|GZN~p.n.=[hY{i}0CoHҿ'+U GKB嵎w4W;z4ٻk]??iA/ZmEHE l*pӯ4J#^z?R*R+LZl|F)kKi%^:1e5l5)Wyf&/ΚiҫMCZb:vƃLt'&O-I帞kzlU;r~}%C9@@Oqp*UثWb]rWG!"]}6[ ,QIAxR%ʞl:\c,vԷ3 DiBK1tNWYy!ל.ͯpk<.ثWb]v*Uث3 A@@  P< LAST NAME FIRST NAMEABCDEFGHIJKTOTALAALMGOURMET POPCORNCAKEHOMESTYLE READY-TO-BAKE COOKIESBBCost Per Unit =Unit Sale Price = PAIDDUE create_reportRinksXTOTAL UNITS SOLDTOTAL CASES (8 UNITS)LEFT OVER UNITS FROM CASES GROSS SALESPRODUCT EXPENSE NET PROFIT(GROSS SALES - PRODUCT EXPENSE)MikeADDITIONAL PROFIT OPPORTUNITIESCost Per Unit - $4.00MIKE'S TOAD FUNDRAISER REPORTUnit Sale Price - $8.00JelloHelloToms43 UNITS @ $8.00 EA.8 CASES X 8 UNITS @ $4.00 EA.21 UNSOLD UNITS @ $8.00 EA. CASE TOTALS TOTAL UNITS TOTAL SALES YOUR COST YOUR PROFIT EXTRA PROFITSNAME UNIT TOTALS EXTRA UNITS PAYMENT INFOYZNEWTALLY SYSTEM 2011Bbp p=pb*qqL^rrPscc2  tt  dMbP?_*+%"??U} I@> @7 Sheet3    dMbP?_*+%&'()Mr \\VISTA\Dell Laser Printer P15 C odXXLetter,DINU"p-`kJpSMTJ`Dell Laser Printer P1500 (MS)InputBinOption1RESDLLUniresDLLIsDellTRUEOrientationPORTRAITResolutionOption2OutputBinFalseCollateOFFTonerDarknessPrtSetPictureGradePrtSetPaperSizeLETTERMediaTypePrtSetHalftoneHT_PATSIZE_AUTODitherHIQUALITYTrueTypeFormatOUTLINEKMXL"IXX??cU} }  } m} } } I }  }  }   h h @@@h@Y@ h?@ w;8wwwwwwwwwwwwwwwwwwwwwwwww ^~  @<999999999999999999999:;;<< ^~  $@  `: `:    x/ z0 z1 }2 }7 u4 v a b c d e f  g  h  i  j  k l m n8 e9o?p@j@m@ q ry{|{{6ABCDEFGHIJKLMN__OPKQRS#T %!U DD!U DD!V  DDW6~ABCDEFGHIJKLMN__OPKQRS#T %%UDD!U DD!V DDW6~ABCDEFGHIJKLMN__OPKQRS#T %%UDD!U DD!V DDW s5 tX -XXXXX X X  X  X  X X XXXXXXXXXX!= DD!= DD!> DD7 . YD oD ODDA DADA""BYL oL OLLA LALA""BYYYY  Y  Y  Y  Y  YYYYD oD ODDA DADA""BYD oD ODDA DADA""BYYYY YD oD ODDA DADA""BYD oD ODDA DADA""B'Z%[D![ DD!\<+ DD7 6  Z D &DDA B ED &DDA "B Z   L &LLA B EL &LLA "B Z   Z   Z   Z   Z   Z   Z   Z   Z   Z   Z   Z   Z  Z   Z   Z   Z   Z D &DDA B ED &DDA "B Z D &DDA B ED &DDA "B# Z  %  3 ! ] D D 8R^\@ZR  *Z(  T  # Asweetsu]&`~~  <RCC@C],BR.R9 $ < ADD A SELLER< ^ A> @  7 Sheet1gg@    dMbP?_*+%&RPage &P of &NMr \\MIKEVISTA\Dell Laser Printer C odXXLetter,DINU"p-`kJpSMTJ`Dell Laser Printer P1500 (MS)InputBinOption1RESDLLUniresDLLIsDellTRUEOrientationPORTRAITResolutionOption2OutputBinFalseCollateOFFTonerDarknessPrtSetPictureGradePrtSetPaperSizeLETTERMediaTypePrtSetHalftoneHT_PATSIZE_AUTODitherHIQUALITYTrueTypeFormatOUTLINEKMXL"DXX??U} } } $} $} $ } m}  @,@?@?@?@?@?@?@?@ ?@ ?@ ?@ ?@ ?@?@?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@ ?@  &26 % '     $ $ / & 0 1 ' 5  (  )  2  3  ( 4 +,?-@.@'@ * * % % % !( ")""""@""""""""""""""""@#D@ " ! "#"@""@""""""""@"@""""""@"":@#j@" !* "#""""@"""""""""""""""@"(@#X@" "@""@"&@"""""""@"@""""""@"@"E@#u@  ~ "?""?"@"""""""?"?""""""?"?" @  ~ "@""@"@"""""""@"@""""""?"@"5@   + ~ u@   ,~  p ! "~  V@ $ -~  e@ B XR~:RRRR* = (   <n  : 3  logo] :`ZR ;  # Asweets4]&;`ld <  # ,A brandicon-small]&<`@ = T CCMenu_ButtonF],=B  0 9 $ < Main Menu<@ d>@        7 Sheet4  ǸѸٸ !)19AIQYaiqyɹѹٹ !)19AIQYaiqyɺѺٺ !)19AIQYaiqyɻѻٻ !)19AIQYaiqyɼѼټ !)19AIQYaiqy  dMbP?_*+%"??U "#D BB7D  x0`(  h  3 .Asweetssweets]&`z  3 @A brandicon-smallribbon Z]&`x6h  #  logo` ] `ZR  # Asweets4]&`@ld  # ,A brandicon-small]&`>@(((7 Sheet2 ThisWorkbookSheet1 $__SRP_20#__SRP_21:'B  !"$%&(*+,-./012356789:;<=>?@ABCEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgijklmnoqrstuvwxyz{|}~?J0:#xME (SLSS<N0{00020819-0000-0000-C000-000000000046}X(%H8HNxAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2\Jb#<-/GJ̢}8 Fl F{N8m vxl F{N8m v-/GJ̢}8ME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H8 % %X@HHHN$*\Rffff*0<4e11e4574xAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU !rC4ar r`rU @nrU $`$A`$`8` Iay $`$A`$`$`$`$A ` frmSavory95q__SRP_2`H__SRP_3)Sheet24ffff*;D4e104dd3$*\Rffff*;@4e104dd3*\R5*#2a*\R5*#28*\R5*#2e*\R5*#24*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#28*\R0*#f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#41*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#47*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#26*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#45*\R4*#19*\R0*#f*\R5*#2a*\R5*#28*\R5*#24*\G{AC2DE821-36A2-11CF-  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abk+fghij mnorstuvwxyz{|}~,<@ J RASLOWI7|Br [^[C'̧XB x'̧XB ASLME,SPSSS(L<<<<< <$<(L6""""LLLLLLLLLLLLLLLLLLLLLLL <<<<<<<<<<<<<<<<<<<<0{7DE57D76-AF1C-444E-AB53-16A95536E2C2}{0968F96D-2447-48FD-ACD3-142CB62926D1}@X'0(%X0 % `xJei Re%4%(4%hi i i  x`ve%%i p ` `XJe  i `i %`Xi U  `8Dk  i _L08@HPi i `Je%%i h t"`xx 8 `Jeuu`Zp%% x`t`r `l@\  08@Hi %(  `ke lh x`th DP`Je   `Je }}i ` t@p0 x`t8i i `rh` x@d `t`(b `\`T@X`V  `$pT`R`&P`(N`*L`J`,Hp?`.Fp`0XD`2B@`p`6>`8<`:p :`< 8`( 6` `4` 2`0H> `0 , `4@X!!!"`x h`l`d # #8#P# ##$($@$  `Je::i @l @l `j dx`` h`TJe P `Je ki  `l e{i  `xJ`ev ! @l a eaea eaei   `0xk@e a e`aea eaei 8 P ` h x`0p8B@p @ l @8h @Pd @h` @\ x @X ` @T @P @L @H @D @(@ @@< @X8 @p4 @0 @, @( @$ @  @ @ @0 @H @`  @ @ @ jlnprtvxz|~0.@ @ x!@H @ @ #@ $@ $&@ ('@H 8'`)@p H*@ p*p,@ -@ - /@0 H0@h X0002@ h3@ 35@ 6@( 6@8@P h(9@ xP9P;@ <@ <>@ (?@H 8?`A@p HB@ pBpD@ E@ E G@0 HH@h X0H0J@ xhK@ K M0@ N@( N@P@P h(Q@ xPQPS @ T@ TVjln0W@ @ `WHPY4(@t @d @` @^ @X @T @D `@04@x B4@` @`P @@ @0 jlnpr` ( (08@HPX`hpx  ` 0H xtvxz|~8P@8 , @ ( !p@ @h  @ @ @ @P  @  @ @  @ @ @ h0.&@ &`!&H&@&0x & x"&xBRR&`h @X @H @8 @( @ @ h# @ & @ @ &@&8H$%p %Xx @t %(d %T 8p&&j&xp @` @P %@ `%prtvxz&0.P'4P'< @, &@( @$ @  @ @ @ P'( P'B$ '('0'8'@'H' 0 N$*\Rffff*034e1068ca*\R5*#2e*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#4f$*\Rffff*;E4e104dd3$*\R8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#26*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#41*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#47*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#4f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\Windows\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#45$*\Rffff*;F4e104dd3Wi4l8<h@pDqHwL{P|T}X\-`.d/h0l1p2t3x4|56789:;<=>?@ABCDEFGHIJKLMNOPQRVWYce fdgmn '$((),r0~4*8+<,@DHLPTX\`dhlptx|ST " "&&&&&p)h/56666 6(60686@6h6H6P6X6`6p6x666X8< )&&''')0'H'P'`'X'  '06'',( *%'  8(*r(^xI^IL"L#L #L8#LP#Lh#L#L#L#L#L(L%L%L%L%L&L &L8&LP&%7%6%6%6%6%6%6%6%7%7%(7%87%H7%X7%h7%x7%7%7%7 ||7"N`8j8"N8.)Lh& H( `) ;3 P) ) ) & %x) 7) 7)  * "N< J* **F*%*"\+"\0+"\X+A+A+A+A+(_,(,78,&7X,*(_x, H ,, , , 1, (b, L \L O- 0- 63:3$43 3(( "N( LAx/ ( `(^"^IL/L/L0L0L00LH0L`0Lx0L0L0L0L0L0L1L 1L81LP1Lh1L1%1%1%1%1%1%1%1%2%2%(2%82%H2%X2%h2%x2%2%2%2%2 ||2"NH3jp3"N8.9L& p("N45 @4&%*7@- 7`- *"N<J-..F .%8."\H."\p."\.A.A.A/A /(_@/X47h4*744(_4 H 444415(b 5  L \LOpLh5 6x5:5$55 5 &0('" " PX@HP  )h /Xp  ( x    ) /  .  $  ) @  06H 0 ,( "N` NA %  ^0NOO(  @ ,%  h ^PNOx O    "NH    % 7 &7(  P J/`    % "\ "\ ,z0 ,z`      !0 <(K%=7= 70= P="N`=J=> >F(>%@>"\P>"\x>"\>A>A>A?A(?(_H?p?7??7??(_? H ? @@@1(@(b@@ 0L \PMOH5h@8  " IJ(9J*`J K IJt;JxJI " KKKK " `KpK hK " @BBB0C ,B"N8C`IhVhC C  LAC  D 8D GxNHD%PD7`D 7D D"NDJDXEhEFxE%E"\E"\E"\EAFA8FAXFAxF(_FF7FF7FG(_ G H HGXG`G HhG1xG(bG @L(bGG 0D(CC@ " 8H'XH HHpH@H " 8 HK H@K@ " B ,8"NNA `@B%@7@&7@ @J/APA `A%pA"\A"\A,zA,zB 0B @B PBXB"`B?pB?BB H "   " `H ,,  x          0 @ P ` p             0 @ P     "Nh  NA P K!K!K!K!K K K!K K K"K K!K "K(!K@!K8"KX!Kp!KP"Kp"R"R" `  8I        0 @ P ` p             0 @ P ` p        #  #  $  $  $  0$  @$  P$  `$  p$  $  $  $  $  $  $  $  $  % HI ph " @ H H ,8P,` h;        h  x                      (  8  H  X  h  x        ( 8 H X h x          (  8 X $: H ` p 9 ?9 ?: Px B}H p H X h "Nx  NG  P R RR(     % 2 2   P 8F8<%8"W%"W"W<P<<p9<@%<`%(ZhP22%`(Z@H PH 0 9 19 (b0: XL \M O`: x;0J@JPJ  "(;H9Xhx@P`p 0@P`& p&0 HX&p & & & (&@ X& & hx& & & (8&P hx& & & (8&P hx& & (  (8HXhx   x           ( 8 H X h x   0H : $::m %7&7 J/P %h "\ "\0 ,zh ,z  x X`"H;?;? ;X; "K &KKKNx0oxA@ho( A@rH6 !BB@ !B@ !(d !(d !(d !(d !(d !j(g !( !( !( !( !l( !n( !p( !r( !t( !v( !x( !z( !|( !~( !( !(e !(e !(e !0( !.( !( !( !( Me.lblExtra.Caption = "" !4( !( !( !( !( !( !(]] SELECT * from Fundraiser ORDER BY [ID] %.+ ! k !B@  ' !' !B@@ж  !,  'k ! k "!  !, "!  !," B@ "!$  !,dc "!$  !,0;;F;F !(o !(h !!e !( !!ed !(d !(d !(d !(d !(d !(d0o]]( !! !%' !! !B@ B@ HERE  !(E  $SELECT * from Fundraiser WHERE [ID]=  %. [NEW ENTRY]  !,Pokk !! `dk]] !! !%' (SELECT * from Fundraiser WHERE [ID]=  %. ! k0 B@ B@ 0 !!d "( !!d "(]]] !!d$dk' !!dumbed !!d$d@'k'k%Sale price per unit must be a number.'Cost per unit must be a number.'Enter a fundraiser name.' !!ddraidp kh ' !!dst bdkEnter a cost per unit.' 'Enter a sale price per unit.'N d0 k( ]] ! B@ !!d "( !!d "( B@0  refresh list !B@]' !B@  !, [NEW ENTRY]  !,  ' $SELECT * from Fundraiser ORDER BY [ID] %. ! ! !B@ "!  !,<@ "!  !,k !( !( !( !( !j( !l( !n( !p( !r( !t( !v( !x( !z( !|( !~( !( !( !( !( !B! !Tdk new entry !(d !(d !( !( !( !( !j( !l( !n( !p( !r(T !t( !v( !x( !z( !|( !~( !( !( !( !( !( !( !0( !.( !( !( !4( !( !( !( !( !( !( !( !j( !l( !n( !p( !r( !t( !v( !x( !z( !|( !~( !( !( !( !( !( !( !( !( !( !( !( H! !B@! !( !(! load data]p (SELECT * from [Customer] WHERE [ID]=  %.(] ! k !B! !B%'Lab "$! !j( "! !l( "(! !p( "*! !r( ",! !v( ".! !x( "2! !|( "4! !~( "8! !( ":! !( "! !( "! !( " ! !( ""! !( "&! !n( "! !t( "0! !z( "6! !( "<! !(" ">! !( "@! !(d "B! !(d# o8$ !!d$ "@( !j! "$( !l! "( !n! "&( !p! "(( !r! "*( !t! "( !v! ",( !x! ".( !z! "0( !|! "2( !( !( !( !( !j( !l( !n( !p( !r( !t( !v( !x( !z( !|( !~( !( !( !( !( "!  !B,2 !  !B, !  !B,  !B, 8# !! "6( !! "8( !! "( !! "( !! " ( !! ""( !! ":( !! "<( !! ">('d !! ">('k](]@]p]X] !!dd)k'Enter a last name.' !!dd0)'k)Enter a first name.'(  Ed/k.  Savory Fundraiser Software$'.SELECT * from Customer %. !B!KQdk/ B@( B@2. B@ E B@ ! !B! !B%'2 !! !% "F(</ !~! "4(0h. "J!  "H! "L(@0 !BB@ B@R] !BB@p0 load customers load customers  !B,[NEW]  !B,  ' ( (SELECT * from Customer WHERE [FundraiserID]=  ORDER BY [LastName],[FirstName] %. ! ! "! B@'k !BB@  'd !BB@ "!  !B, "@!  !B, "B!  !B, !  !B, !  !B, !  !B, !  !B, !J$  !B, !>X  !B,  !B, !$  !B, B@ k  B@ ! !( ! !$ !( !$ !( !4(  !B, [NEW]  !B, , ,SELECT * from Customer WHERE [FundraiserID]=  ORDER BY [LastName],[FirstName] %. ! ! "! B@ !BB@ "!  !B, "@!  !B, "B!  !B, !  !B, !  !B, !  !B, !  !B, !J$  !B,]* (SELECT * from Customer WHERE [ID]=  %.DB6 !j! "$( !l! "( !n! "&( !p! "(( !r! "*( !t! "( !v! ",( !x! ".( !z! "0( !|! "2( !~! "4( !! "6( !! "8( !! "( !! "( !! " ( !! ""( !! ":( !! "<( !j!'$ !l!' !n!'& !p!'( !r!'* !t!' !v!', !x!'. !z!'0 !|!'2 !~!'4 !!'6 !!'8 !!' !!' !!' !!' !!': !!'< $  & ( * , . 0 2 4 6 8     : < "H( !! !%'!B, "H!  "J(2 "!'T  !B!    !B% Tk:  !B(p: !B! !B%'T}load customers !> X  !B,@  !B,k !$  !B, B@ k  B@ ! !(! ! !$ !( !$ !( !4(  !B!  !B% T  !B(k5  !BB@4]( ]@ ]X ]p ] ] ] ] ] ] ]0 ]H ]` ]x ]( ] ] ] ] hA !n!'& !l!' !p!'( !r!'* !t!' !v!', !x!'. !z!'0 !|!'2 !~!'4 !!'6 !!'8 !!' !!' !!' !!' !!': !!'< !j!'$pA $  & ( * , . 0 2 4 6 8     : < "H((D]  !! !%'' "H!  "J(8C !! !%'' !! !%'( "J!  "H! "L(<pBDC !B(B;pJ !  !B,Mh  B@ ! !(0 !( u+ $ !($ !( / p?@ ! !$ !(A !$ !(AMe.lblExtra.Caption = ""Me.lblGrandTotal.Caption = "" Me.lblGrandTotal.Caption = ""@$ !($ !(8A !( !4( !4( !4(A;};_;<;<;2; ;<;&;F !B(A "! B@ !  !B,AhB`] !! !%'= !! !%'X=' !BB@  !B,[NEW]  !B,  ' !! !%' $ $SELECT * from Customer WHERE [FundraiserID]=  ORDER BY [LastName],[FirstName] %. ! ! "! B@ !BB@ "!  !B, "@!  !B, "B!  !B, !  !B, !  !B, !  !B, !  !B, !J$  !B, !>X  !B,d;  !B,k: !$  !B, B@:k:  B@ ! !( ! !$ !( !4(9 ohA' !B@  !, [NEW ENTRY]  !,  ' $SELECT * from Fundraiser ORDER BY [ID] %. ! ! !B@ "!  !, "!  !, "!$  !, "!$  !,  ' B@?k? !($ !($ !( !4(] !B@(?] ] ] !B! t2kC  msg_k0] !B! !B%'u@C Are you sure you want to delete !?   Savory Fundraiser Software$' (SELECT * from Customer WHERE [ID]=  %.ʏ ! kC B@  ' !BB@  !B,[NEW]  !B,  ' !! !%' , ,SELECT * from Customer WHERE [FundraiserID]=  ORDER BY [LastName],[FirstName] %. ! ! "! B@ !BB@ "!  !B, "@!  !B, ً "B!  !B, !  !B, !  !B, !  !B, !  !B, !J$  !B, !> X  !B, d@  !B, ? k@ !$  !B, B@  X@kP@  B@ ! !(Y ! !$ !( ! !$ !( !4(  refresh listre-calc ? !(H oI !B( !B! kHH  '  '  '1  '1  'I !! !% INFORMATION$ !4(`I !( !(I  B@!J !!d$ "@( !!d$ "B( !!d$ "B(J8 oXJ B@ create_report %N(J !0( !.( !( !B! LIZEkd`J] 7You must have participants in order to create a report. %Savory Fundraiser Management Software$'9I B@RK !BB@KA@ A@rK oK]HK oKo  !0( !0(  !0(KMe.imgExcel.BorderColor = &HFF&hL right here right here right here right here right here8L !$ !( VMe.lblNetProfit.Caption = FormatCurrency(FTotal.TotalUnits * FOnly.Profit_Per_Unit, 2)VMe.lblNetProfit.Caption = FormatCurrency(FTotal.TotalUnits * FOnly.Profit_Per_Unit, 2)VMe.lblNetProfit.Caption = FormatCurrency(FTotal.TotalUnits * FOnly.Profit_Per_Unit, 2) VMe.lblNetProfit.Caption = FormatCurrency(FTotal.TotalUnits * FOnly.Profit_Per_Unit, 2)K !!'`N !!d$ "(+ !!d$ "(HN !BB@`NhAttribute VB_Name = "frmSavory" " Bas0{7DE57D76-AF1C-444E-AB53-16A95536E2C2}{0968F96D-2447-48FD-ACDJ42CB62926D1} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustomizD P Sub cm de_Click() Dim rs1 As RecorPdset c-_idLong `msg_tNerr_flagBoolean messageFS&oveindex_numA IntegerUGARBRCRDURERFRGRHURIRJRKRL5RMRAGGOn#BfXTwoRThreS Four !_valSinglÅid_lLAM#=If Me.txtLastAr.Text <> "" TheLEs aQ= n %QE`J r a l` n `.@aEnd If,Fir_) b_eAf v&,( rMsg0Box(, vbCritic al, " FundraisSoftw"#k*1lster.ListIAt F0,Set= dbF.Openf("SELECT * from e Ea .AddNew'`![ID].ValuGgHColumn(0,Kfd!EF Q Proper(UuJ N A`cboA#t$BBCC.DE EFZGGHHkIIJJKKLLMM11Z2233k44A12J![B2/2AVe.O7`B&_TC&5$D&5$E&O4$F&3$G&2$H&2$I&O1$J&0$K&/$L&/$M&O.$=`-DE-Ee,dRU+T05A?+D>B&&D`TTotal4A + B0C0D0E0F0G0H0I0J0K0L0M09+ P+ + B wy3y{yTc`b DueG *  i2  W profit - (&*HI?3PaifdGahk1Q .Upd \.Mؑm=[P֡C0څ'load AQomersy 'load customers index_num = 0 hMe.lstCn.AddItemFColu@mn(0, ))X""!51 5[N8EW] :  + 1 aid_long=bFundraiserNam e.SList I)*Set rs1*dbF.OpenRecordset("SELECT * from  "p & _ #"WHERE [XpID]="i+' ORDER BY@ [LastA?],[Fir"8IfA8.5Count > 0 Then1Whil"e EOF@EFalse:J_ tings![8.ValuTChEQ pmDߍBUh12g/3 &TotalCookie,{'4 Pop_0C 15;ak+Ex6 tun\it 7 Forma`rrency()Duex, 2lg%)`hPaid cTrueh%8 "X }EVo! f nd If{3 9(8NetProf|it)?@h.MoveNext/WendEpzFe.JįblCaption5PGrossSales.(M FOnly._PricP'right herU'6ݏut.r U14_Per_oG?f al._@Includpa_`CasesFr{2.Visirbg= 5; ; xP@ko 8}Cm-#; tZx2m%_=p'@ x{ ' + =Q= o ?e /o;oo di=p!#t+per(txt%{.TPB_\wxBA]0cboAO!1B zB-B/B"C-C/,D-D/,E-E/,F-F/,G-G/,ZH-H/,I-Ik/,J-J/,K-K/,L-L/,M-M/,1-1/,2-XEb)3-3_\4-4/,A?6O67B_6o6HA @<ݣBfCf:hDf9hEf9@lue F = Me.cboF.VaGLGLHLHLI&I&J&J&K&K&LLMMOne1(Two2hr e)3Four%*4AAAA BB BB rs1![Total]@A +T BCDEUFGHIUJKLMsU+ L@D+ B;+ 2Btemp_val1lstFundraiserName.Colum0n(3,ListIndex)17Due7<* !(2(profitL)-- (&% * nPaids AhkauE . Updatmo ve_id5Cu@stomer40?e 4` :glearO0'loadT c$ si?_hnum0 AddI@)O  2) ""?CV1, +[NEW]G g+ 1/ id_longe0y1SetJ dbF.OpenRecordset("SELECT * from 6 " & _e"WHERE ['ID]= E_ " ORDER BY [Last],P[Fird"cI f.cCount > 0 ThenWhile bEOAFals/4Z'_`tings![Uo%_Vs+m+RCX, k?1 S/ OOstdbJRnCookie_D 4E:OO= _gEnd IfC9 vpNetPR_' 7gv0dV<.M}Next apWend#F=+.O]OAblCaption? $_+QGrossSales.+*lFOnly._Pri ceO1'rig@ht her^ 'vu42BU18_Per__=8t_Includg_Cases3Fr@isib`n= 9? xro Ht-a 1_Kҽx_oxSah_V x? 1*/> <qSub #v cmdSave_ClicDk(PDim As V Lerr_flag As Boolean  Dim err_message|Stringxmsg_tempDindex_num\Integer^ove_to6BIf Me.txtCost.Text <> "" The&IsNu@meric( 0) = True 2Elsec@؏/z= "G per unit must be a rber."End If97 5Er-c91 /Sale*RA pfeLr_hLsBLNFundraiserN,amP;qfF nDq39MsgBox(?, vbCritical, "S@avory 6 Software")ÐlstB ListIy > 0gid_lHongAe.Column(0,y d! aSet rs1 dbF.OpenRecordset("SELECT * from)" 8& _ "WHERE [ID|]=ADL# .Count4!A :m=a EdLit![+3].Val= Pro ğ7! E"b ' ,xA{a` .UpdatL_kl!?A0AE\aAddN|ewR_+B_+d ![*Af![_*)O X 0'refresh lp?g!;C} ~= 0 V~I_ZCqj"Xv [t1, {[NEW ENTxRY](6F+ 1 O(HHH"ORDER |BYH+GGWhileAS.EOF Faq@0]aB,TsIvm6F? 7 2, FormatCurrency(" :, 2R\{ ~3=W'=+ (E .M@fNWend}=O@}= CI 2ց>==O=/G%#oBoBdB OB~w1O" GLastQ],[Fir/Hq/H/HpМ_0tpsK!C T8/Kc}t:J1a,Tm'C !I mHfTotalCookies=>n(4, index_num) = Customer.TotalPopcorn  Me.lstColumn(5Cakes%6Jtuni t&J7 JFormarrency(bDue, 2)PIfPaidTrue T\he8 D"X"6Else (*)nd If*S9KNetProfitSMK+ 1!rs1.MoveNextKWendGE1F.set_tings id`_long 9blC Caption@$Q GrossSales.H  * FOnly._Pric'right hery'CwS3UCb_Per_d&_Includ+@_Cases Frame2.Visible*cc/5Sub "vate  imgExcel_Click(nDim msg _tempdta .Cells(20, 1).Valo= "cre _repo rt_ufrmS avoryLi ount > 1w'HidH3 +gress.SxhowDjtMsgBox("You m have parti@cipantSn order tDo  a .", vbCriAal, " FundraisManagemeSoftwa8re"D'--Mousem(By) Butt@bAs Integer, Shift xaS`Bl[=CYG@N%<.B`or`$&HFF&(StyHfmc 7INotepad}IVlblDeleteaT#c"Red 'LV!۩VIV0 V = De $4Af@ /TV."ArHe yP.suw -1-d2 " &GsFull_NB @"?R.QuesX+ /YesNo?..M.A  vb?QC1Set Q= dbF .Open("@SELECTTfromV " _k "WHERE [ID]=_Q p.C?H3)o'ref`Ih l`Ma]!lear_g,= 0LAddIYӠ ("+r1"[NEW]pE ? 3GU).m38%%* %%?% &5/" ORDER BY [Last],[Fi~reY,I Whi0],EOFFa/?Ia!5/(/+/+((+90a, ?12,22OO3LCooki oVOAIG /!$?/!07 ִ_num) = @"X" ElsethMe.lstCustomer.Column(8, indexnd ,Ifea9 aFormarrency(NetProfit, 2)dV+ 1rs1.Mov eNextWend Ew're -calcFTotal.set_tings id_long blCaptXioni!t$unitsGrossSales.H W * FOnly._Price['right herЕ.Fl1 z_Per_U9S!Frame2.VisibleHTruL$iSub  @=vateB  lblNew_Clickb(DIf 8Liount > 0 Thenfm I@+0C !Exit Unload frmBa,ckdM$ auto_cloa7FundDeleDte DimS As LTfRecordYBInteg -1l/n!"txtFirstm"qT"PgLa_5cbo1.Enadp32?33?m>4?>A?>B?>C?>D?>E?>F?>G?m>H?>I?>J?>K?>L?>M?>AO81(B_L/_+)/imgExxcel g1 pNotepadqOffchkPaidq@8_orzq8e Me.Label48.Enabled = Tru9cmdSaveCust.Visi'load Pdata c8_FilstHomer.Colu@mn(0, ListIndex) ISet rs1}dbF.OpenRecordset("SELECT * from [2] "p & _ $"WHERE [I8D]=_ EIfD.?Count > 0 Then5ocbo1.`Value^a!X[1]2 2U3 3 4 4U A A B BU C C D DU E E F FU G G H HU I I JJUKKLLMMAmLLLLhkPaidk!txtLastName.T8extew|FirEnd LIfbl!D eleteְEls̼'new epntryN "~"m `2bo3o4$oAoBoCIoDoEoFoGoH?xnhI?>J?>K?>L?>M?>@BO&W B_/ /imgExcel gpNote8padaOfficec,NFa@FrLa7`f qђFvpY0KFg/6S3./,4w/b bF_\B_]C/-D/-E/-F/-G/m-H/-I/-J/-K/-L/-M/-EF#E?9lzlq,8#HFoǷ,逵qSub Private  Fundr aiser!_C@hange(DimAs fӃid_long LpCookie_StriGPop@nbCaknI_s@C <> -1#u.ClearFA10$oߑV  Co. "SalMe.txtFundraiserName.Text = ""  Enabled\True` Cost.LSale&cbo1.ListIndeZxs0p"2"3U"4ABCUDEFGUHIJK՟LMAq r1FalsO 3a4! A! "BboCbo"DboEbo"FboGbo"HboIbo"JboKbo"LboMbo3WJoB_\-nd If.[9NetProxfit+ 1Grs1.MoveNextOPWendKE6FTo.set_tings id_long ?blC Caption@)tP GrossSal8es.H * FOnly. _Pric'right her 'C\6UЃCk_Per_mF#_Includ[_CasesFrame2.VisibleZd simgExcel.Ena@qgcNotepadOpenOff.Sub `4 vate  User iti@alize(DDim W As RecordNC!^Integ4erxgeneral_v eWidths(1 & "D;"125f9YG60H5323870CACount2b6lea$F@undrai*N B.CtxtC`ost.T@` "  ,rkirstBLacbo1@2O3O4OAOBOCODOEOFOGOHOIOJOKOLOMOA l x>0 Tpo 10D'vBAddItem x?&b2.t.3xo e4?0/ABC{DEFGHIJK{LMD=?9?929B1gtEES1HFa2mwG34ABCDEFmGHIJKLM%#"ListIl2. s$3 4mABCۯDEFGH.cboI.ListIndex @= 0 MeJKhL4M4AABBtxtFirstName.En abledFaHlse $La#FundraiseBr&Cost6SalFimgExcel NotepadOpe@nOffic4chkPaid.ValuelblTotal.Ca ption"" L'ExtraGrand @Fre2.VisieTrue#'mlst dColumnWidths@1 & "D;"@1507C3CiA_numGOAddI8tem A!(0t, )O 1 [NEW ENpTRY]^)+ 1C$Set rs1dbF.Recordset("SELECT * from O AI_"ORDER BY [ID]"))#If!. Count > 0 ThenG WhileEOF(p #-:?.!!\a _1exABw7+N] dd2;FormatCurrency(B a , 2D,n(3 [ >>i???@@@1AAAIBBBaCCCyDDDEEEFFFGGGHHHIPiTiXi\i`idiIhyalyyp9tixi|i  19Y`I 19y` iSSSiTTTWWW_0   0 P  0 8   0   0   0   0   0 h  0   0   0 `  L,P` T` P(@]@`5P` ` L`` ` `,P` T` P(@]3`5P` ` `` ` h`` ` h`` h` h`` h` `` ` `` ` ` (P` 0` `5P (P` 4` `5P (P` 8` `5P (P` <` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` ` `5P (P` $` `5P (P` (` `5P (P` ,` `5P (P` @` `5P` 0` `` 4` `` 8` `` <` `` ` `` ` `` ` `` ` `` ` `` ` `` ` `` ` `` ` `` ` `` ` `` $` `` (` `` ,` `` @` `` L` `` P` `fP` |` `5P` ` @ `` |` P`` D` H `` H` H `` ` @ `?(P #,` ` @ /,`5P?(P #,` ` @ /,`5P` h`  `|}P` T` P(0( T( 0: ,  @/,)`(6 0P` `` `` h` `` ` `` ` `NP` T` P(0( T( 0"qt)`(60PG`'%'%'@% *#,lt#*#"X l`=x2,`x pl RP(:@%`x ` 0( DP, h h/,)`(5PRP(:@%`x ` 0( DP,  h/,)`(5PRP(:@%`x ` 0( DP,  h/,)`(5P (@%'0'P` ` H`6P02:N00(P` ` 4`6P02:N00(P` ` 4`6P0(@PP`'%'%'@% *#,lt#*#!*#"X l`=x2,`x plnx 4knFP(:@%`x ` 0( DP"Y""X #)`(5P%'0'P` ` H`6P0WP(:@%`x ` 0( DP(0  4)`(60PWP(:@$%`x ` 0( DP(0  4)`(60PWP(:@%%`x ` 0( DP(0  4)`(60P<""X 4#li0(P` ` 4`6P0<""X 0#li0(P` ` 4`6P0<""X 8#li0(P` ` 4`6P0<""X #li0(P` ` 4`6P0Z""X @#njP F(0` ` 4`6P0""X D#k 2:&N00(P` ` 4`6P0 2:N00(P` ` 4`6P0Z""X <#njP F(0 ` ` 4`6P0(@P x  t"'X 4(1"'X (l#,` ` @ /,`b"'X (")X *lnkP #,` ` @ /,`5PO"'X 0(njP #,` ` @ /,`5P` ` `` ` `` ` `` ` `<$dxphl< ,`(P0 #p*#l}#h*#d*#`_#\*#X*#T<#P*#L*#H<#D*#@*#<2#8*#4*#0 #,*#(*#$<# *#*#&#*#*# F#*#  P28plhd`\XTPLHD@<840,($    @  L T L  h h h  h L h P h 0  4  8  <                        $  (  ,  @ tdc&'tM@ 0 5 tdtdc&'tM@ 4 5 tdtdc^&'tM@ 8 5 td.tdc&'tM@ < 5 tdmtdc&'tM@  5 tdtdc&'tM@  5 tdtdcb^Z&'tM@  5 td*tdc&'tM@  5 tditdc&'tM@  5 tdtdc&'tM@  5 tdtdcV&'tM@  5 td&tdc&'tM@  5 tdetdc&'tM@  5 tdtdc&'tM@  5 tdtdcR&'tM@  5 td"tdc&'tM@ $ 5 tdatdc&'tM@ ( 5 tdtdc&'tM@ , 5 tdtdcN&'tM@ @ 5 td 0  4  8  <                        $  (  ,  @  ( 0 5 ( 4 5 ( 8 5 ( < 5 (  5 (  5 (  5 (  5 (  5 (  5 (  5 (  5 (  5 (  5 (  5 ( $ 5 ( ( 5 ( , 5 ( @ 5 L  P  h           f | 5  @    | Pm#p*#l#h*#d*#`F#\*#X*#TF#P*#L T P2plhd`\XTPLpv%'t' T H6t7:dNttvM@( T 46t7:d NttvM@( T 46t kvpv/'d%'%'%  *#p"X Qx/p`x pl`5^x 4k^5%'t' T H6t\X:%x  0X DvMd@(tT TT 4)XT6t\X:%x  0X DvMd@(tT TT 4)XT6tzX:%x  0X D FDvMd@(tT TT 4)XT6tDzX:%x  0X D FDvMd@(tT TT 4)XT6tD kvpv x 4"#p  @ /p?( #p  @ /p5?( #p  @ /p5  8((x"plhd`\XTPLHD@<840,($  XTtDX$x x Hx$$ xHHD   \  < <o$ `$ `$  `8I ` Iay n?Jx#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}X(%H8HNxAttribute VB_Name = "She@et2" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU~|  ''(Y(1(   DBBBC1CYCCCC4y467Common<`.__SRP_dD__SRP_chFSO_Mod)22Q\R1*#1c8*\R1*#e4$*\Rffff*034e1068ca$*\Rffff*0@4e103399*\R0*#23*\R0*#f*\R1*#e4*\R1*#dc*\R1*#f2*\R1*#f1*\R1*#e8*\R1*#2ac*\R5*#20*\R5*#46$*\Rffff*0A4e103399 Xxx " (   "0  " @8 "   B    "   *  P X $h  "8 @ 6`  Zr'J(xME4(P@"1L<> """<<< 0<$<,<0L"""PLLLLL Xl%0 % `4k S` j%@x@%%(%%8@` @`@ `H k .._i`d(%P% ```^ @D@@ @i0(% ` |k`28 `hJ@8p .` i6 `i8$8 @@xx H`J I<  H`(|k @t @d @0T 0 (08@88``H888``H8@D @x@ DB @< @X8 +8`k Ji i>8i @4 @l  h H`pH0x P p8 @ \ ( @Z  @h H @ 8 @ ( @  @  @  @8 @ @p @P @ @ @ @  * @((l @\ `x `@ t H@ p @0 l @ h H P X ` h p x  (08@HPX`hp 8 h P @8d @` < @\ @L @< @, @ @ @ @ @p @l @h @d @` x hpx 8,N$*\Rffff*;C4e104dd3*\R5*#24$*\Rffff*;F4e104dd3$*\Rffff*;E4e104dd3$*\Rffff*;D4e104dd3$*\Rffff*;@4e104dd3*\R1*#2ab$*\Rffff*0?4e103399*   "      ;0H(EPx"1 B  HvXHv`< "*;  `    '` W W W B   08@)X p p8b`  08@P P`  x   ( 8@ 0 8op] 8 \Savory\dbSavory.mdb$.V] .har8] .X] 8.] `.`DECLARE VARIABLES]x]]0]HINITIALIZE VARIABLES''    $'  d  $''  $''d $')kdk'k  '  'i $'6'P nS'K.KTUsersx] `] Report D$B%F.Cover D$B%F.@] table D$B%F.Ho0frmSavory.Show !'D ] ] 4'2 4 2 0 bA@`oX 6'6d0 6d (td'6kk 6d !N! !(d !N! 6d !(k 8 !( 6 % complete !(A@o`X Returns Excel column number Input:e$ Col Excel column reference (eg. AA)ee Output: ColRef Column number (eg. 27) <e <$>@ 'H e <e <$ '@ee @$>@ 'B[e <$ 'De e B D$>@  'HuekxIf (ColRef <> 256) Thene/ MsgBox "Wrong Column number", vbExclamatione ColRef = "" Exit FunctioneEnd If ei]  { =address( , >,1) %N(d =address( , >,4) %N(kX %N!'{i0(o8dk  $''d $'k  $'s  $'SfrmBack.Show vbModal = Truegeneral_values!Application.DisplayAlerts = FalseApplication.QuitAttribute VB_Name = "Common" Public dbF As DAO.DatabaselFTotal<s0Only.FundraisTer8C82:Customer=c ;ReportWorksheet9book,_nSng%dle7oFormChang:New C "Cov= Sub auto_close() 'Appation.DisplayAlertsFalQuigEnd * -open-general_value#frmBack.Show vbMod= TruׅSavorry 3z2Wait(SecondsLSingleD6Dim StartTi@ZB=rDo Whi` r <+ C A+DoEventaD7Loop ,cV ColRef(col'' ' Returns Excel umn num be#BInput: @ reference (@eg. AAEO|ut AG 27 A/If LlA%{1 ThenG6,AscB. - 64E@K 2M1@Left$, 1CE(C1)) * 26 2pRighw +: 2 TIfc' ( <> 256)'!MsgBox " Wrongk'",cU5lamec ?d Exit %@$YDhb_Progress_Bar(Perc L_\Inte, !_CapbKƈ:= 02H1a9#A`$F> 10ai00ga;ij = .lblF/t.Width<‡b: (V O'-/!^))0.1=?2L$'I;& " %mpleteIĭFd_AddE(rex@W4:T %8<Fd%@ $ @ D<  8 dl4=)@<84W4:T%8<Fd%@ $ @ D<  8 dl4=$)@<84W4:T%8<Fd%@ $ @ D<  8 dl4=)@<84H$ $xt@<84|p^CdjJcZ)((kjlMH@ `1`6( l`=l`Cl0yl0b((kjlMH@ :]/(kjlM@ :]/6(/ k^ `MH@( (`1`5(p^*`MH@( (`1`5( k^b`MH@( (`1`5(p^`MH@( (`1`5(p^ k^`MH@( (`1`5(p^`MH@( (`1`5(p^ ldl`*1d jdZ# ldFHl  4\l`d((HrU ,$ `$ `( ` *( `1 /,! `  &00I ` 1I&&#$q `( `a0 n* ( 8 H ZP    "   4 :@ > *  B P h  F    "    40 :h > * B0xF " 08@:H*84HP " X 2` ,F0HP " X R` * * (@` h   "   & 0(0 *8 h p    8Pp x > < > ,@ B  p x    ( "@h $   "0X h   "  8X p  8 B 08 @`   :    *" HP h, " *  0"Px R J B  (08P 2XB   B     8P `x  "  8  28 6p 8 "     ( H .`& &  ( ] H OMove ALL files (or of a specific file type) from one folder into another folder ,REFERENCE TO THE MICROSOFT SCRIPTING RUNTIME]X]p c:\MyFolder'' change to match the source folder path e:\MyFolder', change to match the destination folder pathbScripting.FileSystemObject$.Lab  %lbl  is not a valid folder/path. Invalid SourceA@blG  %eIl  is not a valid folder/path. Invalid DestinationA@d \*.*  B@+3 Change "\*.*" to "\*.xls" to move Excel Files onlykX !5GFile not foundA@jo MCopy ALL files (or of a specific file type) in one folder into another folder]] c:\MyFolder'' change to match the source folder path e:\MyFolder', change to match the destination folddI@J xME P<<<<6 << (Jd@  %h P am `@ VB`x` (`@ `der` mat ` +@ `bl`lid  `  9@ ` `  F@ "\*.`ve E `  S@ MCo`a sp ` `@ ``he s` @` q@ `.` ` `  @ so`lid  `  ` ` ` `Fi  ` !!i6` `he s+  ` 0 %%i thr` Syst`y+ ` @k `t `pa 0`   `  ` pe`" Syst+$ `  i~y &sts%+` ` i*' ,ch t% .H `   I0 fold@2 th E@4 @6 lid B` ;ID   C:\t% F mat% H Sc% . % L@   %ʀ @`H  H 0 (@`H  H 0 (@P P x  `x@` @ P @@ H H H  N$*\Rffff*0A4e103399*\R0*#14Y  V 2` " BF*HxBH@XH, T" 8@HBXF* B8HX@,Hx " BF*P6 *" 08@:H*6 ( 0" PX`>h*<( @0 p x "   : er pathScripting.FileSystemObject$.erP  %ect  is not a valid folder/path. Invalid SourceA@rol  %eoso  is not a valid folder/path. Invalid DestinationA@d \*.*  B@+3 Change "\*.*" to "\*.xls" to move Excel Files onlyk !5GFile not foundA@jicoCopy a folder if it exists(]h]6 c:\MyFolder'' change to match the source folder pathol e:\MyFolder', change to match the destination folder pathrScripting.FileSystemObject$.ry  % Sh   B@olsdH  already exists!  Folder ExistsA@ako#Create a folder if it doesn't existSma]] c:\MyFolder' change to match the folder pathypeScripting.FileSystemObject$.ft  %ttp  B@d  already exists!  Folder ExistsA@koCheck if a folder exists ]`]xC:\My Documents' change to match the folder pathhoScripting.FileSystemObject$.  %  is a valid folder/path.  Path ExistsA@d  is not a valid folder/path.  Invalid PathA@koDelete a file if it exists]] C:\test.xls' change to match the file w/PathScripting.FileSystemObject$.  %  B@d , does not exist or has already been deleted! File not FoundA@kHo@Move a file if it exists]@]Xptest.xls' change to match the file nameTahoC:\'' change to match the source folder pathE:\', change to match the destination folder pathScripting.FileSystemObject$.ho   %   does not exist! Source File MissingA@   %e    B@dp   already exists! Destination File ExistsA@k oCopy a file if it exists]](test.xls' change to match the file nameH,C:\'' change to match the source folder pathH,E:\', change to match the destination folder path,Scripting.FileSystemObject$.homa   %   does not exist! Source File MissingA@{   %e    B@dH   already exists! Destination File ExistsA@koCheck if a file exists@]] C:\Test.xls' change to match the file w/PathScripting.FileSystemObject$.{  %  was not located. File Not FoundA@d  has been located.  File FoundA@M;"ko+You can use this to delete the whole folderr&Note: RmDir delete only a empty folder0 0C:\Users\Ron\Test\*.*A@$ delete all files in the folderhC:\Users\Ron\Test\A@  delete folderoKDelete whole folder without removing the files first like in DeleteExample4LJ8Fonts, MyDocuments, NetHood, PrintHood, Programs, RecentB%SendTo, StartMenu, Startup, TemplatescDECLARE VARAIBLES]P]hINITIALIZE VARIABLES u| WScript.Shell$.x` $Jc DESKTOPLOCALKT{_VDesktop %' SW5A DESKTOPPUBLICKTAllUsersDesktop %' ^STARTMENUPUBLICKTAllUsersStartMenu %'  !SSTARTMENULOCALKTZ StartMenu %' 6 PROGRAMSLOCALKT&Programs %' :PROGRAMSPUBLICKTAllUsersPrograms %' BoRECENTKT} Recent %' SENDTOKT8oSendTo %'  STARTUPLOCALKToStartup %' &O* STARTUPPUBLICKTAllUsersStartup %' O#}s TEMPLATESKTmMgJ Templates %' /) MYDOCUMENTSKTݚƶ MyDocuments %' ȈnhOpen folder in ExplorerXJ2Shell "explorer.exe " & SpecialPath, vbNormalFocusi Temp foldertRoDECLARE VARAIBLES]]INITIALIZE VARIABLES@G!0 WScript.Shell$.w MyDocuments %'iX4Without code you can do this to open the temp folder7/8 Start>Run Enter %temp%?XdOK#Or use one of the two code examples1DTemp$A@AOpen folder in Explorer explorer.exe Temp$ A@/"o@0]p_fscripting.filesystemobject$.~ l % ."FZ "A@X[ Open folder in Explorer y explorer.exe " A@u3اoL0 = The Windows folder contains files installed by the Windows operating sysRC1 = The System folder contains libraries, fonts, and device drivers ] ~ &%'$ i,REFERENCE TO THE MICROSOFT SCRIPTING RUNTIME  ] * ,%' i@DECLARE VARIABLES] ] ]0 Dim f As Scripting.File INITIALIZE VARIABLES 0 %8.2 2!:!<'6 4 2!> 6 4!@$. '6h 6'.iX070708 WRITTEN BY MIKE RINKS NOTES 1****** examples**********************************f.Copy ("C:temptemp2") ,fn = fso.GetBaseName(fn) 'name w/o extension 0fso.GetFolder("C:\MaestroUpdate")no slash on end 1*************************************************H DECLARE VARIABLES] ] ] ] ]( INITIALIZE VARAIBLES D %8.F 'LOOP THROUGH FILES IN FOLDER AND DELETE F!: !'Nname with extension MsgBox (folder_path & "\" & fn) D\ NA@o3Attribute VB_Name = "FSO_Mod" Public fs0 'Move ALL files (or of a sp0ecifR. type) from one folder into anoth&REFERENCE TO THE MICROSOFT SCRIPTING R@UNTIMESub FFY2() Dimo sl As Sngx, d ~c:\My'" ' change \match ]@ sourcjpath!+!e!destination#Set_CreateObject(" Scripg.}System "|On Err!ResuNextMIf No+.nExists(=) Then OMsgBox BD& " i s myvali d+/+.", vbInforGA3, "In SBIElse M BT DGY!:Pfso. B \*.*")D' CC"A0xls"Ex0cel £lyEnd If>e.NumbP= 53\ DZ"Xfoun'Copyin܀ +Âygolg`gg "g gsoggg@ggggOxghYxgo.EIgjgngg gaŬif it e a"``?Zcb$m.SbCSO _'8e)almdÿ́!rdpTlavdI sj[4U2ri8Rdoesn'tc@ rN pD|= ||Q~| P8 (A qw/Hqn ?vb?k?pm:heck 5f6 6#CVS QpeC!11 Docpntwe//ϔ˔ !. d|&#a "PL.3xK7q_4 PBDelePOR11t.rw/q ooleo `7RT'f3o.g , True30q3ER}." has5be en0!d!" _p&q6F4A6A6M1lo" f,c"Z 2`?Brn`cԿr g;RE:\/p###!W $??"a:"n "҂ Missi|ng: @r&*,̃oy1WMsgBox dfol & file0" already exists!", vbExclamation, "D estin4 FlET" End If Sub 'Copy a if it M! G()ADim fso dAs String, sC7= "t.xls" ' change to ch theIname-C:\sourcolder ppathBEdaSet!{ = CteObject(" Scripg.System "If No(e) ThenSH~does n@~ ~S>" Missc}lse!E!@y.E ,,¥, TruDfEN0?heck~ ƃB[2d0EC:\T!w/PƙsoɉaD& " waClocated.InforA!PFoundB6 h beeln J nDeleteExa mple41'You can us`~hisd"who@p` he: RmDir" onlem0pty gOn Error Resume NextKill ":Users\Ron<\*.*j"!'e a!s in≣`&GoTo &0#_WA_F" B$& I! without remov|@srst likeK.#d cMyaX!S!A"Ys$ob d K.A%<< Cbe Right(, 1)"` c= Le"fLen) -@cޣ c,$ ! Fayn'$i!% t 92C ( Clea@r_All_!;s`_And_pcs_In"m_ru-f'3Plss a8sub(s4@Be sur!7atdb 7op>. /#ra4e/#r/#0,/#TP 5!!A4 !! ߯!W7!! tz$X!z! !1"JJ6x$Q"L y(4 > uK{Specpktop,StartMe nuP(EPrograms\u`FavoripFontMyD oc]NetHood, PAuRecen_'SendTo,`dT@dls2@ Func XGet$7(c_PTypeR)9S'DECLARE VARAIBLESs2WshSh>ee3Wt-X'INITIALIZyIAA6MWS.XS vct Ca`wUQY "DESKTOPLOCALN0;.j8s("PUpBLICzlL'STARTMENU Ũ,~ ^%o g ? PROGRAMS///'8_ r/'>RECENT#4&S>SENDTORC"U71aupSTARTUPPUBLIC" GetSpecialFolder = WshS hell. `s("AllUsersStartup")Case "TEMPLATES8Templates^MYDOCUMENT9`MyDocument1End S electh'O pen fin ExploreFr "e .Dex} & Path, vbNormcus  1Functi`on 'r0 * Ms() As StringDECLARE VARAIBLESEDimׁObjb IINITIAL$IZBIAGSetG= Crec("WScript.B@hC". _NGWithout code you can do this to ogthe< tQ@IB>RuXEnt%B%OK r uone o&fwoex aekSub Gic_1(MsgBox Environ("BUR$@Y  &2&A{fso, Tmp/oc5a,RThenw1 =t -!TDElseSeli CapbYW#9'T+r+dr+= ("r uLl}exe x~,As_RunDLL }&  @(W<> 0|(dO$m: OuBt Mem~/XRes6.0ou`ldn'tN! KiON22fo`.  WvmPjX q~ Bad Ft//+q-o-c(I Ftb!&% IIf(5"N;" '? @$LaM7x0PP__SRP_1bBTotalsj(__SRP_9: __SRP_8-np!9Yq(`0(`0,`0( np R 8 DP  LrU p*9+Ў1!Y!a--.).A.Y.q....(8HXhx   0 @  "Sh 8 P  B (PH `p X  xJ$`SEShellExecuteAxME(6 << <+Rp@ iT`doiViXt asiZ+ Yi\ appi^ʘfB˜jPC˜lC˜p0CP% tP`iv@x |`iv@x z` ""i~(i`` `ʘbBʘdB˜h( C˜nxC˜r CP(x0PPP(x0Ph 0N$*\Rffff*0C4e103448 Q ( 6( .` ( 2 8 ( 0 H `HL*h    0@P`p "  "  : <0 Np R 8 DP  L : B HP` h*     H h x: 2 0  P2` 2 "************ Code Start **********0 This code was originally written by Dev Ashish. ( It is not to be altered or distributed," except as part of an application.+ You are free to use it in any application,1 provided the copyright notice is left unchanged. Code Courtesy of Dev Ashishxam "'Exi***App Window Constants***]$$ Open Normale]$$Open Maximized]$$Open Minimized***Error Codes***]D ]D(]DP]D]Dx]D 0 E]8 v b$z'xo@P] v f$z'xMCoo4***************Usage Examples***********************6Open a folder: ?fHandleFile("C:\TEMP\",WIN_NORMAL)GCall Email app: ?fHandleFile("mailto:dash10@hotmail.com",WIN_NORMAL)KOpen URL: ?fHandleFile("http://home.att.net/~dashish", WIN_NORMAL)2Handle Unknown extensions (call Open With Dialog):> ?fHandleFile("C:\TEMP\TestThis",Win_Normal)soStart Access instance:E ?fHandleFile("I:\mdbs\CodeNStuff.mdb", Win_NORMAL)4****************************************************]H`Fi]xFirst try ShellExecute   ~   $R'  h ''d  jKTFTry the OpenWith dialog'rundll32.exe shell32.dll,OpenAs_RunDLL ~ b$' ' lKTF1Error: Out of Memory/Resources. Couldn't Execute!' nKTF)Error: File not found. Couldn't Execute!' pKTF(Error: Path not found. Couldn't Execute!' rKTF*Error: Bad File Format. Couldn't Execute!' SFnXkP   , $'z~iAttribute VB_Name = "File_Launch_Mod"  '* Code Start  "   B P  0@P`p   ( " @ P`h B pxX _m1#J@BEG%*=h8+3qkR2EB.ԼxkR2EB.ԼBEG%ME, SS S8L>"LLL"L <0<4<8<<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}p (%`%i i  ` %"4@`Z0p `8k4 `hX@h i  ,!hx  &i er,!hHk$$`Z P %i `00xx,!hx $: `8,!8hx (Wi 0@ x @ t ,!Php h,ix`J880Ph@p  <@` 8H`D`B@P @@ 8@0< i `Z`Z,!h k055m`@8  X0ph `xT @T 8 H@R @P p@N ` @H @ 8 @4 @H $ @ H h@ 4t`H p H H @ X H ` h `0 xp H p 0  @ 8 @ 4 @ 0 @, @  @( @ @ @   X @ X Ba@ ck@ nd@ jp@ ` 0A@0  @  r xr  JPGhv.@r hv(t @p 08D8 N*\R5*#2e$*\Rffff*;D4e104dd3*\R5*#2a*\R5*#28*\R5*#2e$*\Rffff*;E4e104dd3*\R5*#24$*\Rffff*;F4e104dd38 B@؁    "   B )  B@@H` ZU0 (8HXhx h  P"N h ` x   P      x 0 0CH " VR` (  o]0mX B@y let !wV' SELECT * from Customer WHERE [FundraiserID]=  %. B@]B+ C+ D+ A+ E+ F+ G+ H+ I+ J + K + L + M + 1 + 2+ 3+ 4+ AA+ BB+ '  TALs]p 1+ 4+ 3+ 2+  B@ !  0>! B@ m] A+ B+ C+ D+ E+ F+ G+ H+ I+ J + K + L + M + AA+ ' B@ee !e  e@e ee B@eem]PeBB+ ' B@eLe !e ee ee B@eem08m ! !'H]]p]]0  $  %! '  $  %! '  $  %! '  $  %! ' ! k  B@Pm0 !( B@'' ']]A+ B+ C+ `]D+ E+ F+ G+ H+ I+ J + K + L + M + 1 + 2+ 3+ 4+ AA+ BB+ '   $  %! 'x ]p ]  ']H ! k B@SE@]'    ! !  ! 'd 'k   '  SELECT * from Customer WHERE [FundraiserID]= ! %.TH TAttribute VB_Name = "Tot@als" Bast0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobaBlSpacFe dCreatablPredeclaIdCExposeTemplate Deriv%Cu@stomiz EDim rs1 As Recordset Public Property Get tunits()Lon0g "x(19 S BIntegerx(0)AB2C3D4E5F6G7H8I@.@J1(K1B L(M(1)2C)3m)4)AFC*B/FPGbQ0Ifr.CqCount > 0 ThenAZz.MoveFirsy1Whi@ EOFD For B To 1^8 J'+(Fields(x(B)).ValuENext BK-GWendCEnd If< XBPop]nX6aXcY?BE>#E>E> +%6543C,, 43o321tHCookieu%1 C?1? ?݀5"? ?1C%ߡ65%?D ?Dx2C aL _D_D_DCakD%C !g VW8?SsHMRlC pH?R?1]q3?/Q}NetPSfitPSingl  F .]* FOnly._Per_UXt _IncludP_C@Ynum_c // #`_valqcurrsTq!4c Sp= dbF.Openf("SELECT * from er " & _?"WHERE [FundraiserID]=Cfp_id)y = R30x(HRx(__P$R_t_# _C __b_V)K>HH'Tꚁ#/ ^T.ϚR*AFT. {pTECFte4X/ ,S- `:()&=,+ 1 ElYl4H5+ [PgP 2(OWEWSale_Price) - (* 8 Ea3@Cost@Sub _0t`W|s(BaLQ4CK1`KKK? ~ KKkK  dgP ..//1/I/a/y//!!؎q#!#@8#Y#  W    W  L`;`; `; `; `; `; `;`;`; `; `; `; `; `;`;`;`;`;`; qxTX4 plT X4 RX4 4kRZcNSlxi$4kZ`F8%HX4 H 04 D$"qx)H46$ ZdNg X4 ?/ xP8`H4$0   0   0   l0 8  @U'%' %'%*#48"X (l8#0*#,"X l=<240,pBP;P; P; P; P; P; P;P;P; P; P; P; P; P;P;P;P;P;P;JcspH8< pl8g < < 4kNkHD kJPF%<  0 DUpH)6 < sD kHsDnDnDMnDsDWnDsDkBnDpB JdwC"X "X $8"X l8nkBnsx/ X@h<P(40,hR<'@%'P%'`%*#x #t*#p"X l<=[842xtp)<8l "X ,Dh$ xtp<8(rU D( h((A h!(( h%(( h)(( h-*(A h1*( `5y(nFundraisers__SRP_f__SRP_e #customersVngly  f-![Sale].Value -6![Cost End4=!_Price; >#A%A-f@_idCLonNg+IDSub d_tZs(@l)D?gq= dbF.Opens("SELECT * from  " 8& _P"W@HERE [)=? n@(Am ?[bME( SS S8L>"LLLL <,P`:d%tX4 t 0` DP*sx)t`5P/ ,H$ t`PH>P`:d %tX4 t 0` DP*sx)t`5P/ ,H$ t`PH>P`:d%tX4 t 0` DP"qx)t`5P/ ,H$ t`PXR<'@%'P%'`%*#x #t*#p"X l<=[842xtp)<8DX$ xtp<88hrU D(h*(Ah!*(h%*(h)((`-y(n@XrU D(h((Ah!0(h%0(hp(D 1N*\R5*#2e$*\Rffff*;@4e104dd3$*\Rffff*;C4e104dd3*\R5*#2a*\R5*#28*\R5*#2e*\R5*#24$*\Rffff*;F4e104dd38 B (8HXhx(8H  X `"Sx   B (=P8 B @=`H B 8 B p0 B \>7?E?qQJA}@% 0H+u*=h8+3q#Hx#H% 0H+uME, SS S8L>""LLLL < p~J}@Bu@K?[b*=h8+3qa2A}|:xa2A}|:Bu@K?[bME( SS S8L>"LLLL <,<0<4<8<<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}0 (%`%@x ,!XhP+(i @t X,!xhHP+   `8k,i i  %"4@,!h Xi ,!hhP+$ i xXh@@p @` @P @@ @0< @8 @X(h  `xpt @pt @d @` @P XPXph `@xXx@t @t @d @`  (08@@P p X8h `xH t @t @d @` @P x x x t @d X @` @P X L @< @8 @( "@ (X8D0 N*\R5*#2e$*\Rffff*;E4e104dd3*\R5*#2a*\R5*#28*\R5*#2e*\R5*#24$*\Rffff*;F4e104dd38 B @wHh B >0( B> B> " pNRx x "!'mm "!' "! "! 'mXo] SELECT * from Fundraiser WHERE [ID]=  %.  "!'mձAttribute VB_Name = "Fundraisers" Bas0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse dCreatablPredeclaIdC@ExposeTemplateDerivCus tomiz EDim rs1 As Recordset Public Property Getfit_Per_Unit()ASi0<4<8<<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}xH;(%%  %,!h +i ``Z,!h +@01i F `Numbx`Z,!`hh +4Bi `@(`Z,!h0 +8\i ``Z,!h0p+P<ji `h$ki "4H@i 0,!&hhP P ~,!hl ()@x ,!J0hp+@ n,!>hP+p D ri  i i 80i p P,!BhP  !i  ,!@hP $%i Hi ,!h H,-i ,!(`hP XT@ t ,!$@hP H v,!, hP @`i ,!*hP Xi ,! hP \i ,!0 hP ` hi x,!. hP di ,!4` hP ( pi i  ,!2 hP li ,!80 hP xi i ,!6 hP H t,!( hP i i P,! hP @ |,! hP i ,!:h hP @p ,!p hP ,!<phP i @ ` @ P @@ i @(,!XhP L zi P`( 0 0 @Xh` ` P p ph 0 8 Ph @ < @8 @( @$ H8 h8h ``x@@PX (@V  @P 0@@ @< @, @ @ 0h  `x h@(X @P H (`hP(P0@V ( @P @@ @< @, @ @@ (( h  pX`xt" @0X x H P@V 0 )@@P @@ @< @, @ @ 0 hPh  `x @(X @@V (@P @@ @< @, H@ p@ X(hJ 5`Jx p  hPX`hpxIIIIJ J8JPJ  8@t @p h> `>hz h@t @d @` @P 8 h `x@Pt @p   X8x xH(@t @p @l pp xpXt @d (` @P   x pXt @d (` @P @!@!x!X! xh!pXt @d (` @P """" x"pXt @d (` @P $$H$($ x8$pXt @d (` @P x%x%%% x%pXt @d (` @P &&'& x'pXt @d (` @P H(H((`( xp(pXt @d (` @P )))) x)pXt @d (` @P ++P+0+ x@+pXt @d (` @P ,,,, x,pXt @d (` @P - .. x.pXt @d (` @P P/P//h/ xx/pXt @d (` @P 0000 x0pXt @d (` @P 2 2X282 xH2pXt @d (` @P 3333 x3pXt @d (` @P 44(55 x5pXt @d (` @P X6X66p6 x6pXt @d (` @P 7777 x7pXt @d (` @P (9(9`9@9 xP9pXt @d (` @P ::: x:pXt @d (` @P 'P    "S8 ` p Bx (8HX  h p"S   B   "S( P ` Bh)p B) B> B > B (>0@ B H>P` B h>p B > B > B > B > B >( B 0>8H B P>Xh B p>x B > B > B > B > B >( B 0>8H B P>Xh " LRI ]P]]A+ B+ C+ D+ E+ F+ G+ H+ I+ J + K + L + M + 1 + 2+ 3+ 4+ AA+ BB+ '   $  %! ' m]`]1+ 2+ 3+ 4+ '   $  %! ' m] ]HA+ B+ C+ D+ E+ F+ G+ H+ I+ J + K + L + M + '   $  %! ' m`]]AA+ BB+ '   $  %! ' m ! !'mp "F! B@o ! !'Jm0m ">!'>mXmm8m  "B!'B "@!'@ !@  !B' " !B  !@'P SELECT * from Customer WHERE [ID]=  %.T_ "$!'$@ "!'m`X "&!'&m@h "(!'(m ` "*!'*mmp "!'mP ",!',m0 ".!'.m "0!'0m "2!'2m "4!'4m` "6!'6m "8!'8mp0 "!'mP "!'m0( " !'mp ""!'m ":!':mh "<!'<mpAttribute VB_Name = "customers" " Bas0{FCFB3D2A-A0FA-1068-A738-08002B33 71B5} |GlobalSpacFalse dCreatablPredecl2aIdCExposeTemplateDerivCiz EDim rs1 As Recordset Public Property Get totalunits()Long C"x(19 S BIntegerx(0)AB2C3D4E5F6G7H8I@.J1(K1B Lm(M(1)2C)3)4)AFC*BFPGbQ0CFor B To 18X +.Fields(x(Bp)).V@y@A N ext BG EndFFirstÉ (4![]aLa?%  (]Fu|ll‡E Cjer' & " |& F?'Al_b#X%of-T}Pop~n-~ \~Hx~Hdj'dcjdCjc _3Yl_`H`_'F'Cookie`'@ce'_c'__`-"_\21%:12AOM/otToCako+X@os^c Q;^w G\W?Net0fitdIinglb Of* COnly._Pe8r_Ut xDue@ Sale_Pric0 PaidsBooleanakd0[pcASAAwB}q~" BWvC}CCWvD}DuDWvE}EuEWvF}FuFWvG}GuGWvH}HuHWvI}IuIWvJ}JuJWvK}KuKWvL}LuLWvM}MuMvOn$F: 1Twow] 2hre TA3Four 14AMMNqRRBN'N?NSub P_0tings(fund_id As Long) Set rs1 = dbF.OpenRecordset("SELECT * from Customer " & _|"WHERE [ID]=2xCOnly.f_t![Fraiser7.Value End Sub __SRP_17__SRP_16&^Fundraisers2,u__SRP_a      gWWW_____ `; `;)0(h-0(Ah1((h5((h9((h=*(AhA*(hE#(hI(( hM((IhQ((hU((hY((  h]((I ha(( he(( hi((  hm((Ihq((hu((hy(( h}((Ih((h((h(( h((Ih((`y(n `; qxZ cV.rU  q a*Ў1!Y!i"!!A"q#!#@8#Y#  W    wP`:d%tX4 t 0      !"#$%&()*+,-./0123456789;<=?ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstvwxyz{|}~` DP(8:<%LX4 L 08 D(*sx)t`L86P(/ d$ (t`L8P(H>P`:d%tX4 t 0` DP*sx)t`5P/ ,H$ t`P0   0 H  XR<'@%'P%'`%*#x #t*#p"X l<=[842xtp)<8DX$ xtp<88rU D( h*(A h!*( h%*( h)(( `-y(n,!phrU~| rU  *a*Ў1!Y!-!!--.).A.Y.q......//1/I/a/y//?/y?q#?!#@8#Y# WWW_____ `; `; `; `;`;`;`;`;`; `; `; `; `; `;`;`;`;`;`; qxZcVSlxi,P`:d%tX4 t 0` DPVpz)t`5P/ ,H$ t`P0   0 @  0 X  0 h  0 `  0   0   0   0   0   0   0 `   0   0 0   0   0 (   0 p   0   0 h   R<'@%'P%'`%*#x #t*#p"X l<=[842xtp)<8I(8:`%<X4 < 08 D("Y$"X , )<85(X$ $xtp<8(__SRP_bReportingD__SRP_13__SRP_12*" ; ;(;0P 4X B ::@ ::: :@:: ::@: :::@ :: "   (@H Pp.  @Hhp     @ H h 4p  B    : :X : : : :X : : : :X : : : :X : :  0 B  8@HPX B`   *  *   P p 6  D  8 (H p * 8 2  @ Pp x  "    O+(2= 0*N, Hx "  7!  "JVxME< <<<<<< <$<(<,l  . J@4aW@at*=h8+3qvTDliK-xvTDliK-4aW@atME( SS S8L>"LLLL <,<0<4<8<<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}X (%%ro %,!h+i ,!h@P+ i ,!HhP P$ i  `8k,i "4H@@px 0,!ph (i PHp@t <@@p @` @P @@ @(< @8 8P 8h `xt @ht @d @` @P PPhh  `8xxPp8t  @t cbo4@d @` p@P CON" (08@HPX`hpx@L @< @8 @(( @  P `  x  (P P X0 8 @ H PpD0 N*\R5*#2e$*\Rffff*;C4e104dd3*\R5*#2a*\R5*#28*\R5*#2e*\R5*#24$*\Rffff*;F4e104dd38 Bw0 B8>@P B X>`p B  " xNR ]P "! "! 'mH "!'m( "!'mp SELECT * from Fundraiser WHERE [ID]=  %.o( H "!'mձAttribute VB_Name = "Fundraisers2" Bas0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobalSpacFalse dCreatablPredeclaIdCExposeTemplate DerivCu@stomiz EDim rs1 As Recordset Public Property Getfit_Per_Unit()Singly>  f-![Sale].Va lue -6![Cost End4=!_Price; P#_Aj,f_idCLong N HIDSub @c_tY\s(j)S@fAp= dbF.Openr("SELECT * from "p & _A%"WHERE [)~= m@(k <0<4<8<<<@ z At% ` 8998 i&Xi(xol_Ni*i,( i.%Ji0 i2 :i4 8(i6X:i8 x(i: :i<(`> & @ %+` 099qi`e2WW` % otep%  `J i  X`J`&z%" %H tx`nP p%X `XP `J`L`~J`xH`z8F@\ e` ZԾe`X e`Vte`TLepx`|D``0`<``x8`4`0,`* -`B`(`&X X ` xX  X X l h @X @H @8 X `( P@ X 0 @ @ @ @ @  - /X p @ @ @ @ @ ( 0 8 @ H ` @ @ x  @| @l @\ @L @< @, @* @$ `(  @  6( @ (8 P ` (( @   (H 8`p     0 Hh X 5 57`pr@l`XHZ\`@l@p @` \ h@HPX@`@`0XX @H XpD `@4 HX@0 0@, @(  (08@Hh$ @  @ @ @ @  rpvz|~( h h`x hHt @d x(` @\ @L (H 8 @( @ ( @ @ @ @ XPX HX @h (d @` @P (L < @, @ @ @ @ @ ( @   X @ N$*\Rffff*;J4e104deb= "   ( 0SPp.Y"9"9 @8A@`Ch ;   0(8@HPXp22233899H:BBGGF `& 3%  ?8 PD`D:(::(:H B  Ah A A A6\'Fv0MtMxMt )M<uh* &"T(  Z'\<u)<u)<x *h &@V\p<u0<u1 Lb@<uP1<u1 0@b<u1J`N@\Fb<uH+<u+ R >b0(W 2(WX,6b(3>bp(WH26cx3>b<u,J3>b<u,J4>b0<u-JP4>bp<u@-J4>b<u-J4>b<u-JH5>b0<u.J5>bp<u@.J5>b<u.J86>b<u.J6>b0<u/J6>bp<u@/J(7>b<u/Jx7>b<u/J7>b0<u0J8>bp<u@0Jh8>b<u0J8 Bbp@b@b0 XhD<u+<u,   3x:`Xh':h@n@p@pH@pp @p @p @p0!@pp!@p!@p!@p0"@pp"@p"@p"@p0#@pp#@p#@p#@p0$@pp$@p$J%$ >bX%$ <b%$ vD P3 ( ) Xp:2F\X>L\N N: `3P\8F N0; &P? Xx?2`:@9 29 Mp9 (9H919 *:9 *(:9`9 P:2B9  0G = @>>1= *=h< *=p<> IH=> >=  ?=2Bh= 8=;p3 2;1; *<0< *8<P<X< I<; ; > 2B<; 4L<x< 2 @&P?   B@18@*X@p@*x@@@8H?@1A* A8A*@AXA`ApA vE 2;? MB 0?  ; FA1A*A@?*BH?(B2BBA18B*XBpB*xBBBA  v@E @D(C0C MHC hC xC GC1C*CC*CCC2BD(L1@L*`LxL*LLL;L8HL F J6TF6[J<Z8KG GFHGI6TF@[I<ZxKT`I GJ6TG (0J<ZK H (HF0H "0I(L6TH<[XJ<ZJ HFH*5& 0( *@( *p( 0% 4( *0& @& P&  & "`& p&7&        NDECLARE VARIABLES]]INITIALIZE VARIABLES < D$B%F.@ ($H'> ( &: * & @%JB@L 6 & > @%N(P9t , & > @%N(8t 0t & > @%N!R(Td & > @%N!R(Tk . & > @%N!R(V 2&t Z & > @%N(Xd8 \ & > @%N(Xk 4)t Z & > @%N(^d ` & > @%N(^k-Cursheet.Cells(drow, Col_Num).WrapText = True :$@ ( &: * & @%J!b(dk 8 l h ( &: * & @%J%f(j l n ( &: * & @%J%f(j& r p ( &: * & @%J%f(j v p ( &: * & @%J%f(t  $S   !"#%&'(T*,-./01<3456789:;)=>?@ABCDEFGHIJKLMNOPQR\UVWX]Z[}i`abcdefghYsklmnopqr^tuvwxyz{|~ z p ( &: * & @%J%f(xyLTerm r | ( &: * & @%J%f(jWW v | ( &: * & @%J%f(tWW z | ( &: * & @%J%f(xame2WW r ~ ( &: * & @%J%f(j5W v ~ ( &: * & @%J%f(t z ~ ( &: * & @%J%f(xf r  ( &: * & @%J%f(jx v  ( &: * & @%J%f(tdSaveF z  ( &: * & @%J%f(x!Labe l  ( &: * & @%J%f(jame4WW l  ( &: * & @%J%f(jk & '&oDECLARE VARIABLES]]INITIALIZE VARIABLES < D$B%F.@ ($H'> ( &: * & @%JB@L 6 & > @%N(P , & > @%N( 0 & > @%N!R(Td & > @%N!R(Tk . & > @%N!R(V & > @%N!R(x 2 Z & > @%N(Xd \ & > @%N(Xk 4 Z & > @%N(^d ` & > @%N(^k-Cursheet.Cells(drow, Col_Num).WrapText = True :0$@ ( &: * & @%J!b(dk 8 l h ( &: * & @%J%f(j l n ( &: * & @%J%f(j r p ( &: * & @%J%f(j v p ( &: * & @%J%f(t z p ( &: * & @%J%f(x r | ( &: * & @%J%f(j v | ( &: * & @%J%f(t z | ( &: * & @%J%f(x r ~ ( &: * & @%J%f(j v ~ ( &: * & @%J%f(t z ~ ( &: * & @%J%f(x r  ( &: * & @%J%f(j v  ( &: * & @%J%f(t z  ( &: * & @%J%f(x l  ( &: * & @%J%f(j l  ( &: * & @%J%f(jk & '&o]P]h]]< Ensure function recalculates each time worksheet is updated B@ $ Check that bottom cell is not empty  7N$ 'zk$ Estimate position of last used cell   7N%!' 0 Check cell as it may be empty. If so, return 0. 7N$'z kk5  7N  7N7J$.Xq M;"! Check for hidden non-empty cells  !%'V