аЯрЁБс>ўџ ўџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot EntryџџџџџџџџџџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РFpuаѕkО@*CompObjџџџџџџџџџџџџ fWorkbookџџџџ Б-_VBA_PROJECT_CUR"џџџџџџџџ€КЫѕkОpuаѕkОџџџџџџџџ§џџџ‚ " ўџџџ!l#$%ўџџџ'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRўџџџTUVWXYZ[\]^_`aўџџџcdefghijkўџџџmnopqrtuvwxyz{|}~ўџџџSummaryInformation(џџџџHDocumentSummaryInformation8џџџџџџџџџџџџpVBAџџџџџџџџ €КЫѕkОаюЮѕkОPROJECTџџџџХўџџџ ўџџџ ўџџџўџџџўџџџ !"#$%&'()*+ўџџџўџџџ./0ўџџџўџџџ3456ўџџџ89:;<ўџџџ>?@ABCўџџџEFGHIJKLMNOPQўџџџSTUVWXYZ[\]ўџџџ_`abcdefghijklmnopqrstuvwxyz{|}~€ўџеЭеœ.“—+,љЎDеЭеœ.“—+,љЎL PXx €ˆ˜   ТфMicrosoft Corporationsa   Loc TableXLQUERY  WorksheetsExcel 4.0 Macros$фўџр…ŸђљOhЋ‘+'Гй0HP„Єрь ф*MS Query Add-in for Excel 5 Compatibility Microsoft Corporationce3Work with Microsoft Query to gather external data. rkMicrosoft Excel@€ф/ъдSЛўџ џџџџ РFMicrosoft Excel WorksheetBiff8Excel.Sheet.8є9ВqThisWorkbookThisWorkbookSheet2Sheet2InternalFunctionsInternalFunctionsExternalFunctiPROJECTwmџџџџџџџџџџџџЊdirџџџџџџџџџџџџž–Sheet2 џџџџ‹˜__SRP_0џџџџџџџџџџџџ^ d ЬA‡сАСтœЂћљ]QUERY.GET.DATAconnection_string,query_text,keep_query_]QUERY.GET.DATA?connection_string,query_text,keep_query QUERY.REFRE\p BАa=гК ThisWorkbookœЏМ=xxX/ƒ"<X@"Зк1ШџArial1ШџArial1ШџArial1Шџ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\);_(* "-"??_);_(@_)рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР р ѕџ јР р Р р  Р р Р р Р “€џ“€џ“€џ“€џ“€џ“€џ’т8џџџџџџџџџџџџ€€€€€€€€€РРР€€€™™џ™3fџџЬЬџџffџ€€fЬЬЬџ€џџџџџџ€€€€€џЬџЬџџЬџЬџџ™™Ьџџ™ЬЬ™џџЬ™3fџ3ЬЬ™ЬџЬџ™џfff™–––3f3™f333™3™3f33™333\џџџ`…ШXLQUERY…e% Loc TableŒЎўџўџ __DemandLoad Compiler" mg00s.addin1:# mg00s.addin10: " mg00s.addin2:" mg00s.addin3:" mg00s.addin4:" mg00s.addin5: " mg00s.addin6: " mg00s.addin7: Qˆ(QUERY.GET.DATA:Gets external data using Microsoft Query!0jˆ@QUERY.GET.DATA?:!Displays a dialog box to get external data using Microsoft Query!0Rˆ *QUERY.REFRESH:Updates a data range using Microsoft Query!00QueryGetDataDialogLocation:!*QueryGetDataLocation:"QueryGetDataXLMStub QueryRefresh*QueryRefreshLocation:%Register.DClick:&SelectedLanguage:$USAColumnStart:%XLMValidateArgs:ќ?iMXLQUERY.XLA Compatibility StubRegister.DClick$Localized Arg Name Indirection Table mg00s.addin1 reference QUERY.REFRESH mg00s.addin2connection_string mg00s.addin3 query_text mg00s.addin4keep_query_def mg00s.addin5 field_names mg00s.addin6 row_numbers mg00s.addin7 destination mg00s.addin10 keep_passwordQUERY.GET.DATA query_stringXLMValidateArgsQUERY.GET.DATA?connection string query stringdestination referenceLocalization TableLanguage to setup:USAFRNGERBRZLongname)MS Query Add-in for Excel 5 CompatibilityMicrosoft QueryAuthorMicrosoft CorporationTitle2Work with Microsoft Query to gather external data.'Extrait des donnщes de Microsoft Query.QUERY.ACTUALISERQueryRefresh description*Updates a data range using Microsoft Query<Met р jour une plage de donnщes en utilisant Microsoft QueryQueryRefresh VBA Name QueryRefreshQueryActualiserQUERY.LIRE.DONNEESQueryGetData description(Gets external data using Microsoft Query5Lit des donnщes externes en utilisant Microsoft QueryQueryGetData VBA Name QueryGetDataQueryLireDonnщesQUERY.LIRE.DONNEES?QueryGetData? description@Displays a dialog box to get external data using Microsoft Query6Affiche la boюte de dialogue Lire des donnщes externesQueryGetDataDialog VBA NameQueryGetDataDialogQueryBoюteDialogueLireDonnщesArg1 rщfщrenceArg2chaюne_connexionArg3 texte_requъteArg4garder_dщf_requъteArg5 noms_champArg6 numщros_ligneArg7Arg10 mot_de_passeџJ? x­ч Д] *hо Ћ_U"lЯrџЬтЏрљр­рљA`ТbpIСmЂјПtТbHюƒ‚xЩƒ‚лріZwBїПрљћПB—їПb„№ƒ‚(ћƒ‚ЈТb&сўџџџˆТbHћƒ‚еСсџ„№ƒ‚Ф§џџHюƒ‚џџ №Фbѕ5сёS0Dцƒ‚№Фb ХbёS0 Hюƒ‚4сёS0№Фb˜*„‚ tЧ0Х0F‘ L“œ“ч aѓn0Ч0бтУbќ ЬМ0Х0јЂЧ0бтУb§тУbфХbЇ70тУbфХbt<Фbf–їПтїП7ХїПBXLMValidateArgsetioncationxЩƒ‚T№ƒ‚T№ƒ‚˜ФbttХb ьž0wBїПpХb˜ФbpIСmЂјПЌФbЬ№ƒ‚xЩƒ‚T№ƒ‚T№ƒ‚wBїПљƒ‚ЄФbdрўџџџ ФbT№ƒ‚ љƒ‚$Хb =сЙ=сЬ№ƒ‚Hюƒ‚ љƒ‚?ј№ƒ‚P§џџ Hюƒ‚??|Хbѕ5сёS0Ќ*„‚|Хb€ХbD+„‚`Pч͘їПрšZ{ѕr0‡0<ѕr0ч0pХb tŒЄЎџtŒ?ђ0Ђt˜мХbќХbШ4ЦbЦI0 ЦbШХb=ˆ0аХbИ'К Ѓчy0ТbџџџџЃM џџџџ@цb Mќєц @d ЬA +рш!%a  dќЉёвMbP?_*+‚€%џСƒ„MN\\MSPRINT10\17/3309 PRIVM 157.5мpCLetterЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ''''Ё"dр?р?U} $} m} } л+џS0џbџbџџСџ џ џїПї џ џїПћџbСџbƒ‚џƒ‚џbр џџџbџƒ‚џс џƒ‚џƒ‚џџџџџbс џšџbbџчџр9‚џS0S§ § џџўB7§ § § § &џџџC@BQ§ § § %џџџCAAB§ §  'џџ џ@#"џB7§  §   џџ џAп§  §  / џџ џ@#C!"џB7§ §  џџ џAс§ §  џџџB6§ § § &џџџC@@BQ§ &џџџC@@BQ§ &џџџC@BQ§  &џџџC@BQ§  &џџџC @BQ§ &џџџC @BQ§ &џџџC@BQ§ § <џџџ&CAAC@BXB<џџџ&CAAC@BXB<џџџ&C AAC @BXB<џџџ&CAAC@BXBџџџAU%џџџC AABrџџџ\@#C!C@!C@!C@!C @!@!^C@!"џB7џџџAпwџџџa@#C!C@!C@!C@!C @!C @!C@!"џB7џџџAсџџ!џB6з<А:bEG9O9:F888888N@@@)v{!џS0"џb#џb$џ%џС&џ'џ(џїПї)џ*џїПћ§ !&!џџ"џC@@BQ§ !&"џџ#џC@@BQ§ "&#џџ$џC@BQ§ # &$џџ%џC@BQ§ $ &%џџ&џC @BQ§ %&&џџ'џC @BQ§ &&'џџ(џC@BQ§ '6(џџ)џ CAA *(B7B6)џџ*џ CAA *)B7B*џџ*§#A5зєДF888888::>З@ d ЬA s'A-  dќЉёвMbP?_*+‚€%џСƒ„MN\\MSPRINT10\17/3309 PRIVM 157.5мpCLetterЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬЬ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ''''Ё"dр?р?U} m} $} I} IџS0џbџbџџb џ џ џb џb џћџbСџbƒ‚џƒ‚џbр џџџbџƒ‚џс џƒ‚џbџ0џџџџbс § § § § § § §  § !§ "§ #§ $§ %§ %§ &§ '§ (§ § § )§ *§ +§ ,§ -§ .§ /§ § § 0§ 1§ 2§ 3§ 4§ 5§ 6§ § § 7§ 8§ 9§ :§ ;§ <§ =§ >§ § ?§ @§ § A§ B§  § C§ D§  § E§ F§  § G§ H§ § I§ J§ § § K§ § Lз2vИ8*******************>Ж@К Sheet2 onsExternalFunctionsID="{9E91CCC9-CF76-11CF-A0CA-00AA00A43902}" Document=ThisWorkbook/&H00000000 Document=Sheet2/&H00000000 Module=InternalFunctions Module=ExternalFunctions HelpFile="" Name="Project" HelpContextID="0" CMG="646695C0BB53BF53BF53BF53BF" DPB="090BF8F703F7039306801B92E28B258DA4BE" GC="BDBF4C04B4B9B5B9B5B9" [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet2=0, 0, 0, 0, C InternalFunctions=23, 23, 789, 453, ExternalFunctions=46, 46, 812, 476, Жџџџџџџџџ<џџ№ЫЧд:2а‰Љ ЩA)РFяЫЧд:2а‰Љ ЩA)џџџџџџџџџџџџxњŠ8џџџџJbJџџ#ˆяЫЧд:2а‰Љ ЩA)№ЫЧд:2а‰Љ ЩA)џџІђђњџџџџ4џџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{__SRP_1 џџџџRк__SRP_2џџџџџџџџџџџџs __SRP_3 џџџџD`__SRP_4џџџџџџџџџџџџ=И__SRP_5џџџџ7`__SRP_6џџџџџџџџџџџџ2 __SRP_7џџџџ1@__SRP_8џџџџџџџџџџџџ-к__SRP_9џџџџ,@ThisWorkbookџџџџџџџџџџџџ _VBA_PROJECTџџџџbŽExternalFunctions$џџџџџџџџSInternalFunctions$џџџџџџџџџџџџ&YџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЖџџџџџџџџџџџџџџџџџџџџџџxо)$oџџџџJhJџџџџE$жжeHџџџџпџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@8џџz ”џџ> ”џџ†> џџџџš"џџџџLџџџџLџџџџLџџџџџџџџ”џџџџLџџџџ”џџџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџB@@Џ'sџџh›$` BV('sџџHfџџ@Џ'D F$&• H'JaџџСL FU,'Jhџџ№sџџш›LрЏ'DsџџаfџџШ0ZъpZъˆиT GetDataDialog doesn't actually work for Excel97, since there's no interactive form.иO Fail out if the connection string and/or querytext string are missing or emptyС$№ P$&”F“$g PU '` `Є”F“$g R$&”F“$g RU 'b bЄ”F“$g ` b T V X Z \ ^$d'Nsџџ8›$0 BV('Nsџџfџџ ZърZъјZъС$ш P$j• PU '`aџџРї hі PŒ ` hU '`їП˜hџџ R$j• RU 'baџџhї hі RŒ b hU 'bїП@hџџ8 ` b T V X Z \ ^$d'fsџџ›$ј BV('fsџџрfџџи(ZъhZъ€Zъ˜ZъАZъШZърZъј TЏ l$D”F“$g VЏ n$D”F“$g XЏ p$D”F“$g \Џ r$D”F“$g ^Џ t$D”F“$gиi handle building up the array of SQL. Instead of keeping around an array like the Excel5 implementation,и4 we keep the SQL in a single string for convenience. r• Є •  R'baџџ R'bhџџЎ'иE now that we have the SQL text, validate the destination range object *!, .”F“$g *!0!2!4Є ”F“$gС$p Z$&•х (.vaџџHх Z.vhџџ0 v$6ЎRange”F“$g P b l n p v t$x'daџџри- not executing, just building the SQL string.  R'Џ'dhџџˆsџџ€›$x BV('dsџџ`fџџXZъ8С~@х v!>.| |Ј•и] QueryTable already covers the destination range. Modify it to have the new connectionstringи and query parameterС$ЎODBC; ` |(€ b |(‚aџџ`›„XС$PхЎODBC; ` v b v!†!ˆ%Š.|hџџ p |(X n |(V t |(ŒСŽрЏ |B@@ l• |B@hџџАЏ'xsџџ ›~˜н„›$ˆ BV('xsџџp›Žh |B@“$PfџџHXZъ˜ZъИZъахЎ Loc Table %š.˜ЎSelectedLanguage ˜%z!œ'–хЎUSAColumnStart ˜%z.”иI Do the USA VBA functions, which are present in addition to the localizedи VBA functions –ЎUSAЄ‡Є”F ”A@žgи= and do the rest of the compilation for the selected language ”!œ$ ^ ”!œ –Є‡Є•и  Compile the VBA Function names ”A@žи  Compile the XLM Function names ”A@Ђи # Compile the XLM Function arguments ”A@Єи + Setup the summary info using this language ”A@ІqџџАhџџЈхЄЄ ”%Ј.”Бџџˆlџџ€№и QueryRefreshž ЄЄ Њ%Ј!œЄЄ Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@Ќи QueryGetDataž Є Є Њ%Ј!œЄЄ Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@Ќи QueryGetDataDialogž Є Є Њ%Ј!œЄ Є Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@ЌlџџXZъРZъиZъјхЎXLQUERY %М.ИЎ =XLQUERY!'Жи0 the QUERY.REFRESH name is offset down by 4 rowsЄЄ Њ%Ј!œ'Кž  К ЖЏЏ ТЏЎQueryRefreshLocation И%z%РЄЩФЄЩД !ОB@Šž КЄЄ Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@Ќи1 the QUERY.GET.DATA name is offset down by 6 rowsЄЄ Њ%Ј!œ'Кž  К ЖЏЏ ТЏЎQueryGetDataLocation И%z%РЄЩФЄЩД !ОB@Šž КЄЄ Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@Ќи2 the QUERY.GET.DATA? name is offset down by 8 rowsЄ Є Њ%Ј!œ'Кž  К ЖЏЏ ТЏЎQueryGetDataDialogLocation И%z%РЄЩФЄЩД !ОB@Šž КЄ Є Њ%Ј!œЩЎЏЩАЏЩВЄЩД *B@Ќlџџ˜  Zъx Zъ˜ ZъИ Zъи хЎXLQUERY %М.ИхЎ mg00s.addin1 И%z.ЦхЄ Є Њ%Ј.Шї ЪіЄЄ‹ ЪЄ Ш%Ј!œ ЪЄ Ц%Ј(œїПШ lџџР № ZъX ЄЄ Њ%Ј!œ (ЮЄЄ Њ%Ј!œ (аЄЄ Њ%Ј!œЎCompany %в(œЄЄ Њ%Ј!œ (д *!ж'ЬЄЄ Њ%Ј!œ *(жЏ (ии(ThisWorkbook.SaveCopyAs "C:\xlquery.xla"и,Application.Dialogs(xlDialogSaveCopyAs).ShowЏ (и Ь *(жlџџP џџџџH іЕAttribute VB_Name = "InternalFunctions"  Op$ Explicit Dim sStoredSQL As S˜ng6t QueryR@efreshЎ(1˜al 07Va@riant) \ b#1OpbjecxOn Error GoToKturРnPound2!If IsMis sing() 0ThenGSe*tA1€zAuveCellElse.End INfƒƒ7Apa–.DataEntryMode <> xlOffAY‰!KWindРow.SelЗ€heets.C€u t > 1)TyLpeя‚1)E"РRange"ŸР;Р1.Area*B ШRow Or[Р-АlumnЇW'[ the sle c€j is within a ЂqštabРrС6b,A n rŸat  synchronousl„y.…AcceBŠ С ЎTBprop@erty fРša Фth€isn'tQ Хwill РgeneraРиРunti@йexceCдТ‚ cause #REF t0o be@.AДed. FailuКrЄ'С…5n яу‚6"v.рсv †aБz`hTruD`Exit …€c X Reс%t:Z CbV@{(xl  )cЌ pg Pr ivС,e Valid BooleanArgume@nt(argH, fDefaulŽtd€Reskџт“ф J!j mzfф =Ц„ kCannotConђvрRToaƒš ўCЁх'(–24№ Ф4y7Faќ3ц2ТGGetЄDialoіgOУ€n€РЯ ЪЊ5cІЧТTexт6dШ,Т ЦKeepB ;AFieldСЂsѓр—NumberєDestin‚НсExecы`уѓPasswordћШГрsъ!Рй!хэЁ>OЃёы№суB' Ъ- doeB—actu ally @kђMBEIl97,aVceЁPre's no iaive ‘m†SСI outˆ ifЂSconЄ s and/АSZure mуy №empty П}П}И}к6/veЃФzП= CА([Cƒр;Len(>)§@>0пsъ‡Gˆ6+O §Ћ‹s1•t G; oџ9VуSBO7pž Щ;Ѕ>рRs€!`, Iй5, —4, W3,њ 2,РЃв0Г•/Џ]ўošc2Ё ХCp ocg00oIЈi oIp›XРLMStub+!17џv/> Not`>A№rrayь9В7ѓqNГO=O=trе&КuF GEach v Iѓ Їp bџџCГџCџCpŠ#У4JTї*%б0#2,DЦ0IŒŒёх@F/D/DŒ'’DpЖestination As Variant, Opal ExecutepKeepPassworŠdB) Dim fZQu@eryDefBB@oolean!FieldNamesRowNumјberЌ\ Ќ!sSQL;StrHingKrD ’O`bjectƒƒI f Not€žlidate„,ArgРument(<|€, True,‹†) Then GoTo ReturnPoundRќefЂ/›†. М-‡\џЦ‡ќ„kФ|A[Ѕ† нУ\' handle build„ up the arra y of €‹. InsteadMk€У arAo „anФ like‚Excel5 iАmpleA†Тн,ХИwe AB ЂiР, s!sТЄ for conve€nience.ƒ}€ŸfФN’CСн@Len(sStored) > 0' b_=  &b BVTexD]СE8lseЇ qnd IX#… = ""Ч'' no"wрat €!havУ&!tр, va#lb$dШrranpge o(sAРA pplic-.DataEntryMode <> рxlOffЂ!wo№ActiveWindow.Sel €+heets.ЊC@?t€,1п РOn Err€;V€AФIsMisaB(ˆ’ZЇ aSet —= УCellG:H (Ь;`-TЈypeЁЗ( )-t"Rс3""h"BJGДetЁ6Vф>@Њs GIFetch(CИonnР0Ри З,рXмQLlЌРщЄf ›щ;Ф%ˆ)#ы$сTt eBурs, jusўt…Ё„aVƒv„t2ШkmјAШфЈ0Exi t Fun SoЄъ4 ЫЩ:ЃX CVё€((xlPрgе›E@w PriОv`oЖ“CЄѓs џ0‡vгљŸ‚“‚*џ„vpзz‰b(рЯщ`‹‹qt!2№TablP“‹;@€\In5 =ъ8.—]р3!„(Isб„6h@='4YQ aдlrpgy№`v‘A'‡Q№iАNify  !Œto m$Unewd/43ƒ* q*'Аkd BqБš par™t8П/Š//ƒ+‹0Dialog-212?љ111_?1(1HPŠPM„—PDim sSheetPrefФixTStr@s!сwsXLQUERYWorksћсчs"UaŸ­cAmg= ThisСbook.Exc€el4IntlЂбBs("$"deJ= "=ф!"C Ѓ'ЂŒB.REFPRESHтЈ `Œoby down b€y 4 rowdїшA€ m4g6Ѓ Ъ"О .Add Ї, SŒlЊ& f!.Т(Ю"щ€ …Т")Ё ƒ0s(Tra|Ѓxl6A€H‚u)ю "(Ty№pe:= RŽ^–‹I_‰ІŽ_‰^‰iqAрc7G€ET.DATA•7і6Ÿ7DЗ7Ÿ7Ÿ7ЈcЯoУTPЯЯ ЯQ џЯWёЯ”aЯ`sl/T‚B`sЯ, З:%O7…?Ÿc78Ÿw “’wl71Pwn7.§7mаk7‡MЏЊг_cЏ}sџŠCп7!ЄџcAя7Ÿ|Ÿ|п/Œ­ЬžЯceTYЯaѕЯar tqaВN“qrSrco i1са`egerУS?dП?d?dтD5d!г=/Xmg00s.adpdin1 a _a(Œ13‘E Forа = 0 To 7я“!"iїHA/РУŸУNextJІ~XБџљsOldUјser3БЩ}C њl Titleџ8t(УЈ‹o.AutPЃ t(ш‘.Bui€ltinDocТЧPropertiЦe€сПanyppBЎŸПП›…1tsŸ|t(вгГS SЪ=о 9W5ƒŸm_ У'оу*Isрƒin` !~'Sav eCopyФ"C :\xlqУ.x4laф'љ“Ls( xl“з).Shєow/.'ТiSŸ’™Z*Жџџџџџџџџџџџџџџџџџџџџџџxъ‡ §џџџџJSJџџмоЃ ттsџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(6 џџџџš џџџџ< џџ<џџџџџџ)•w2$*\Rffff*1132779536"*\Rffff*f32779533пј +р`№`˜\џk@ џџџџŒџџџџiƒ џџџџџџ џџџџџџ€џџ 6 6 6`рџџџџlџџџ џџryџџ+т` h8\џkа џџџџŒџџџџiƒPџџџџџџџџ№€џџџџiƒRџџџџџџџџ€iƒTXџџ џџ0€iƒVџџ џџP€iƒXџџџџ џџ џџp€iƒZџџџџ$џџ џџ€iƒ\а(џџ џџА€iƒ^џџџџ,џџ џџџџџџ€џџџџxxternaџџџџsing Microso Q€+фˆ`Pp \џk@ џџџџ % ŒџџџџiƒPџџџџџџ џџ`€џџџџiƒRџџџџџџ џџ€€iƒTџџџџџџ џџ €iƒV€џџ џџР€iƒXџџџџ џџ џџр€iƒZЈ $џџ џџ€iƒ\@(џџ џџ €iƒ^џџџџ,џџ џџџџџџ€@ўџџџџџ\џџџ џџ g bo`тџџџџlџџџ џџta uџџџџXsoft Qџџџџ+цшџџџџџџџџџџџџџџџџШ џџџџџџŒџџџџiƒшџџџџџџџџ џџџџџџ€˜+ъ(џџџџџџџџџџџџџџџџ( џџџџџџŒiƒьџџџџџџџџџџH€iƒюџџџџџџџџџџh€iƒ№џџџџџџџџ џџˆ€xiƒђџџџџџџџџ џџЈ€iƒєџџџџџџџџ џџШ€ЕiƒZџџџџџџџџ џџш€iƒіџџџџџџџџ џџ€iƒјџџџџџџџџ џџџџџџ€+њџџџџџџџџџџџџџџџџџџџџh џџџџџџŒiƒьџџџџџџџџ џџˆ€iƒюџџџџџџџџ џџЈ€iƒ№џџџџџџџџ џџШ€iƒђџџџџџџџџ џџш€iƒєџџџџџџџџ џџ€iƒZџџџџџџџџ џџ(€iƒіџџџџџџџџ џџH€iƒјџџџџџџџџ џџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџƒкџџџџџџИџџџџџџџџџџџџџџџџџџ$ƒкџџџџџџшџџџџџџџџџџџџџџџџџџ$*Updates a data range using Microsoft Queryџџ(Gets external data using Microsoft Queryџџџџ@Displays a dialog box to get external data using Microsoft Queryџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxраpџџџџџџџџPџџџџџџџџџџџџџџџџџџџџАџџџџ0џџџџ№џџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXиpџџџџd@ўџџџџџ\џџџ џџ јрџџџџџџџџРџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџ`џџџџџџџџџџџџџџџџш џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ а Р `фџџџџlџџџ џџџџџџЈ џџџџN@ўџџџџџ\џџџ џџ џџџџјџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџ hMEџџџџџџџџџџўЪE€€ џџџџ€ € (€ b0€ b˜€ ^€ V`€ `И€ :€ X€ 6`€ J˜€ bш€ P€ џџџџР pР €€ џџџџ€ >€ а€ *и€ € >B PXh€ џџџџB p*)xЈ€ џџџџB А*)Иш€ џџџџ@№ џџџџ > @ *H x >€ џџџџB РШи џџџџB р*ш џџџџB  *(X џџџџР`€ џџџџ@h џџџџ >x И *Р № >ј џџџџ џџџџ џџџџР8џџџџHХџџxи LOCALIZATION INSTRUCTIONSии\ Define the appropriate constant for your language to 1. US functions are always turned on.и[ If your language doesn't exist here, then you need to define stubs for your language underиX the appropriate #ifdef. Copy one of the existing languages for a template, then adjustиO the function names and arguments. Note that the names "QueryRefreshInternal",иY "QueryGetDataValidateArgs", and "QueryGetDataDalogInternal" names remain the same, sinceи4 those functions are the actual core implementation.ии/ Once you have picked the appropriate language:tиD 1. Choose Debug/Compile Project to make sure there are no errors.sџџи[ 2. Switch back to Excel, go to the localization table sheet, and follow the instructionsZъи to build the XLA.TaѕЄ№мš.ѕЄ№оlectedи8========================================================ии$ ENGLISH FUNCTIONSјии8======================================================== $'рfџџ P R T V X Z \ ^$d'тfџџP P R T V X Z \ ^$N'фfџџѕ мЄёи8========================================================ии# FRENCH FUNCTIONSии8========================================================ˆ ш$'цfџџ ш ь ю № ђ є Z і ј$d'ъfџџр( ь ю № ђ є Z і ј$N'њfџџ ѕє˜ѕ оЄёи8========================================================ии# GERMAN FUNCTIONSии8========================================================ѕєРџџџџИЖAttribute VB_Name = "ExternalFunctions"  Op$ Explicit ' LOCALIZATION €INSTRUCS8>Define the ap€propriaдcЄtant for your €languag*o 1. USD f| ar>lways tur€ned on.^If =doesn't exist@ here,|n& ne9to ‚d”stubs`under.Z# ifNCopyaAe ofm‚6i ng†b+a templxBadj4us€œ'‚…o nA€Кs andtg@uments2NТo”thatƒ"QueryRe€freshInв ",V GetDataValid€;Args",-СŠDalog† @remainBs@$, since1BoseЬcGct@ual coРgiu@:eС.a‰AgAO@Т^have pИick`LƒХ~:A BChoADebug/Compile Projec€Co makex su€€!@ˆno errorsС 2€PSwitch back Р}Excel, goС/loc…JzB, tab sheetCLfollowТCinsиtruƒТ) € build‚XLBA #CСЖ LANGUAGEP_FRN@д0GьER=4€€# ENGLISрH FUNЩуї%: )P(c‚@@@R As Vaр{nt)Yh 'Œi.РD`escriуŠ ŽUpaV a рa r@‚e u Pg MicrosoftoуР‘З рDc`! IРnvoke_Ё€-р" \n6`a%i@Щc( ) ~EsХЁžeC$n(Р>n S€ЅStrс Р@‚,ЃTextУ‰'Keepb Ѕ$(, &FieldГsѓRowРNumberє€,8tinc\G4 ExecсП’сPasрswordш:NoНџ А #End If Ьa^џ  ф*\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications *\G{00020813-0000-0000-C000-000000000046}#1.2#0#C:\Program Files\Microsoft Office\Office\EXCEL8.OLB#Microsoft Excel 8.0 Object LibraryА*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\W95\SYSTEM\stdole2.tlb#OLE Automationц*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\OTOOLS\LIB\X86\DEBUG\FM20.DLL#Microsoft Forms 2.0 Object Libraryр*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\OTOOLS\LIB\X86\MSO97D.DLL#Microsoft Office 8.0 Object Library џџџџџџ)•w2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџJThisWorkbook 1032779536*DџџbJњџџ Sheet2 1232779575*DџџgJњџџ"InternalFunctions f32779533*DџџhJџџџџ0eHџџ"ExternalFunctions 1132779536*DкџџSJ0џџџџHsџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџуЫЧд:2а‰Љ ЩA)џџџџхЫЧд:2а‰Љ ЩA)џџџџчЫЧд:2а‰Љ ЩA)џџџџщЫЧд:2а‰Љ ЩA)џџџџџџџџ€€џD8 Excel€+ VBAїтWin16С~Win32MacГВ Project-Ўstdole“`MSFormsCOfficeu€џVBIDEAџ ThisWorkbook|у €џ_Evaluateй Sheet2щ InternalFunctionsТЂ sStoredSQL‰-Ќ(QueryRefreshInternalИvRefЮRef1ЕReturnPoundRef IsMissing˜э ActiveCellНЗ ApplicationЅ* DataEntryMode•пxlOff'ќ ActiveWindowУ+SelectedSheetsЖ€Count0vTypeNameјѕAreasќKRowsЁUColumnsp9 QueryTableыпRefreshxlErrRefЂValidateBooleanArgument>єargufDefault…рfResultшжCannotConvertToBoolО_Ќ(QueryGetDataDialogInternalх˜ ConnectionStr)Ч QueryTextўƒ KeepQueryDef|. FieldNamesмИ RowNumbers‚ DestinationаЛExecuteYЭ KeepPasswordš#sConnectionStringjЬsSQLу/Ќ(QueryGetDataValidateArgs]Ќ(QueryGetDataXLMStubђNvmIsArrayœ• fKeepQueryDefУ fFieldNamesƒЂ fRowNumbersЊkfExecute Т fKeepPasswordс  rDestinationСВQueryGetDataFetchŸ Rangeк qtо^NotInQueryTableЖ ConnectionкиSql"еCreateNewQueryTableЅ~ WorksheetСў QueryTablesŒAddїr SavePasswordъX RefreshFailedЬDeleteИxЌ(Compiler„щrLanguageRange=(sLangюиwsLocal№^ WorksheetsМјValueфKЌ(CompileVBAFunctionNames\xIsEmpty љЌ(CompileXLMFunctionNames#SЌ(CompileXLMFunctionArgsl:Ќ(CompileSummaryInfo‰ПOffsetшЊ rLocRange•M MacroOptions^є DescriptionО hasmenuЙчhasshortcutkey!CategoryД\ sSheetPrefix.… wsXLQUERYХn sMacroNameG0Excel4IntlMacroSheets.NamesЮПAddressЇХxlA1ф MacroTypev†rDest/rSrcaji` sOldUserNameФ‚Titleђ~AuthorќBuiltinDocumentProperties_ЛCommentsУ)UserName\цIsAddin~| ExternalFunctionsК LANGUAGE_FRNЉ LANGUAGE_GER™Ќ Ќ(QueryRefresh}e Ќ(QueryGetDataЦЌ(QueryGetDataDialog0эQueryActualiserЉ RщfщrenceїeQueryLireDonnщesiChaюneConnexion  TexteRequъte˜'DщfinitionRequъteGardщep NomsChampхX NumщrosLigne<ƒ ExщcutionЊл MotdePasse~QueryBoюteDialogueLireDonnщesФјWorkbookk€џ_DefaultjТџџxџџџџџџ џџџџ џџџџџџл џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH   00020819-0000-0000-C000-000000000046})•w2$*\Rffff*1032779536пџџџџаўџџџџџџџџџ(џџџџџџџџџџVB$џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ B $‚ џџџџўџџџџџўџџџџџџџџџџџйD $ƒўџџџџџџџРџџџџџџџџџџџџџџWс $џџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh˜@hhџџџџџџџџџџџџџџџџџџџџџџ0MEџџџџџџџџџџўЪџџџџџџџџxЂАAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |Creatab‚l†False ^Predecla‰Id‹Tru "@ExposeTemplateD0eriv$eCuРstomizˆ2rU€€€ џџџџџџџџ@prU€€€ јq™Сџџџџ9 4 Љ1џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ{crU€€€ џџџџџџџџ@prU€€€ љ! I џџџџб4q ™ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“crU€€€ џџџџџџџџ(`§џџџ)™aЏLЉ` §џџџ‰™Йс)Ii‰Ё00ЏЏЏЏЏЏLб` §џџџ ™Йс)Ii‰ЁЏЏЏЏЏЏЏЏprU€€€€~} !бTl\џ \џќіlџ§• (lџ\џl4)l,l(l$l llll\џ $\џќіlџ§•( 4(lџ\џl4)l,l(l$l llll\џ $\џќіlџ§•( 4(lџ\џarU€€€ џџџџџџџџ(`§џџџџџџџџџџџaЏ0Љ` ќџџџџџџџџџџџqЁ/##Lб` §џџџџџџџџџџџЙс)Ii‰ЁЏЏЏЏЏЏЏЏLљ` §џџџџџџџџџџџЙс)Ii‰Ё//ЏЏЏЏЏЏL!` §џџџџџџџџџџџЙс)Ii‰Ё00ЏЏЏЏЏЏLI`ќџџџџџџџџџџџЩљ9Y™С00###=y#$q`§џџџџџџџџџџџ,™`§џџџџџџџџџџџщ=y,С`§џџџџџџџџџџџщ=y,щ `§џџџџџџџџџџџщ=y, `§џџџџџџџџџџџщ=yprU€€€~~~y џџџџџџџџџџџџ   RefargfDefaultfResult ConnectionStr QueryText KeepQueryDef FieldNames RowNumbers DestinationExecute KeepPasswordsConnectionStringsSQL fKeepQueryDef fFieldNames rU€€€€~}  ,˜й б 9 a Й ™I Сщyб 1 Y ! Q ‰ ё Yй!QQБ9Yy™Сљ!!ЉI™СщЌK l 0dџ"$ (Qdџhџ@§Tџќ4ќјhџ2Pџѕ dџ"$ dџ lPџѕЮяџџЬdџyRPџLџdџ"$ dџ DLџa<џ§ѓ8џ8џ 0lPџѕл)dџLџ8џ5<џаhџMTџ @ #4џћ=/4џђ%hџW<џ§ŸW$џ(Tџ]ћpџ6<џ$џ\FhџW<џ §ŸW$џ(Tџ]ћpџhџWџ!§ŸWфў(єў]ћpдўћФў6<џ$џџфў\gќfTџ%hџW<џ"§Ÿў˜#5<џ cTџќіlџ§•ѕч§њTџќіlџ§•§• ИЌ,lџhџ8 4џdџLџ8џ<џ$џџџфўдўФўxHєџpzџ l !„5K: § hџќM„єpzџH$: јИKœ l œ §TџќK1hџlhџJѕЧ:œ l Lœ §TџќK1dџldџJѕЧmœ)l,l(l$l lldџhџDџ $$Dџќіlџ§•ѕч§њTџќіlџ§•§•(8И0œlџdџhџDџPјKкl %У% §DџќK1hџW§DџTџў‰4џWlhџTџќK#0џ*1hџ/0џ TџўŒ4џ8l %Уw §DџќK1dџЉ§DџTџў‰ џЉldџTџќK#0џ*1dџ/0џ TџўŒ џŠ)l,l(l$l lldџhџџ $$џќіlџ§•ѕч§њDџќіlџ§•§•џєў(lјDк,lџ4џ џ@џ,џdџhџTџ0џџˆ8jџєџ+Vџl & Уhџєџ+Vџl & У8fџєџ+Vџl & УSdџєџ+Vџl( & Уnbџєџ+Vџl, & У‰kdџї”JѕлГ”€*1\џН€C\џ 'T2Lџѕ Pџ"$ Pџ lLџѕЮяџџЬPџRLџHџPџ"$ Pџ DHџa8џ§ѓ4џ4џ 0lLџѕл)PџHџ4џ58џWK l$ …Pџ"$ (QPџXџ•§$$џќ4ќјXџXџM$џ @ # џћ=/ џЙ;bџlXџ=PџPџfџhџjџ\џl8џ ( lPџ=)Xџ8џќіlџPџ”€*§ч c$џќіlџ§•ѕч§њ$џќіlџ§•§•(\80lџXџ\џ  џPџHџ4џ8џАdK1H$aXџj§ѓ*hџ5Xџ lhџќcћвУ[K7+€*FXџ%hџ,˜5Xџ€FHџ%hџ,ШОK7\+€*F0џ%€$§oHџ%€F џ%@џH$aXџ\§ѓDџDџ р@џўЂџЕ§ѓ*hџ)Dџ@џ6Xџ0џџl §“ @hџ,1l§“ @hџ,0l(§“ @hџ,ЩKLќfHџ%hџў ‰ У  hџў u cHџќіlџ§•§ ]ѕч§њHџќіlџ§• hџў u7§•$ld,\lџhџ Dџ@џXџ0џџ”D4Xџ:\џ%lџ"$ lџ dlXџ=pџ)lџXџ/lџ'Hџ%:\џ%pџ lџa8џ`1tџlџ6Hџ8џ lџ'Hџ%:\џ%pџ Qlџxџ5HџltџѕўџєЫЄ xџ xџaHџ 5Hџ?+xџaHџltџF\џѕџ8џ((џ]ћ/џ5Hџ\ xџ  xџ  xџ  xџ ?%(\џ%((џ%xџўЂHџў§ѓxџ5HџЄedD0=pџxџtџ lџXџHџ8џџЌLТ(lџ%(\џ%H ўЂLџў§ѓHџHџaџќ‹(8џ%((џ%H ўЂџў§ѓџџa№ўќ‹ѕ 'pў%'€ў%'ў%(Рў%' ў%ќfаў%'Аў%ќfрў%№ў%џ%џ"$ џ Ш)Hџџџ6Lџџџ№ўАў ўў€ўpўТ(lџ %(\џ%H ўЂLџў§ѓHџHџaџќ‹(8џ%((џ%H ўЂџў§ѓџџa№ўќ‹ѕ 'pў%'€ў%'ў%(Рў%' ў%ќfаў%'Аў%ќfрў%№ў%џ%џ"$ џ Ш)Hџџџ6Lџџџ№ўАў ўў€ўpўТ(lџ %(\џ%H ўЂLџў§ѓHџHџaџќ‹(8џ %((џ%H ўЂџў§ѓџџa№ўќ‹ѕ 'pў%'€ў%'ў%(Рў%' ў%ќfаў%'Аў%ќfрў%№ў%џ%џ"$ џ Ш)Hџџџ6Lџџџ№ўАў ўў€ўpў L$ < HџџџLџџџ№ўАў ўў€ўpўФ`4Xџ:\џ%lџ"$ lџ dlXџ=tџ)lџXџCxџ:(\џ%(Hџ%H ўЂ8џў§ѓlџlџa(џ`1pџlџ68џ(џ’lpџFфў%lxџcHџ%cџ%ўСџ%ќfјў%lџ'8џ%:\џ%tџ lџўЂ(џь`#єў*Fдў%(Фў%(Дў%Xџ"$ XџўЊЕ/єў)lџXџ68џ(џдў“(\џ%(Hџ%H ўЂ8џў§ѓlџlџa(џќ‹ѕ 'tў%'„ў%'”ў%(фў%'Єў%ќfјў%'дў%ќfџ%(џ%lpџFџ%Xџ"$ Xџ Ш)lџXџ68џ(џдўЄў”ў„ўtў:(\џ%(Hџ%H ўЂ8џў§ѓlџlџa(џ`1pџlџ68џ(џ’lpџFфў%lxџcHџ%cџ%ўСџ%ќfјў%lџ'8џ%:\џ%tџ lџўЂ(џь`#єў*Fдў%(Фў%(Дў%Xџ"$ XџўЊЕ/єў)lџXџ68џ(џдў“(\џ%(Hџ%H ўЂ8џў§ѓlџlџa(џќ‹ѕ 'tў%'„ў%'”ў%(фў%'Єў%ќfјў%'дў%ќfџ%(џ%lpџFџ%Xџ"$ Xџ Ш)lџXџ68џ(џдўЄў”ў„ўtў:(\џ %(Hџ%H ўЂ8џў§ѓlџlџa(џ`1pџlџ68џ(џ’lpџFфў%lxџcHџ%cџ%ўСџ%ќfјў%lџ'8џ%:\џ%tџ lџўЂ(џь`#єў*Fдў%(Фў%(Дў%Xџ"$ XџўЊЕ/єў)lџXџ68џ(џдў“(\џ %(Hџ%H ўЂ8џў§ѓlџlџa(џќ‹ѕ 'tў%'„ў%'”ў%(фў%'Єў%ќfјў%'дў%ќfџ%(џ%lpџFџ%Xџ"$ Xџ Ш)lџXџ68џ(џдўЄў”ў„ўtў`0tџpџxџ4 єўlџXџ8џ(џдўЄў”ў„ўtўP4Tџ:Xџ%hџ"$ hџ dlTџ=xџ)hџTџ hџ'Dџ%:Xџ%xџ Qhџtџ5Dџ%(Xџ %(4џ%H ўЂDџў§ѓpџ5Dџєnџєўc0џћgknџDXџ%(4џ%pџўЂDџў§ѓhџhџa№ў%knџD џ%(џ%tџўЂџў§ѓTџTџ,)hџTџ6Dџџ№ў nџd0џŠŒ0pџxџtџ hџTџDџџ№ў€4P(hџ%(Xџ%H ўЂHџў§ѓDџDџa4џ`#0џѕ "$ м/0џDџ6Hџ4џP(hџ%(Xџ%H ўЂHџў§ѓDџDџa4џ`#0џѕ "$ @/0џDџ6Hџ4џg(hџ%(Xџ%H ўЂHџў§ѓDџDџa џ%:џ%,џ"$ \,џўЂ4џ§Ÿў›)Dџ,џ6Hџ4џ џP(hџ%(Xџ%H ўЂHџў§ѓDџDџa4џ`#0џѕ "$ Œ/0џDџ6Hџ4џ,0џѕ Dџ"$ Dџ T>0џ1xџDџ_(hџ%(Xџ%H ўЂHџў§ѓDџDџa4џ`#0џѕ ,џ"$ ,џ X/0џ)Dџ,џ6Hџ4џєџ"$ фє"$ ф&lxџѕ Dџ"$ Dџ XDџp4(xџ$0џDџ,џHџ4џ џ  9§џџџƒўџџџ„…†‡ˆ‰Š‹ŒўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџfRowNumbers )y rDestination fKeepPassword rLocRange )q  *Updates a data range using Microsoft Query (Gets external data using Microsoft Query@Displays a dialog box to get external data using Microsoft Query 6 ) (g“K)^џџџџrU€‚ƒ„…†‡ˆ‰ŠўџџџŒŽ‘’“”•–—˜™š›œўџџџŸ ЁЂЃЄЅІЇЈўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€€€~~~~~~~~~~~~~~~S IюЫЧд:2а‰Љ ЩA)  фƒŠa Й џџџџџџЉƒŠa Й џџџџџџбˆa Љџџџџxџџџџ )a™й IЁС Ayџџщˆa  џџџџрџџџџ Љ б џџ!) ёб ThisWorkbookSheet2InternalFunctionsExternalFunctionsProjectяРF=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA aџџџџ ‰(РF 3C:\Program Files\Microsoft Office\Office\EXCEL8.OLBExcel yџџџџЁ80РFC:\W95\SYSTEM\stdole2.tlbstdole џџџџЉщHс.E р….`ŒM Д  C:\OTOOLS\LIB\X86\DEBUG\FM20.DLLMSForms aџџџџ‰йXLај-њ[НхЊDоRC:\OTOOLS\LIB\X86\MSO97D.DLLOffice IџџџџqЙhQueryRefreshInternalValidateBooleanArgumentQueryGetDataDialogInternalQueryGetDataXLMStubQueryGetDataValidateArgsQueryGetDataFetchFРFCompilerCompileVBAFunctionNamesCompileXLMFunctionNamesCompileXLMFunctionArgsCompileSummaryInfo кРF№ЫЧд:2а‰Љ ЩA)РFяЫЧд:2а‰Љ ЩA)DРFWorkbook @ Loc TableзРFиРF SelectedLanguage USAColumnStart USA VBA332.DLL ) џџџџ. ИРFЉ айРFЉ џџџџеРF QueryRefresh QueryGetDataQueryGetDataDialog  XLQUERY =XLQUERY! QueryRefreshLocation QueryGetDataLocation QueryGetDataDialogLocation mg00s.addin1 CompanyValueђЫЧд:2а‰Љ ЩA) РFёЫЧд:2а‰Љ ЩA)DРF Worksheet ) џџџџP  ) џџџџO 8 RangeAreasCountRowsColumns QueryTableRefresh ) џџџџ, P РF(DРF ODBC;Жџџџџџџџџ<џџђЫЧд:2а‰Љ ЩA) РFёЫЧд:2а‰Љ ЩA)џџџџџџџџџџџџxњŠ8џџџџJgJџџ#ˆёЫЧд:2а‰Љ ЩA)ђЫЧд:2а‰Љ ЩA)џџІђђњџџџџ4џџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046})•w2$*\Rffff*1232779575пџџџџаўџџџџџџџџџ(џџџџџџџџџџ$џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ $‚ џџџџўџџџџџўџџџџџџџџџџџ3 $ƒўџџџџџџџРџџџџџџџџџџџџџџ3 $џџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh˜@џџџџџџџџџџџџџџџџџџџџџџ0MEџџџџџџџџџџўЪџџџџџџџџxšАAttribute VB_Name = "She@et2" шBast0{000Р20820- C$0046} |Creatabl†False МPredeclaId…Tru "ExposeTemplate`Deriv$eC€ustomizˆd’В€0* pH‚dфProjectQ(@=­ l €)•w2 J< rstdole>stdoleP b%X*\G{00020А430-C 0046}#2.0#0#C:\W95\SYSTEM\_2.tlb#OLE AutomationZжMSF€orms> MSFCrЈmsD}€ s€DD452EE1-E08F-101A-8-02608C4D0BB4DOTOOLS\LIB\X86\DEBUG\FM20.DLL#Microso(ft ‚> €_ ObЏ Library€:ƒ”OffDic„”Of€iдc‚”z€p€P2DF8D04C -5BFAPB-BDE5€”AA€’ 4€2PMSO9 7D ' 8.0ER'ˆТJТrThisWorkbookN2Р+ThTi€XW[k@|o@kРHB1Bњ‹B,BbJ"B +BB“SheeЈt2Ш2ТS@ЂeРJt2dgL@Intern@alFuncAs$’2A&IЂnРГerРaРДЈFu@cРi@96nР=Я9e=Э9hJЮ!B8Х9ExR"Ž‘C"Exn"s/. S*Ђ