ࡱ> *e  !"#$%&'()5,-./012346bc89:H<=>?@ABCDEFG7IJKLMNOPQRSTUVWXYZ[\]^_`dgqijklmnoparst}vwxyz{|f~Root Entry FЇ[p@p@+1WorkbookM_VBA_PROJECT_CUR"@`@VBA l@@  !#$%&'()*,-/0123456789:;<=>?@ABCDEFGHIJKLMNPQRSTUWYZ[\]^_`bcdefghijklnopqrstuvwxyz{|}~~n^hO`>2g& $~ Пbvy<EJ .,NH)yUI|p7,3)lFT l~ bvW g: WDp44Fz;cUZI6, e7]sVeDm"s"~ JZ|gv #zp lZ؍׾4KwjT=xcvGVmG΃]ϡY2x)"5X/ʍnޤp{@^أR볌P9М πM :4A﫝YA>B>Y݆=v.o;ebӽ86l$mwOg;FP"wtWEZs`lJtF=s on-R} 4ošT @/6@f>,Tvċ#~I1BIgCߩ?6`B\pF\NHYC Ba = !h m!j{[^D=5Nwx^rn<ֱ)e1ۜϣ40$􇎿=q}Q 1`JF3{ =m@` .1AfGd$Q>n_1V^S-'b,cSwC01iN'&2ުNc1a5HRX 8wJΖ[077U %wND.mfPĆ!v]lNFP)Hc"=hk` xeE)7k3GEJ>''V<>/ V5iQ~ldUEJ!eSݞl:8ZJ75϶SwS!x x7(f/8-e { @~mBu.x1|NpdOf/@)3WZ,c8[4kc*L?U:ɿ7  OgŐD%Z )W4WzW u7+DBWwH16V\3vkxӗxKc b#FZbZwNY wr+Ƞ(miHOW`+v lic_33V[—p<6]S\>/n*ø梯OaAFN]WK8rfӭW6 @в TO` zmQ&ּ'orHlfAy'bֽ'LT3!fV=ߪ#= b15 )vjAn :|H[9wϩ~oeBuE: Fo=ܟWSUV )ӹ`(ai+\r.G .5˟℠G:Hl&!%~qQ(]PʵS[UbvKgʀ*3rCN?%t]cOߜ]M* ~5X +4SA|M!\Țŵ';rݵ9o1xѯ19)O7L8":=w A읂j LʩFcSLJ|8z%T֟E͏'Ye @bCQFj=KQؒWP3D:v&$z=lWH'6; V>3R?VFos~7U1AzT[چaA ?vrn^GOuE+2Fн@R 6;9V!}cZXZ* @ ;ﮩ unPq|ANsg <3-6œ{PhHB ,7e,95 b|HM$鋕U{?.*K{ $J)J|6ޢu[1Ed/V}Lњ4l &!߫l%{Fm,ѐoCOb8UԦHa{qă wGyYubh$=%0k\| |SXX2e##:"}z.w$(ޑ:0=NdCv+cq`VU]"[)/tlr U_P\ݿx*BɔshHZ+EB 8үkJ9I C{L׋C>~w-㡫S*1;epۙpwXt-S ʂ' qܠgyOc+?_Lc{۬T'CTE~.!KiSATnK5VrRtbP=OJ0MT]TyFPF0C/DrF8gp[ݴ ƥ vmA3IM6m\ſ*v#dƖma)z*j WB/eW\%Xg)}iZI>`jJ9uH(1>.ьIj~%8Wv@TmP Мn]f\ѹnwz]A6O^[ړOɓ۵^nx\Fd]'A`~!mf<t\?_\"#L=4OiG5m3?XZmufEm Ѷ`/N3#@,ϭ\~A-F!ūBQxj/^H'<'_#{א".*ۤ $Nj)tr*WG07lh1~n¬bJóFuwW~4~r6>X^[ ocr[M_w#hX0eW&z-X8 uPSF"O.שUZٟˮ ?? ),Հy4Eps_ܨd*nCr][5XY-VQ,=rKq1qλS:%NՔPmu^;[<ۢ# ~펈DpTʳ7dR׫>"VHP}vI-EVaz;ټ+>0+r/˙d3aI4 @W oyaCdl %^i?CC ʌIv;6hzxœ:,nr>!Eet5L sԫ;.[ClJ&8D58wnAZcz#|uM0wJ6.7ԮtaGDS* ?~r#ҊZyRt{ m Ӱ D=ŨJ l]HnQ<t{M3OKJ>9s` :%s[Ǝ)-F ЊeGn*=ڵ˴AOV?k=b . 󦳛%H W%JD'T#֏S41o6qC}|z 8$8af:)ݽ0 =򓣧JAwPzDj$ T]0GxC*wA' ٫hIb>Kdz\pJ%mGUuRYt$GRQ;, Fvڢ<5QQvP,:0:',)Jx+HxJI &.Yωű/&|jX!Fg Q| @ -PA]@b d W XƇm9_*:+2] %́k'CW6s&HI{'C 8(kE0O)^Y0vLMiJ1*69i6L+-KMcѧeQ@shמҰl Y~H Ӽ!nBY&@i)ȥ^g ! \&drl2poR;h!}gE{M|[3^?"2Qd]mp O9 θc4n?ތr4Z[mD֠+W@%,J^O$d[14BS΢G!W* >dk)~-ՙ礵I/Kx*I!^d0emmMh u;L+a$J"䖉ESv1RZ_s2ikXR.c.0fZ"!~,UIʳyvhG600K) “X~d8~`.LhީԏX+ Kh|ZrMq3 _'Δ2acRƨ Jkʞ7U0ّ3MŢR,zXs6YCw>7Dug X4H.m-n|it15񍅉"Y*YM3kն)QB~f ԆŪ! B~{(//jW(cctVnxbF|0k}+78򨸗u%[M2rIf'n|^~F\0[9D}׶D4g40N7vi3\f   9mL .j>| A91&8eFI|)0 ?MIYrj)̇_';>| eio%YgCDeDBOӒy0C򡣣Uz0MB]"ඏñ ?N;qvz1o"a(&,}.sKK/)7qLqDSy>^ڭ]}c$z0r d ``2*)EIBcvE"OB DFoeϧ "U ՔcY%U} Z~0v} A16s} 5* mq} <!œX"} kvxܷrʊ} ,gC} -_2T{} jMj tx} :g18@} D *2} ã A͌w} Z 02֡*8} $MJ&'} ݏа!g} >G̎T} B v}0} m/>6M<} ?:Ǹ} #>tJ} O@`X} 1 Tj̪prt>3f}NA1}f Sٽ;#5< 4(ya%.e7?d$ygƘ1 0\V!9RN0n T'r^^.!ς rTjaD/z'ͩyyY"Usw5Vp58xDIx4#C~=D2[*ES?JXUXsƂ \lL i !:4A؆bYއD /ZH] ?INd/tZ׷5 I\x!"ã/r&Z!i} e$*x4"2IO vC'hlŴӉlDM|cTw~Nk`ǰ2yhL| Ba>msf*x #s@* <^GF֝q G"m d <RF9hwj]/"C @\`~/, h :#'&w%ju?< Y]"j~ ?D"@ }.U`d󄔾 yTPJyEh s/vU?ylgs2!\S٭$ؾj[\ODy ?yOZNFvA$B<2MT C~ˍvD3p5 (iLy<{+=> `Q>O-_rO}~ճJ P\UW<ǁpWZ YGuTWtA.C'0 +~gAk4DL&X]' 5Qw,6%QŮ>q=#EAQ^)06AUE91 Zv!Df~cr!3M*B^jQc>gi r)PM`GʓUMKC V:]Q]G͙%_јƫ߲,%J8 k5o1?CE I*k̶X4;C3d3*›Љ 'fp\y)l'XXφd&"ZB :NIwE 2$X@2qڳ`-״Mc 3EL6V^"L?6>a? FL#iDw$!@ˍ߅Z%|;Z+r3s {GU W Icվ!6J=61 g q}K9ԩӾ"r[{'t] ꂤ%[7<9!@vEpf(#LxPFi8o"lIHx9l\bOo㏍cEw/bbi߱q! ޲Zh47EgaUU:KEx_ u{6Ln%G9 *<в uE3 \92llUy!2K?܎TK (:ڜ1S ӎ l@?iDh x{w2v{оS) f/"\yÀj- CC-F%΅i[$:sFe &,A (F9;{zD'J<# 8=^OIf,| s0) /HeH"gj,KQS s!+\`)`)YlE:)x׎רuP5qm'Cr ]*t&Ms6VDVJHC@ba 3V F#"[Nb=NQ -ב2 g}$ǡZc׫ 8Ǖ|!Ѥ@d ^Cվ4i^mǑ|k)9m/=} y)tkEHp@رľ22ÕXDo>.ɁooB@kl.v6q "cJi4Z (+RQX sOcg^lTV緓ҢiH݄, lǿ9N_ңڇ8  eD<] ,$t1( JS vtq( @'jDcE"zH.^d趜|)C>+cZ#Y # I#e Ѻz'^G$m[<Zы G w[8I` ?[G t=cƃZ"tT0\#O+%eFو𚣘,؅*+-HZc}HdW)݄ iD} ;&i P6KL陌g h h]"Mȷ3t}w mfx!1 b<Xb(k0,QEGmHQ RCSj#ՊpuU_Qjx />FLᕾ"#'?AǝL5L0#¿9jp% |Ov</"?gth/$g #rQg](8Vq4oLA L͉mrg"M&~ FIHnyGTYcmX)VܘX])~x[@ ʍ w{"5}Ϥ'EH;RHOZӨ Emn"O]Bra|[a!Qpe<xQǷU'K2wfp/ub`d@;O #^\k\k'~9嗤f] | A!1i`dT"|ۮj5 ځV=Au}K2=ireE+"Ù3Oo -xofNWgLUJe"/k ț"JBeQJ9+e׀y ? X$U8zvj[F=sy =H,PXd]TnY޼\0<J}n\ xB\r{ G4%EͤBtiF NR\gkjCE R H ~ٟB0\ IʷM! G-bpD[Eoz 04cNԁz:/.ԙMb3ksj俗VkKܩ^̱"@͹/jD7.3B;~qHb{gL˽gXM/3qA ='m 3; Oɾ(kQqFI}cv9p6h-weYuF lgQ Q^ 9* > ךUdH^1 pCLP >}ˤ'Js>a[SV-$Ș1 .2ș5:G6=` I_{BC6l nW ~E|z !f5MU?KTyBY <+LAK!Ę PR. MU ^%IkS (/Qi 3qD] -]i .IS 9-"9 (DJw0=?"$JһY+2Nԓ#kɑ ;ČjToПH Us-#<c8^'~^) i Dm"&n-$9YDXNLXI#AN 6 '}/)Ә!EVQw*Y링V*Ud YE=ߺ,|49'qt"͹Z#^].Wi:)d` 6ݯj{N c2C=nlzx7EL 1㵩T .XBiR.pTILuѮ| 7 l Ձ.oQhNYl-o]W 6w@ j־Gn0C ugE#7 cK OCN ]>` -S3X4v d?~+;ih1)oEZ9ݚIkұ~t&<oi 85W zwM9f 6q(@ 'yzbYy { wO=ް6u P<( _}a ?()OQ- [𚤳! {X >{25.M ?\w aH۝5͔×,zkn7$VQYZZ34!2 h""Lʒ `G X&RCGb̾|KoK3^d`$&. Ҍh*Y!y`Y WF5lNCUw !44nzoGϦfԳ3_KzjJXcIns^YcC Nn[ 6Şo X\KS?`J. ,FW^> vz \ /. {`Fbھhu)XߝL5Kl١<ȋ15|l}U(?uA[zQ Clo$f")|Bꫠ$c }tVS3`\ wjk _ y|tC t[rhvxlGi^pq+$VRgtځ^nˢNJARx.Bs,|A c~9"%LO|hr|/M:PT~ʋ v*0u^- i 1v TuVjWkXZ:`X#TC,CT1r? gLC&3 t_[&jF4QX Eb#/|ѾJ-\n֎)d ŢS.) 6g+#X:|^pbcd:uJF*٣snM oI U9wӠgڬL E7>kY/٣7eP 45q6x E޾ nhh)I K|ס8: Л`&pX Ә ^dz ̨Sȅx1 2+oOVjcbst~n.uBf&3 FNႴX.2OVI ŠH[uėf [@F- d c1543dRh&} A2K37 ^ w6p ފe,!M VZy<7I&X~f,w* ѱ$ *RuwS Mwamk\tS|YX.Ļz YQwb}V~N¹a* pf:c UB/7CŚ i8*ͨ1d`ϖ|4 н6ԋom.'%kO5`Yqx ۺ£:8)ES>Tn=fC`,I0YP`T׭dSWDW|T\40^kY;c ]# u߾A3 [k= ~}@"2!NˊT8JH ;l2I޼.W0\Պ&i)HBqE#K|x: gE HKM i5X *߉ۙ<^U^džjh`\ {NȂIʼnT ŒoTӻ 79G bb59NpZe]ç"`roo8Gefm˝%(r ²±.o*B,UC4τ ˜4PPwBfQ9y l"֖M z2 T [ }d`z Nwb1g^V.igVㅺ` mՓG%P 6&"=2ֿ=dްKM~/7A0oxuQE8KȚ/kE>2_Ҿ vM BCcQ]22eoH?1qul'qxL4=k.LtMp*<?+ Vӻ-~j(gaefoˊF;?64>kMx2RB ”䆐@ d!(<|!K\j 8VP`0^>wxA 3R-u]=Zs9<٧h{bb._5#!@fWbϲ$H\ىP; PKTQaTx2HHL6׶fl +)%U?[lڱcO΀wXS99v9Dy"B냏 hLHlnE+g"p&YL*?$I?y?.Yތ;3@.eq+F;XZ$yR3X!P9&ݸ,+TP+Pz?DBBsUlPloRZV=-iD_1:@2DuR=R z p8\Y4鞑g5(Nm3t1I+c4WWFq#i-qrS r)G;2O59 ^isЮG/Y2ir/`Lzș8n`re|sY1ݴX2sgmZlHEPӎ"a~]vOﱁ-WrJ4ʼf!Zu pR% dm6-}+}Z0~(lnܓ|)!n7E70yr. WQ5sabjXޯ]dc,3@ϷnHzk|n+*.<H߈gWnYـ,Z[avo}1uixM:LH`R)CZpn}^{Wd҈ fB]rkB;GBeF8!-&ĉ[ !1QKBvZ|#Y(xE 9#J`b]R؅hi?H1kHJb ʚ+qʑJD0Pz Z+A@H_̀}UTQkKl4T rδIe&a C >D d+''webodu1W[, {0w雬{{RWbwbp:hz{ OE~t\/I.mB 0vѹH4KM> Ǥ/]a>FKtGCjT Ksȣ;&x9`^#.*$V ry/"\qJſ* hDWlj$&\h$؃~訞 $@] bkBJACM__SRP_2 " __SRP_3+shtBJAC.<|8knin#<T&3L*)DOF@/MSO١x@/MSO١T&3L*)DOMEPSLSS6" <<<N0{00020819-0000-0000-C000-000000000046} ``|k@i   `@|k%` %8 %"$@H`@oEm6$*\Rffff*043bd04e17$*\Rffff*053bd04e174 "   ( "08@HX A@A@kXoP`A@"A@$o0(<Attribute VB_Name = "bkB@JAC" Bast0{000@20819- 0C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2P Sub Workbook_Be@foreCl8(Cancel As Boolean) If Not Then M^ CrBjacTsEnd 8 @Open(40Load !Ob0ject*%rU 09!qa)Q4ya `` IWP      $ D  $ 44PrU @(`#$A` n@Vdknon#<ÛŔL ǶTw FڷiLEIf@ xڷiLEIf@ ÛŔL ǶTwME PSLSS16" <<,N0{00020820-0000-0000-C000-000000000046}  (`dk@)* ` %h%%&% *x %.%@t @d hh@ oEm6*\R1*#175$*\Rffff*063bd04e17$*\Rffff*053bd04e174  0 .8 h"  px(* This enables feedback to BJAC object when( user makes changes for input variables. .G|j * .B@0o`XzAttribute VB_Name = "shtBJAC" Basx0{00020820- C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2' ' This en s feedback to  object whenuser makes@ changfor input vari#. PGK Sub Worksh eet_C(ByVal Target As E@xcel.R))@ If=App Is No thingUenyit)N.S/. End rU __SRP_6 O__SRP_7 VxmodBJAC;R__SRP_4 h@y4A ` |D l x vc(lxtt @"Xlt=xtD(xt4XrU @,`n4*#34*\R4*#2d*\R1*#b3*\R0*#14*\R1*#cd*\R1*#cd*\R1*#66*\R0*#f*\R0*#13*\R0*#19*\R4*#46*\R0*#e*\R0*#1*\R0*#2*\R1*#c4*\R1*#b3*\R4*#50*\R4*#4ea > @ 4H 6  @ * H 8P "& 8 @ `"hp    "      "(08)H*1X   "     "( 0  H..h  "     2 P ` hpx  .&      "    (.Hx  &   *(8@ H P X p"x   & " *H P 0X " ,FBknmnxME8L:8L>0B( (  > PLLLL *LLPLLLLLL<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< (. @< @Hetran%%8<@4%@xl 98 A% D`|k H(`  L`\k &`Nx for V`  0 $`8 Fk!!: f@` [ `h\k t j`  }`N ZP`Tkin `pz x ` +bx `h o 77 ~ t % p%`n`hG|`do ge `p% "X `k }} xbjec% t% p% 0if t% P%  `Plk Y4PH6 @8(`@A@P(x@(Xpp o2X8( H@h |j@X @H C@8 var@( @ @ X@`%x( p`8%X@ `8%" `8%8 ,hPH 0 `8%h  6x ` `8% H @ `8% x K `8% ` `8%( i `8% r8  P .6\4bPZ@l @ \ @L @H @F @X(0 X  ` `bz 0  P.4@p \ @X @T @ D @ 4 @$ @  @  @ @H  @x  @ @  @  @  @  @  @ @  @8 @P @h @ @ @ 8hP8<@t @p @n @(l @\ @X @@PV h(@T xPPphHx0.PTnsvere@`t m@p 5@` B@\ nvH.S Lettr 8.V@l @\ 8@<@l  X8oEm6*\R4*#52*\R4*#4e*\R4*#92$*\Rffff*053bd04e17*\R4*#75*\R4*#74*\R1*#22a*\R4*#51*\R4*#30*\R1*#229*\R1*#c4*\R4*#4d*\R4*#4f*\R4*#50*\R4*#51*\R3 3,3  0 8 @ H h " p x            N Rp  B 2    ( 0 8 @ $H  @X "      $ *  >( h x 4$   4. *  H " X  (,       (0 8 *@ p"x      .S $ "A0  X ` x  A    D@ ` h   A   ( 08 @AX x    A    (@ HP XAp          DK  h x  A     A0 P Xp x  A    (08 @ *H x"     8 modBJAC.BAS : implementation of the BJAC App Automation u- This is a part of the AspenTech B-JAC Demos./ Copyright (C) 1970-1998 Aspen Technology, Inc. All rights reserved.9 This source code is only intended as a supplement to the# ApspenTech B-JAC Automation Demos.]DHetran. This module is only for Hetran]@& the Bjac object] & the Bjac App object]@& BJAC menus]@(& BJAC toolbar]@& BJAC Show or hide menu Refresh current sheet .G|j .B@Foh Run the application .G|j .B@Jo Delete a B-JAC field(]h .G|j P!R.N N$TRangeG N .B@Ljop Release any Bjac objects Show Window @(XA@Z...6o Get BJAC objects .G|j try to get BJAC object 6GBJACWIN.BJACApp$\.6j 6G^j try to get BJAC App object 4 6%`.. ..6|k, check to see if the document can be updated$b...6^k( send this object to the BJAC App object P .B@dA@Z^0o( Create a BJAC App object .G|j try to get BJAC object 6GBJACWIN.BJACApp$\.6j 6G^j try to create a new App object 4 6%h.. ..6^k# send this object to the App object P .B@dA@Z^o Release objects@ .G|j .B@dA@VoP Convert to BJAC label variables] .G|j P!R.N N$TRangeG N .B@ljo* Enable or disable B-JAC menus and toolbar]8 p 8!r!t n p 8%r(v  n 8%r(v p <!r!t n p <%r(vo Show or hide B-JAC windowP .G|j @5X Show Window Hide Window9X 6B@zd( Show Window9X 6B@|kqoG This checks the current running file against the previous file to seeK if they are the same. If not this will prompt a message box to warn user.+ add file name to the document's properties]]]](]@]X P!.9 Check to see if this is a template. If yes we should not add file signature inside. ! 'bz k Get current running file name .!!$'7 Try to get previous file name by using custom property !.~ AppFileName$~. ! No such property then add one B@ AppFileName l  ~B@d" Already has one then check to see !'  ' If not the sameA@ "(The Excel has detected that the running 4 is using 2different file than the one in the Excel document.   File in  4:    File in Excel:    *Do you still want to update this document? $'    (k d 'kk  'bd'bki# Load Aspen B-JAC tool bar and menux.8.<.@ Add menu]]] l AspenBjac !%. G|j Create BJAC menu !. l !r%.  AspenBjac9 Aspen B-JAC9Xqh Add New menu l !r%. New 49X 9CreateAppObject9F9q Add Show/Hide menu l !r%.@ @ Show Window9X 9ShowOrHideBjacWindow9G99vq@ Add run menu l !r%. Run9X 9RunApp999vq  Add refresh menu l !r%. Refresh9X 9 RefreshSheet999vq8  Add refresh menu l !r%.  Delete Field9X 9 DeleteField9f99vq  Add Convert menu l !r%. Convert9X 9ConvertToLabel9G99vq .8 Create BJAC toolbar]]8 Aspen B-JAC  P!%. ( .< Add run tool button l !r%. RunApp99 Run B-JAC99vq  Add refresh tool button l !r%.  RefreshSheet99 Refresh B-JAC99vq`  Add refresh tool button l !r%.  DeleteField9f9Delete B-JAC Field99vq o $ Delete Aspen B-JAC toolbar and menuX 8G|j.@ 8B@ <B@.8.<o( LAttribute VB_Name = "modBJAC" ' ,.BAS : implementation of the X App Autom4tzThis a part^AspenT@ech B-g @Demos./Copyright (C) 1970-1998 1 2nology , Inc1All 1s res`erved{source codeonly intended as a subpi togAp QlV OpExplicit PrivaConst@ sBjacs$ SngHetran" L' ulOfor (obj& Object'7 EubK@~ ABp 1mnuECommandBarPop4up'~us>tbar * 0tool G bt`nShow7GButt)BG\hisAH'AlRefh curr shee@dPASub  S() IfHIs NothihThen Exit A @EG.Excel End)B unaaic3GunqunDeleaDfield"HFDimA< Se xbj@X@KB.Sc` Type(&)]Range" ]*)p) ase any BIZL :leA[sI.CaCtBGWindow EnableMenus FalseD AB=DG $TLoadl ?P` !!QLtry!gk b= Cre #&("!WIN."cr GoTocc *D.%(eq| 39u!sIfAAcheck!&se`#docut can be upd"g "1U"File()bW*@ax &s&A  @ntb`Eq!ZTruZT@#@5:aA6 ###A`p2|6sD#+OTub+lt&@C+AC +o\]+s5cB1nePhЌv'`Ad .<,bj81,fO"diO" D!hO[O!qn! MRXWClos0TCW `tpp: ?<q # >+onveФR+label vari]? ToLq _pb,( _p_p_p0q Cel^l ?3= `dis!`ƔA;09n(NewValueBXeanB<IAIQ`ger FIY2 ^$. trolsunCAO(I). d%!Nex2b1ot Y1u]%sw҂7WQOrH a*#0ߤuWith 2gg I 7! . E/#C%tq )&' k"vsүrunnft againamprevio@'0<`yN iyy aresame.n@!8s wiprompt`Zmessage box!swar8n uaFunҩ }As 40A add nG@xE's @pI GieE !3cPropsq3D?p/ty1qrtn!7QswESCrntqbook1WorkQKqOXrr=R esЏ6xt 0Set book = Application.ActiveWorkp' Check to see if this a template. If yes we should not ' add fil,ignaturAnside.]5h.F!@FormatxlTV Then' Updg'!!TrueEx@it Funoq)End}Gcurrent runningQFnam s~Crnt,UCas e(obj .ATVServic*eON),Tr yg/previous, by us5custom propertycPsd~CDocumS ies("MWG"HErr.Number <> 0 ' NuchBodeneonEQClear  .Add :=, LinkT oCont+:=False, Type:=msoED0yStrA, Valu@[E@)' Already has @*-c+Do-.EE{'A sxC BeDeprtn_MsgBox("@@ Excel&detected@the" & sBjacln"̃A_ ?"`diffe«Bthan@eB@idċ.vbC8rLfS" b% : "`F$& g  Do you still wauub~`?",Yesstdol@e f%\*\G{00020430-C 0046}#2.0#0#D:\WINNT\System32\STDOLE@2.TLB# Automation^MSForms>SFErms3DD452EE1-E08F-@101A-8-02608C4DP0BB4DCDDOWSEFM20.DLL#Microsoft : ] Object Library/;D1t00}#0#0 j 1DB2592E-AF7B-4571-962A-EC14E8F43AC9E.c:\@Np\VBE\StylepmsoButtonCaptionOnActionFaceIdimsoButtonIconAndCaption1l cbToolbar,tbButton:Position msoBarTopyMenuBar߫Visible TooltipTextb?Deletex BeforeClose~; _B_var_UCaseaItemz WorksheetChangel' 36 a  20.DLL#Microsoft ForE.exd -.E .`M A{Offic{Oxfic{z p*2DF8D04C -5BFAAYB-BDE5;AAz42*F:(\MSO97LY 8.0Y"¹knRbkAGbkBJAPCH2NUHB1 B,in"B+BshtshÇn2¨ OMoQPmodm@]d? CDmn!hb.E .`M *\G{2DF8DK*mrU~~~~~~~~~~~~~~~~~rU~|  :i ii A I q  i 1y9a Q)Qa  Ii i 1T$c _8$$ 0  pc)p t$ t QpxtxM` @ 5#\60/\mx @_7 p(x\tp0   (ccB l  l45lcU :\ %_l45lc c  c c&H$ QHol%_ 5l +F !8$ Hl0   h4ccol%_ 5l 9 4$ l0   D ,zpt_ Pt (lptclk3 XkzD\%t_ Pt ,X )tX zdl.3 X(\%t_ Pt ,X )tX,zpt_ t (lptcT3 XkzD\%t_ t ,X )tX zdT( $ tX0 P  dK$X\$ \ HQX`\T ` "lTSpz*_WD#=4$$ %$`1d6D4$\` "l\=&t\\ :'%t &Q\p$T (\\ )lT\ (\\H\.\ '%ldF%%'t (&\8D p ,*D`1h5D lhld=) +''$'4, *#-*#.*#/*#/*#0*# *#1*#ld*#/*#2*#lh*#/*#/*#3*FD^4pn26D4$kn$ldF% p 0*6 pnknSpz\pzd8 pd`ht\\XD4$$ c= c= c=S'%'(%:H%'8%X %hl$ dl (h l=t)lh ltc$hl$ dl (QhxlAhcH%'%'(%'8%X %lx l $lh=t)lh lt     cAh'%'(%'8%'H%X%lt Pl $lh=p)lh lp   *# / x   F \c Dh'%'(%'8%'H%X%lt Pl $lh=)lh    x  G \  cAh'%'(%'8%'H%X%lt Pl $lh=p)lh lp   x   \  cAh'%'(%'8%'H%X%lt Pl $lh=p)lh lp   x   \  cAh'%'(%'8%'H%X%lt Pl $lh=p)lh lp   x  f \  cAh'%'(%'8%'H%X%lt Pl $lh=p)lh lp   x  G \  c ltKc(%f8%H%:X %hl$ l dh ,Q)lh   l Ah'%'(%'8%'H%X%l l $lh=)lh l   \    cAh'%'(%'8%'H%X%l l $lh=)lh l   \    cAh'%'(%'8%'H%X%l l $lh=)lh l  f \    c`H xptlh\c c='l%_ _  c= c= v\$ A )3}N}Xn  a a aa ! 9ay 1 Y y   BJACBlankbkBJACshtBJACmodBJACF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA 1 Y`F 3C:\Program Files\Microsoft Office\Office\EXCEL9.OLBExcel )Qp0FD:\WINNT\System32\STDOLE2.TLBstdole Workbook_Open @ 1Y.E .`M C:\WINDOWS\System32\FM20.DLLMSForms aa.Y{qE*:c:\temp\VBE\MSForms.exd AaiL-[DRF:\MSOffice\Office\MSO97.DLLOffice !iFT&3L*)DOF@/MSO١DFWorkbookWorkbook_BeforeClose Hetran RefreshSheetRunApp DeleteFieldReleaseBjacObjectsLoadBjacObjectsCreateAppObjectCloseMeConvertToLabel EnableMenusShowOrHideBjacWindow UpdateFile LoadBjacToolsClearBjacTools    F F F AspenBjacFF A  F F F Aspen B-Jam  *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications *\G{00020813-0000-0000-C000-000000000046}#1.3#0#C:\Program Files\Microsoft Office\Office\EXCEL9.OLB#Microsoft Excel 9.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#D:\WINNT\System32\STDOLE2.TLB#OLE Automation*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\System32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{1DB2592E-AF7B-4571-962A-EC14E8F43AC9}#2.0#0#c:\temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#F:\MSOffice\Office\MSO97.DLL#Microsoft Office 8.0 Object Library  oEm6kn bkBJAC043bd04e17 bkBJACin0 shtBJAC063bd04e17'shtBJACon0modBJAC053bd04e172modBJACmn0CP03OhffݖE