аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџўџџџ  ўџџџўџџџ !"#$%&/џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot EntryџџџџџџџџРFаšдюЦЛЛBook џџџџџџџџ1E_VBA_PROJECT ѕ^юЦЛЛ€ЧЌюЦЛЛ2b0715a5bџџџџџџџџ (  !"#$%&'()*+,-./0ўџџџ23456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijўџџџlmnopqўџџџstuўџџџwўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ:hџџ ƒџџ€xџџџ ƒџџŠtџџџ ƒџџ”pџ ўџМќ 0\џџџџџџџџџџ$@џџџџh|шџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџмџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(4џџџџџџџџџџџџџџџџџџџџџџџџ Œџџ`џ r|r|`џџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџœџџџџДџџџџџџЈџџ\lџџџџ4Pџ џџџџџџџџџџџџ4џџмЬџџџџ(џџџџьџџ4ШџџPџ @џМџџ@џ <џ Мџџ<џ8џ џџџџ8џ 4џШдрџ џџџџ4џ дрџhџџќ\џџџџџџ\,џџџџџџџџ@MEџџ`џџ~џџp‘џџ.ч$R.6€{ H>Ш0Zмх@џџl№PŒ ўЪ˜,:0(l@”8д6 џџDNLœ"Є:ЈN$фP4B„Ш6ШHD$H&Œ&Ј&Ф"рјџџќ04"<@џџH"P>tlД& Hdxџџ<ˆ*bœ Ш аи рш№єјџџќ "($d,PџџT:\˜ М"и0ќ, HTt”(Є6Ь& &, T t Œ   А џџФ >Ь  "   6( џџ 8 D  >T  d h l џџp >x И "Р Ф 6Ь џџ м  2ш є ј џџќ V V\ Д "М Р Ш а и 6р џџ  &( @4 0"L  |  2Œ &Р J*д    $  &( 4 8 џџ< 4D x "€ „ Œ ” œ <8  *м , <L P4` €„џџџџˆФџџY щз Name of Macro Function Help fileY щ з-Text displayed in Status bar while processing sY щзName of Analysis Toolpak XLLY щ$з!4Text displayed in alert when ANALYSIS.XLL is missingY щ0з#+Title of alert when ANALYSIS.XLL is missingY ХЃщ\з!#Array of add-in links to be updatedIfз wзGDefineStrings() contains strings which need to be Mac'ized or localized зf Žh­ \xlmacr8.hlp'з" Name of Macro Function Help filele­Updating links on 'кз)-Text displayed in Status bar while processingysзIno longer used MyXLL = "ANALYSIS.XLL" 'Name of Analysis Toolpak XLLз<Text displayed in alert when Analysis Toolpak XLL is missing ЉџIџзюno longer used XLLMissingMsg = "Analysis Toolpak is currently not loaded." + Chr(13)' + "It can be loaded using the Add-Ins command from the Tools menu." + Chr(13) + Chr(13) ' + " Continue updating other add-in links?"з/Title of alert when Analysis Toolpak is missingззAno Жџџџџџџџџ<:,:` Д щ џџџџiiџџciД Š(,,Вџџ,Ь|`џ$д(–pдPџ<6Т@џ вŒxџєPџ@џ,Т^Є0,'Ь ”М<џ'!”ŒtџP<џЂ,,Ь!”Œtџ,,дТ@џД8џvpџN@џ~4џ@,vtџd@`џ$tpџТ@џР6мЪдрN@џ,vpџ€4џРџ,LH&4џ8џpџxџtџ<џ@џPџxџ‹|ŠHўџџџџџџџЈџџ џџ ƒџџЊzџџџщ‚џџє џџД‹ќрZўџџџl џџВ8џџџџ ƒџџzџџџ ƒџџ xџ џ ƒџџtџўџ ƒџџ rџщ‚џџj мzџщ‚џџtь щ‚џџє џџџџ‹џџ„,,`џ$д Ф@џ@ŠPџ,vPџР:TЄN,’`џ$д(–pв@џ”6ЦАN@џ, |`џд Т@џ –0џ$д(–pв џ”6ЦКє@џ џ0џ,dvxџjPџ‚џТџd:ц^џ ,vxџd@vPџь џвŒtџN џ,bvzџd:ц^џ\,ltџ|џ`zџђЬ|`џ~ џю€rџ,`rџbЌЄ,ж `zџђжvtџж,vzџ†џЄџ,vxџ†џ`џ,”џ$д(–pв џ”6ЦКN џ,,Lx„tџPџ џ0џ@џАщ ьЪ АыT,”ЪЈ~,,д(–pвhџ”6ТXџЪ6ТHџдю€zџєhџXџHџ,`zџbЌЄ2,д(–pвHџ4"jHџŽ4џv4џжR4џNHџ,,LH~4џHџXџhџвЈ,,д(–pвhџ”6ТXџЪ6ТHџдю€zџєhџXџHџ,`zџbЌЄ\,dvxџ`zџ^4џJ,`xџp8џ$д(–pдHџ<"jHџŽ0џv0џжR0џNHџ,vxџ†4џЖџ,,LLЈ0џHџXџhџ”j,,д(–pвlџ”6ТLџ† |\џ–<џ$,џЌ $д(–pвџ”6мRr|єlџLџ<џџ,L`jџ<џLџlџ№,,ж,,hџ$д(–pвXџ 6ФHџT6Т8џ`єXџHџІІ,(џ BtnActive$hџ$д(–pв8џ 6ФHџT6ФXџj6Тџtю€zџє8џHџXџџ,`zџ€џ,`џцHЄ ,ж$Ђ,`џЮяџџцHЄ,ж ,,,Lh№џ8џHџXџўџџџўџџџџџф„ш,, \xlmacr8.hlp<,Updating links on <, ANALYSF.XLAќ, ANALYSIS.XLAќ, ADDINFNS.XLAќ, SCENARIO.XLAќ, VIEWS.XLAќ,Lџџ,џџџџџџџџџџ$џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ(џџ@џџ‹€ўџ€ўџ‚џџўџ‚џџўџ‚џџ`‚џџ`‚џџ`џџЄI.2f*\G{000204F3-0000-0000-C000-000000000046}#1.0#9#c:\school\vbaen32.olb#Visual Baп x`џџ~` ` `џџˆlџџˆ `џџˆZџџˆ6џџˆHџџˆўџџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ,џџџџџџџџџџ$џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ(џџ@џџ‹€ўџ€ўџ‚џџўџ‚џџўџ‚џџ`‚џџ`‚џџ`џџР…e2f*\G{000204F3-0000-0000-C000-000000000046}#1.0#9#c:\school\vbaen32.olb#Visual Basic For Applications*#5s*\G{00020813-0000-0000-C000-000000000046}#1.0#9#C:\MSOffice\Excel\XL5EN32.OLB#Microsoft Excel 5.0 Object Library*#0s*\G{00020813-0000-0000-C000-000000000046}#1.0#9#C:\MSOffice\Excel\XL5EN32.OLB#Microsoft Excel 5.0 Object Library*#1t*\G{00020813-0000-0000-C000-000000000046}#1.0#9#C:\MSOffice\Excel\XL5EN32.OLB#Microsoft Excel 5.0 Object Library*#81*\Rffff*3326585c0пјм(† sE(†к(†$pџџ(†0њ d(†\џџ<(„џџ*T„‹МšўџџџџџџџhџџИ. Updates Links to MS Excel 4.0 Add-ins !  Ўџ‹ш4sEˆџџџџŒџџџџ ƒџџ@zџ‹>$ўџџџџџџџ”Аџџџџ‹@ 6ўџџџџџџџвдџџџџ ƒџџЊzџ ƒџџДxџ‹|ŠHўџџџџџџџЈџџ џџ ƒџџЊzџџџщ‚џџє џџД‹ќрZўџџџl џџВ8џџџџ ƒџџzџџџ ƒџџ xџ џ ƒџџtџўџ ƒџџ rџщ‚џџj мzџщ‚џџtь щ‚џџє џџџџ‹џџ`lўџџџЬlonger used XLLMissingTitle = "Analysis Toolpak Not Loaded"­ ANALYSF.XLAЃ+*з$#Array of add-in links to be updated­ ANALYSIS.XLAЃ+*es­ ADDINFNS.XLAЃ+*М­ SCENARIO.XLAЃ+* ­ VIEWS.XLAЃ+*kІз з)Main() presents and processes the dialog.зJŽМYщм”A@šnAз If XLLFound = False Thenз7 Style = vbYesNo + vbCritical + vbDefaultButton2зe Response = MsgBox(XLLMissingMsg, Style, XLLMissingTitle, Application.Path + MyHelpFile, 3500)з If Response = vbNo Thenз Exit SubРз End Ifз End IfЃ J%T!`”­ BtnActiveЃ J%T%j!t'@' @с f €GPA@Š o ”GPA@ jAlgook()з Fз BtnHelp_Click Macro oзokŽш Р!†  ШrЃЌ Ш| РB@RkдзЊз3CheckForXLL checks to see if Analysis.xll is loadedзSiзFunction XLLFound()№з Dim i As Integer'з Dim XLLinStr As IntegerThз* DLLs = Application.RegisteredFunctionsз XLLFound = FalseAlз alз If IsNull(DLLs) Then oз XLLFound = False lз ElseЪз! For i = 1 To UBound(DLLs)з/ XLLinStr = InStr(DLLs(i, 1), MyXLL)lsз If XLLinStr > 0 Thencuз XLLFound = TrueЊз Exit Forз End Ifз Next iз End Ifз End Functionthзthз8AllBooks() calls FindLinks() for each of the open books.caзLiŽYщ(ceYщ4at Р!Ъ!д'Њ ЊЃ ” ДЃ ЊŠ p Д$ЪA@рОзgkraзinз8SingleBook() calls FindLinks() for only the active book. зŽ@Yщ`4 Р!Ъ!д'Њ ЊЃ ” ъA@р g4k'ззOFinkLinks() gets the list of links on the current book and compares them to the зP list of add-in links that need to be updated then calls ReLink() if necessary.зŽ|Yщœy YщЈnkYщДReYщРth J є%@'4з0array of links on current bookt 4$T”зЎ Р(Аto к є!  Р(К o Ѓ 4‰Šз.loop through book links $4' Ѓ *‰Šз:loop through add-in linksŠ  $*|'  Ѓ “E  $* єA@`fз\if matched, change the link ОDiОi Ў Р(Кnogk зXLз.Called by FindLinks(). Removes the link path.зdFŽќYщYщ(IfYщ4l(Р t$Ъ! '€з*#check to see if add-in stub is open ЊЃ”зadd-in stub is not opennS­' j ­'! 'Š`з add-in stub is open t­! 'Šg ” є!Д‹ ŠШд­Шр ”!РB@ЪОEnkFudirџџџџџџџџџџџџ9 SummaryInformation(џџџџџџџџkЄDocumentSummaryInformation8џџџџџџџџџџџџrаCompObjџџџџџџџџџџџџvfЬaЬ] c*\G{000204F3-0000-0000-C000-000000000046}#1.0#9#D:\EXCEL\50\VBAEN.OLB#Visual Basic For Applicationsy Ni*\G{00020813-0000-0000-C000-000000000046}#1.0#9#D:\EXCEL\50\XLEN50.OLB#Microsoft Excel 5.0 Object LibraryiiiiiiЬQNџџџџ фР…e2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 2b0715a5b 3326585c0*DDџџџџџџџџџџ†џџџџџџџџџџџџRџџTцџџџџџџ`џџџџ^ЊZ”(џџ*џџРџџŠАрєџџџџџџpџџџџџџ”џџџџџџ џџџџzPдџџ†џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЪ:ІџџџџџџџџџџџџTџџџџџџџџрџџfџџџџєџџџџџџџџџџњџџџџџџHџџџџЪЦџџа@šџџџџЊџџ&џџДџџ џџџџџџџџJŠџџџџџџџџџџџџџџџџ4џџџџџџџџjџџџџџџџџџџџџџџџџtџџџџhџџџџџџџџџџџџ џџџџџџРџџџџкџџџџџџџџњџџџџ џџЦџџ*џџџџџџџџџџџџџџ4џџ€џџrFNІџџџџџџџџКџџџџџџџџџџџџџџJџџАџџъџџџџџџ>џџџџџџџџџџџџ@џџџџtџџџџџџџџџџџџџџџџџџџџ 4аџџџџџџџџ џџ`€џџ џџџџџџџџX€+џџџџтџїтџџџџтџ‡лџџџџ РџiiЁc№џџТџйџџj"Тџˆ,џџџџ,&iiс1џџд2Тџ|уџџџџ<ТџKі.џџJТџiiѕџџџџXТџ@џџџџ`ТџфKџџџџnТџiiРцџџџџtТџ}{џџџџz&'ќџџџџ†Тџii+вКџџŒ&›0ъ–Тџtйџџџџ ТџiiЅ*џџџџЌТџBьџџџџИТџ0vџџџџТТџiiQ’џџšШ&ЂџџџџвТџŒџџџџтТџiiuƒ|џџъТџќџџџџјТџh’џџџџТџiiВ џџџџТџЖˆџџџџ&Оџџџџ$Рџiikйџџџџ,ТџвђџџD8Тџ љДџџFТџiiљЪџџџџN&нџџџџVТџ—Pџџ`ТџiiњџџџџjТџыџџџџtТџЄџџџџ|Тџii№ђџџџџ†ТџoŠџџџџŒТџ џџџџТџiiџџџџ˜Тџfџџџџ ТџсCџџџџЈРџiiЦџџџџЎРџжџџџџКРџV џџџџШРџii“кџџџџвРџw€џџџџкРџbџџџџцТџх]џџџџюТџЪџџџџіТџiiёaџџџџРџкџџ &cџџџџТџfџџџџ ТџiiHџџџџ&Рџš™џџџџ0РџТџџџџ4Рџu"џџџџ>Рџ2џџџџLТџкУџџџџR&lЫџџџџ^&iiD=џџџџlРџдуџџџџzТџЪœ$џџŒТџiigџџџџ–ТџjУкџџœРџjџџџџІ&ii џџџџџВРџЁџџџџМТџЏФџџџџвТџ—RџџцкТџ`џџџџтТџaџџ№цРџ_qYџџџџъТџGџџџџђРџCBџџџџТџЦУtџџџџ Рџ/pџџџџРџџџџџРџ~S<џџџџ Рџ#лџџџџ(&.*џџџџ.Тџ~оџџџџ8Рџsџџџџ>ТџQЕџџџџHРџjХpџџџџLТџџџџџRТџ+}џџџџZТџe.ДСџџџџfТџђ~џџџџxТџЊлџџџџ~Рџs —Ќџџџџ„Рџa?џџџџŽТџ\(џџ:”&arЈџџџџЂ&Ї%џџџџВТџNТџџџџИРџЪ.џџџџТРџK~џџџџЪТџCa\;џџџџЮТџвќџџџџктџФџџџџтрџџџ№ExcelVBAUPDTLINKiUpdate Links_EvaluateMainiBtnStateiThisWorkbookDialogSheetsiShowiiiOptionButtonsValuexlOniSingleBookxlOffAllBooksBookCountBookCounterApplicationWorkbooksCountFindLinksActiveWorkbookCurBookLinkNameCountLinkCountLinkiStringLocationiaLinkNamesaLinksLinkSourcesxlExcelLinksIsEmptyReLinkLinkPathiLinkName AddinOpenUseLinkCurSheetNameErrSheetsiCellsiiReplaceWhatReplacementUPDTLINK.XLSiAuto_OpenfDialogAuto_CloseiModule1ButtonsHelpButtoniBtnHelpBtnHelp_ClickModule2HelpimacrofunhlpHelpFileiHelpContextIDPathMyHelpFileiDefineStringssaveStatusBarDisplayStatusBariStatusBarOpenifilenameiMyStatusBartheArrayџRegisteredFunctions IsNull MsgBoxџiџџjџџFormulaRegistrationsCheckForXLLDLLsMyDLLCurDLLATPXLLIMyXLLXLLFound_ "Fr."\ * #,##0_ ;_ "Fr."\ * \-#,##0_ ;_ "Fr."\ * "-"_ ;_ @_ ,Б)_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ IВF_ "Fr."\ * #,##0.00_ ;_ "Fr."\ * \-#,##0.00_ ;_ "Fr."\ * "-"??_ ;_ @_ 4Г1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ Д"$"#,##0;\-"$"#,##0Е"$"#,##0;[Red]\-"$"#,##0Ж"$"#,##0.00;\-"$"#,##0.00!З"$"#,##0.00;[Red]\-"$"#,##0.00рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р(ѕџ јР р&ѕџ јР рЗѕџ јР рЕѕџ јР р ѕџ јР “€џ“  Comma [0]“€џ“ Currency [0]“€џ“€џ…x Dialog1… т Update 3Ъ M u  dќЉёвMbP?_*+‚€%iŒ1б&APage &Pƒ„Ё"1\рр?р?џџU i@з]j9A@@‰ШXІUpdate Add-In Linksa  ]X-7 CC@(‰иXІ$ OK ]\- 7CC@(‰pWІ$Cancel!  ]t)A@@@fІ€WІ\fІUpdate Add-In Links on:]„  ' % ІA@@џРfІдfІ"aфfІ BtnActiveActive documentwa]„  '%ІA@@џDgІ\gІ"o\fІBtnOpenAll open documentso]‚-7 ІCC@(‰МgІ$hBtnHelplgІ9џџ(ZІnHelp иг> "™ 3Ъ&APage &Pƒ„Ё"јы§р?р?1>  ўџр…ŸђљOhЋ‘+'Гй0t X`|„ЄЌ(H `lфUpdate Add-in LinksMicrosoft CorporationsUpdates links to functions that previously were provided by add-ins to directly access the nўџеЭеœ.“—+,љЎ0 0 8@ H gф UpdateDialog1 ModulesDialogsnsUpdates links to functions that previously were provided by add-ins to directly access the new built-in functions.Microsoft CorporationMicrosoft Excel@€ЙˆQ§•Лew built-in functions.Microsoft CorporationMicrosoft Excel@€ЙˆQ§•ЛўџеЭеœ.“—+,љЎ0 0 8@ H gф UpdateDialog1 ModulesDialogsўџ џџџџРFMicrosoft Excel WorksheetBiff5Excel.Sheet.5є9Вq