аЯрЁБс>ўџ Ÿўџџџmщpћyљ€|џІ žŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџfџџџџџџџџџџџџЋщoTVџџџџІCompObjџџџџџџџџџџџџЄpi35O_Y n`єЮ›ЭЊ`Ž =эSіYФ =эSіYФњ§џџџ  JHj. !"#$%&'()*+,-/0123456789:;<=>?@ABCDEFGўџџџIJKLMNOтQ]STUVWXYZ[\P^_`abcdefghiўџџџсln§џџџ€pqrstuvwxyz{|}~k  !"#$%&'()*ўџџџ,-./0123456789:;<=>?@ўџџџBCDEFGHIJKLMNOPQRSTUVўџџџXYZ[\]^_`abcdefghijklўџџџnopqrstuvwxyz{|}~€ ЏЭI@‡сАСт\pStatistical Services Centre BАaР=гК ThisWorkbookœЏМ=xKX/W!<X@"Зк1ШџArial1ШџArial1ШџArial1ШџArial"Ѓ"#,##0;\-"Ѓ"#,##0"Ѓ"#,##0;[Red]\-"Ѓ"#,##0"Ѓ"#,##0.00;\-"Ѓ"#,##0.00#"Ѓ"#,##0.00;[Red]\-"Ѓ"#,##0.005*0_-"Ѓ"* #,##0_-;\-"Ѓ"* #,##0_-;_-"Ѓ"* "-"_-;_-@_-,)'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-=,8_-"Ѓ"* #,##0.00_-;\-"Ѓ"* #,##0.00_-;_-"Ѓ"* "-"??_-;_-@_-4+/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-Є#,##0\ "Ѓ";\-#,##0\ "Ѓ"!Ѕ#,##0\ "Ѓ";[Red]\-#,##0\ "Ѓ""І#,##0.00\ "Ѓ";\-#,##0.00\ "Ѓ"'Ї"#,##0.00\ "Ѓ";[Red]\-#,##0.00\ "Ѓ";Ј6_-* #,##0\ "Ѓ"_-;\-* #,##0\ "Ѓ"_-;_-* "-"\ "Ѓ"_-;_-@_-8Љ3_-* #,##0\ _Ѓ_-;\-* #,##0\ _Ѓ_-;_-* "-"\ _Ѓ_-;_-@_-CЊ>_-* #,##0.00\ "Ѓ"_-;\-* #,##0.00\ "Ѓ"_-;_-* "-"??\ "Ѓ"_-;_-@_-@Ћ;_-* #,##0.00\ _Ѓ_-;\-* #,##0.00\ _Ѓ_-;_-* "-"??\ _Ѓ_-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР р ѕџ јР “€џ“€џ“€џ“€џ“€џ“€џ`…dSheet1…xSheet2…Œ Sheet3Œ,ЎSSCSTDEVСС€8ќџ ЏЭI@   dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@я7К Sheet1 ЏЭI@ 0  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@я7К Sheet2 ЏЭI@ D  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@я7К Sheet3 Tф‚[У1ННџџ#ˆЖџџџџџџџџџџџџЇ$o(ХиЖYv‹§њ РFІ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџSheet1Iџџџџџџџџ+ySheet2џџџџAySheet3џџџџџџџџџџџџWyThisWorkbook џџџџmџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџИ€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџ0ƒўџџџџџџџxџџџџџџџџџџџџџџ %‚ џџџџўџџџЈџџўџџџџџџџџџџџ %џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€P@џџџџџџџџџџџџџџџџџџџџџџ@˜ 7BпўЪ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџџџџџxџџџџЌАAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’BustomLizD2 ЉTф‚[У1Н Нџџ#ˆЖџџџџџџџџџџџџЉ$o(ХиЖYv‹§њ РFЈ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџИ€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџ0ƒўџџџџџџџxџџџџџџџџџџџџџџ %‚ џџџџўџџџЈџџўџџџџџџџџџџџ %џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€P@џџџџџџџџџџџџџџџџџџџџџџ@˜ 7BпўЪ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџџџџџxџџџџЌАAttribute VB_Name = "She@et2" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’BustomLizD2 ЉTф‚[У1Н Нџџ#ˆЖџџџџџџџџџџџџЋ$o(ХиЖYv‹§њ РFЊ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџИ€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџ0ƒўџџџџџџџxџџџџџџџџџџџџџџ %‚ џџџџўџџџЈџџўџџџџџџџџџџџ %џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€P@џџџџџџџџџџџџџџџџџџџџџџ@˜ 7BпўЪ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџџџџџxџџџџЌАAttribute VB_Name = "She@et3" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’BustomLizD2 ЉTф‚[У1Н Нџџ#ˆЖџџџџџџџџџџџџ­$o(ХиЖYv‹§њРFЌ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}џџџџИ€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџ0ƒўџџџџџџџxџџџџџџџџџџџџџџ %‚ џџџџўџџџЈџџўџџџџџџџџџџџ %џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€P@˜˜џџџџџџџџџџџџџџџџџџџџџџ@˜ 7BпўЪ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџџџџџx‚ƒўџџџ…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉўџџџЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНОПРўџџџТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхўџџџчшщъыьэюяўџџџёђѓєўџџџіїјљњћќ§ўџџџџџДАAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’Bustomi&zD2 ЉrU€€€~| #"б Ј; ™X= А= 0 ќЦ0  0 ќЦp  0 ќЦmodMainџџџџ-a__SRP_3J"џџџџ„x __SRP_2KџџџџџџџџЊЋdlgUnStack8џџџџRч2ўЪg€ € € * € P€ NX€ Ј€ ,А€ џџџџ€р€ џџџџ€€€ џџџџ€ F€ џџџџ" X€ *`€ џџџџ ˜€ џџџџ"И€ џџџџи€ џџџџ" р€ *ш€ џџџџ  8€ џџџџX€ џџџџ€ V`€ џџџџB  И€ *Р€ џџџџ€№€ј€€€€ џџџџ$ € џџџџ€ >@€ˆPА€ DШ   0 @€ :P  € џџџџ<pЈ ш€ џџџџ€ $ј€  $$0<$X@#˜4$и:$€ Lш*'И€ >P>$а<$и:#2$X€ *$Ј2$иB$.$ь(єшџџџџв)2R 1ННџџЖџџџџџџ џџџџџџџџ(џџџџxџџџџ џџ џџMEџџџџџџџџџџпџџ\џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@> џџџџ:џџџџ<|џџ<џџ< џџ<џџ<џџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџ#` 8$  F$и F$ 2#h € џџџџ   € џџџџА € џџџџ"  И € Р € џџџџр bј € џџџџ € џџџџB…$" € H € џџџџ€h € џџџџ,p      Р  а € џџџџр € џџџџ€ џџџџ€ `ш € џџџџ" H€ џџџџ P€ џџџџ`€ џџџџ" h€ p€ џџџџ ˜€ џџџџЈ€ џџџџ" А€ И€ џџџџи р€ џџџџ№€ џџџџ" ј€ € џџџџ  (€ џџџџ8€ џџџџ" @€ H€ џџџџh p€ џџџџ€€ џџџџ" ˆ€ џџџџ € џџџџ € џџџџ" Ј€ А€ џџџџа и€ џџџџш€ џџџџ" №€ ј€ џџџџ  € џџџџ0€ џџџџ" 8€ @€ џџџџ` h€ џџџџx€ џџџџ" €€ ˆ€ џџџџЈ А€ џџџџР€ џџџџ" Ш€ (а€ џџџџј € џџџџ€ џџџџ" € џџџџ € џџџџ0€ џџџџ" 8€ .@€ џџџџp x€ џџџџˆ€ џџџџ" € ˜€ џџџџИ Р€ џџџџа€ џџџџ" и€ (р€ џџџџ € џџџџ € џџџџ" (€ (0€ џџџџX `€ џџџџp€ џџџџ"x€ ,€€ џџџџА И€ џџџџШ€ џџџџ"а€ ,и€ џџџџ € џџџџ € џџџџ" (€ џџџџ 0€ џџџџ@€ џџџџ" H€ ,P€ џџџџ€ ˆ€ џџџџ˜€ џџџџ"  € џџџџ Ј€ џџџџИ€ џџџџ" Р€ џџџџ Ш€ џџџџи€ џџџџ" р€ џџџџш€ џџџџ№€ џџџџ" ј€ џџџџ"€ џџџџ(€ џџџџ" 0€ џџџџ 8€ џџџџH€ џџџџ" P€ џџџџX `€ џџџџp€ џџџџ" x€ ,€€ џџџџ А€ џџџџР€ џџџџ"Ш€ џџџџˆа€ џџџџи€ 0№   08€ џџџџ@€ џџџџ" H€ џџџџ.P€ џџџџ€€ џџџџB  ˜€ ,Ј€ Zи€ x€ џџџџHNX8€ џџџџ€ @P€ џџџџ џџџџ@р Module modMainelрр$ SSC statistical extensions to ExcelџџррG Copyright 2002: Statistical Services Centre, The University of Readingрр& Written by Howard Grubb, Colin GrayerЭр declare all variables]ђP ]ђx р? ==================== Start and Stop routines =================–0р# Run each time the add-in is openedэЖWorksheet Menu Bar$(."эЖChart Menu Bar$(.$oџџ –pр# Run each time the add-in is closedЖWorksheet Menu BarA@,ЖChart Menu BarA@,oџџ рO====================== Menu handling routines =================================–Ар$ Add the SSC menu and its menu items]ђ]ђ(]ђ@]ђX]ђp .A@,р!in case it existsр7 Look for correct place to insert the SSCStat menu itemЌ'6Ќ'8џ 2ў . :%<!>“ 2!@Ж&Windowœр > Remember position of Window menu - position SSCStat before it 8'6kџџр 8Ќ '8џ 2ўШ 6Ќœр4Insert before penultimate item if "Window" not found 8Ќ '6kџџXІ э Dбl 6бFЗбH . :%<!>%B.0 J 0(@р Set up the submenu structureр Generalэ 0Ж&General DбN$L.2э 2Ж&Define Data AreaЖDataAreaDialogShow$L.4э 2Ж&Overview of SSC-StatЖ GeneralHelpЗбP$L.4э 2Ж&Tutorial (PDF)Ж TutorialPDF$L.4э 2ЖHelp on &Data EntryЖ DataEntryHelp$L.4р7 Only include pointer to booklets if they are installedэ 2Ж&Good Practice GuidesЖGoodPracticeHelp$L.4kџџјэ 2Ж&Statistical Services CentreЖAboutSSC$L.4э 2Ж&About SSC-StatЖ AboutSSCStatЗбP$L.4э 2Ж &RegistrationЖ Registration$L.4р Data Managementэ 0Ж &Manipulation DбN$L.2э 2Ж&UnStackЖUnStackDialogShow$L.4э 2ЖUnStack(&Two-Way)ЖUnStackTwoWayDialogShow$L.4э 2Ж&StackЖStackDialogShow$L.4э 2Ж&LookupЖLookupDialogShow$L.4э 2Ж&HelpЖDataManagementHelpЗбP$L.4р Graphicsэ 0Ж&Visualisation DбN$L.2э 2ЖX-Y &Scatter PlotЖXYStackDialogShow$L.4э 2Ж&Category-Value PlotЖColumnPlotDialogShow$L.4э 2Ж&BoxplotЖBoxPlotDialogShow$L.4э 2Ж&Normal Probability PlotЖQQPlotDialogShow$L.4э 2Ж&Density EstimateЖDenestDialogShowЗбP$L.4э 2Ж&HelpЖ GraphicsHelpЗбP$L.4р Statisticsэ 0Ж &Analysis DбN$L.2э 2Ж&Descriptive StatisticsЖDescriptiveDialogShow$L.4э 2Ж&Summary StatisticsЖSummariseDialogShow$L.4э 2Ж &One-Sample tЖOneTtestDialogShowЗбP$L.4э 2Ж &Two-Sample tЖTwoTtestDialogShow$L.4э 2ЖOne-Sample &ProportionЖOneProportionDialogShow$L.4э 2ЖTwo-Sample P&roportionЖTwoProportionDialogShow$L.4э 2Ж&HelpЖStatisticsHelpЗбP$L.4э 0.(iџџЈ–ˆр Remove menu if it existsЩр Ignore errors J . :%<%>B@Zoџџ@І   їЗ bЖ–шр Add an item to a menu]ђрэ Nбl \!>%B.d ^ d(@ `Ж›G ` d(fj P d(Pэ d.LiџџxрY====================== Action routines ==================================================–јЌdA@joџџј–8р Show the UnStack dialogA@n pB@roџџА–xр Show the UnStack dialogA@n vB@roџџh–Ир Show the Stack dialogA@n zB@roџџ –јр Show the Stack dialogјA@n ~B@roџџи–8ЌШA@joџџИ–xр Show the XYStack dialogA@n „B@roџџp–Ир Show the XYStack dialogA@n ˆB@roџџ(–јр Show the Boxplot dialogA@n ŒB@roџџр–8р Show the QQplot dialogA@n B@roџџ˜–xр! Show the Density estimate dialogA@n ”B@roџџH–ИЌ,A@joџџ(–јр' Show the Descriptive Statistics dialogA@n šB@roџџа –8р Show the Summarise dialogA@n žB@roџџˆ –xр" Show the Two-sample T-test dialogA@n ЂB@roџџ8 –Ир" Show the Two-sample T-test dialogA@n ІB@roџџш –јр& Show the One-sample Proportion dialogA@n ЊB@roџџ –8р& Show the Two-sample Proportion dialogA@n ЎB@roџџ8 –xЌA@joџџ –Ир& Show the Two-sample Proportion dialogA@n ДB@roџџР –јЌA@joџџ  –8ЌќA@joџџ€ –xA@Мoџџh –И T$R!VЖ\ ТAРoџџ0 –јЌA@joџџ –8 A@Ш ЪB@roџџш –x р& Show the Two-sample Proportion dialog ЮB@roџџ˜ –И ]€ђј Ш аœр* If unregistered, display the about screen ЪB@rЗ'аkџџ oџџ – Ж$This facility is not yet implementedA@вoџџи џџџџа џџџџ(–h iџџ(р% Returns the path name of this add-inрS Returns blank if not found (ie SSCStatName does not correspond to the Add-in name.zЃ, Щ, €Ж'& ( $R!VЖ\'& р Written by CJG 23/6/04 T$& '$ р' CJG 23/6/04 $ X$~Жœр6 CJG 23/6/04рF If Dir(AddIns(SSCStatName).Path & "\" & SSCStatBooklets) <> "" Thenџџџџ0џџџџ7ЗAttribute VB_Name = "modMain" ' Module HDPSSC statistical extensions to@ ExcelRCopyright 2002: SjServices Centre, The University of ReadingLWrith by Howard Grubb, Colin ayer 0 OptŒˆplicit ' declare all variables*Dim WorksheetMenu As Object„ Char H =ort and€op rрoutinqŽ=Pub€O Sub Auto_Open() €XRun eacPh ti€Ъtadd-sis oyed€ЧЌPHath€пMy(  ъ)(CJG €23/6/04ˆetŒ?= BuiLld@AC("G ЁBGBar"ƒ(S€G B EAFubQ?Close Ђ?cA ˆ?RemotveD, ˜, )'Зy€6hРyžg˜yC>riva@мF0unctСЉ \ByV@дТа\€ЃStr С)IІ‚ˆAdd 3†@> mЎСitТsitem€И@ џ‚{СВ Х…ИР!СNIl ‚ubИI€nsertPo vƒA Integсp§D ja ‰ТL1цAUƒР_р\case €w exРŒ' Look for corru plaєceAiЂ…"abg!ЃТЬ= 0ТjРfj1"FР EСnfI0n Ap‰рon`.Commр,р`sЮ(ЇР`˜olу ŒIfbDa*.Caу‘@Ћ&WindowК"an`@'@member pяe)рŸЃc-'р8bМbe  $( .j…aoIfЅAj +њ УN@ИB%5Ъ'у Є`’ul€•A[aO if "‘Хnot 6unЃvƒn j - 2"Џшт%W=1)f1т.d( _‚@@Type:=msoCoТ5Popup, Bт(:=‹вemporar€y:=TrueфžќSCaCЈ:€D "ш?ПtdЄOF '|1 Only i@ncludeBiuPXr!Qb”с8Рbyі apRt 4„№б'??(ood P ra k0WGuidєesQGpe…€џШ’b‘ њ4'“6ManagePAџ`ІєЅ €‘с@№ipulхa /@MO“o o c Un№cўk Є?/9JЅ @ (&Two-WќayB9D ППџПђf ‚‚ѕ!„uH"“ЏЏЏџЂТ.€aBWT%гН€Graphicу‚Я‘р&ViРsualisпќlпŸZх€X-Y &Sca еr PШlota XYЏ0&mм X&Cp€goШry-рЌue† кјumna///"№Boxp„  Я5MM"&NormЗProbabiЮl‘чQQQПП[OGDaё ьE€ђmЧA0estиё‡_p „/ / "&%(U%Я'ј‹‰Eјs "Е Set MenuItem@ = Addh(SSC,, "&Analysis",  Type:=msoControlPopuˆp) žSubˆ Є,ІDescriptive Statistica"Dialo@gShow"-_SРummary [ise8YOne-Sample t€ˆ"€Ttest), BeginGroup:=Tˆrue-_Two 2€ 2,)[&Pro€portion0ч7Fˆ,P& @?сРЁHelp,Ч‹DƒS[FЄBuildФГ€ЄD‚ End@ Funct@C PrivatЅub RemoveФ (ByVal ExcelAВ As@—rinJgCb'„ mд if it ex РЕsDРлOn Error€ sum@e Next€ 'Ignore eУ Appli‚cЦon.CoГ€ndBars(Ц–)€ТпsСъCaРвon).Dele|te7РуЩ5Х: ћMy%ObjectgX‚С}Naf,м _b ЁvOb€%mC&A‚+ /" 7п ЬeŽ‡ŽButt|onП`Ь ‡E Fрalse)A9bb'a# an 8РЂt8o ab:b‚Diќm C&aЌ"Ћ‚*­"=ФF6.@­(Љя!ЃHЧ .D: A#С0B If *<> "" ThenёЈ.Onц-Ђш џ ‡Тс@ЁA`‡f '=Х  tines ЇгЙWuba РX@ DataE`^yс~(&ЂGetA№ 100AazХ^ЇdUn‡ck'œ$'‚ !Ь the D dЯ@HChe ckReg"dl:gф.РŸWa yпkпnstaќck œ~&’ om"tP УŸLрookup‡ЯN ЭCпubP[ ManageVcrЏ p 2Џ 'X~Y   $?Ќ X`YPlotg ?cВ+ColumnБ__( (зŸ§Bјoxp og$Я7Ьpпdё <QQ?/$Ј6QQУb DeF8˜ƒП=sity  šќim~?;#џ§рGraphРЋOICIў3Ÿ(—(пЎаЎЯ h(­Япмh/tsЯ Э §ВwпF –ŸOДO-sГЗTў-AЗ Uџ§Аџ,ЖџџO$K$Uџџъe_Вoп EпбogOCџGCШ|Pбп}+Sс5ƒ545ˆ5сА‚Area   мџ ёь_qРQˆ‘/ - тG@Iralѕ вІŠвпbгbGoodP$ra€Гceяlp=Ž2 Ž UTu8tor`ŒA,ЂNo`tYetIыqse’Вd End Sub Publich TutorialPDF()lЌ Call apiLaunchFile(AddIns(SSCStatName).Path &№ "\" 2žœС№About4uGetHelp №1030В9ˆ=regCheckRegistrationNumbDerKdlg.№Showš. .a'  the Two-sample Propo’r3 d og+€6 #:rivaќteУ…]ƒgl€Я€!‚ ed As B@oolean„бI€f (Not —{8) A€ј) 8TheР)€' €unРРLered,€2splay;ah scre‡ RР*= TrЬue‚BœIfDEIŸCШ=€0YetITm`ented@РMsgBox "This faci lity Рn@= yet i "&F@АТhMyЋ(M ynСЎTStrinCm' RetuhrnsТ=pСЕ ofРadd-iƒM‡ blank if A$fou A[i€s‡Ш does‚corresфpoРtoд€ .‚/' Written by CJG 23/06/04Ф6€DOn Error GаoTo €NFТёC7 = €Сщ„9ˆшСТExit E""Д х:т "‰*GА  0 ќЦˆ  0 ќЦш8  0 ќЦј  0 ќЦ8  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦx  0 ќЦИ  L $ў €$b L $ў €$b 0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦx  0 ќЦИ  0 ќЦј  0 ќЦ8  0 ќЦx  h8 У_‰УФ3$ў € єџ_Ž8$b 0 ќЦ  0 ќЦh         !">rU€€€ џџџџџџџџ$`§џџџџџџџџџџџ$Љ`§џџџџџџџџџџџ(б`ќџџџџџџџџџџџщ(љ`ќџџџџџџџџџџџщ<!`ќџџџџџџџџџџџ !AYy ;$I`§џџџџџџџџџџџ$q`§џџџџџџџџџџџ$™`§џџџџџџџџџџџ$С`§џџџџџџџџџџџ$щ `§џџџџџџџџџџџ$ `§џџџџџџџџџџџ$9 `§џџџџџџџџџџџ$a `§џџџџџџџџџџџ$‰ `§џџџџџџџџџџџ$Б`§џџџџџџџџџџџ$й`§џџџџџџџџџџџ$`§џџџџџџџџџџџ$)`§џџџџџџџџџџџ$Q`§џџџџџџџџџџџ$y`§џџџџџџџџџџџ$Ё`§џџџџџџџџџџџ$Щ`§џџџџџџџџџџџ$ `§џџџџџџџџџџџ$1`§џџџџџџџџџџџ$Y`§џџџџџџџџџџџ$`§џџџџџџџџџџџ$Љ`§џџџџџџџџџџџ$б`§џџџџџџџџџџџ$љ`§џџџџџџџџџџџ$!`§џџџџџџџџџџџ$I`§џџџџџџџџџџџ$q`§џџџџџџџџџџџ$™ `ќџџџџџџџџџџџ$С!`ќџџџџџџџџџџџ(щ"`ќџџџџџџџџџџџ/nrU€€€€~|  щXYYсS1kС !; сqV™cЩcсcщ_љ 9Z‰†Ё†С†QWй†˜Hl Ctџў’dџ єЦ$CxџSчltџJж§јьў(,џчtџMLџ@џ џѕ џ  џћ/ќўћ'мўџ6,џџ џьў‰ єЉ„&'',џчtџMLџ@џ џ`1tџ6,џџ ѕltџFLџdџѕўў,џUp`џ5ўЪ’€ € џџџџ€ N€ џџџџ€ :h€ џџџџ€Ј€ џџџџ„А€ џџџџ€Ш€ џџџџ"а€ џџџџ€ 2и € 6 tX€ 8pJJЈ€ џџџџј€ џџџџ" € X€ џџџџ€ 2` ˜€ Ј (Ш'и€ џџџџш€ џџџџ"№€ &ј€ џџџџ€ &  H€ @X)˜Ј Р€ @а  € џџџџ(€ џџџџ" 0€ *8€ џџџџ€ &h € џџџџ € џџџџ" Ј€ ,А€ џџџџр€ џџџџј€ џџџџ" € ,€ џџџџ€ ,8 h x€ џџџџˆ€ џџџџ" € ,˜€ џџџџ€ ,Ш ј € џџџџ€ џџџџ"ифtрь(1НJШџџˆЖџџџџџџџџџџџџЏ$o(ХиЖYv‹§њS$o(ХиЖYv‹§њ$$o(ХиЖYv‹§њЎ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџ0р+ Get the ids of the selected column factors ў$ '2Ќ 2т@а 2Ќ œ ў @A>kџџр Set unstack options ю›G 6 B '6j №›G 6 D '6j ђœ 6 F '6 іœ 6 H '6kџџˆkџџ€р/ Unstack according to the specified parameters.р3 Save the values of certain controls for next time.І  ъ ь ю № ђ є і ј њ т ц ф ќ ўA@Pр Get rid of this dialog џџA@roџџ@џџџџ8І  < @ 4 . ь! 6б6 јбL њбNЌ .!N бм AJ џџџџЈ џџџџзЗAttribute VB_Name = "dlgUnStack"D „Bas„0{4D9183FB-C5EE-11D8-B659-0004768@BFDFA}JA4J dGlobaBlŒSpacoFalse ŠCre atablPr@edeclaI"dеTru BEx0pose0TemplateDeriv–Customiz‹D' FPorm ЄsЄ ' Copyright 2 002: €Бtistical Services Centre, @The Un=rsity of €Readingƒ%Written by Howard Grubb, Martyn Byng,€8liBn€ ayerO@ption €|licit Const Defau€ltSheetХU Dim NoOfVars As Int4egУPРGРI S€ub User>@_activ@(@) '9t up d@n @fa box with curNr>‡B Up€ e@ColumnA%s  cmnD@A@ФResРАct `outpu€‚8s if prote"@<@Aforc€€@#Initia liseOТ Ra€nge ref , optGNewBE‚Bookˆore cer$ta@co€nols to their@ evious values9Т ut,Р @^tr# ZSavР}chцkС‰A9, F?ТF€VorBC, _B€4€Р SortѓТ)By ˆCIgn MissџJ(CцЩ "с ‚ Q$lstрCiaa, €ByТ E 0CIfЧšш> 1ЁЎn )CBПр^AІIЁ‹ЊC@~ucЄћ$h€ДсЂр@ыw:.€[uж6cIf3y7By­6CH fѓ‚_7Re_7Џ!ђ5ЋcrGkЋ сRowа(€0 To 0)ˆ­…№'a rowDVПг{ACДў2Пi`KћаŸѕЈdч `VаЖPПЩ$ = HЈ2(А/Р=ŸЯ•Њžа |+, {BAЁ9,8­ ОцoщIrs0thБрЧ‰ppрecifi`nш ayГА6€Дd.Ђ 0 'P[ ex +р oryР messaаЕ.Фal`Лdly8pWџ№}.00Ь8Жb&pf3В˜r' р.ђƒidžsббcˆРva žГаfѓRe0ŽsC€ЙђуœС‡InBдoxЩ„,1’sПџАІЖ4€Sy(‹№stByƒƒ РџЇ ”о d‹…рŒš‹Я sp`ОolаѓѓВ ' Set unstack optionsШIf chkColumnNames TheHn Oˆ =$+ cmnInclude\†Fac8tor&†.CSoќrt€И‡'„ŸХ)ШзBy[ HЂ%……>End ŒIf‚' UЄaccording to the specifi@ed par€Іters.‚Cal l€SР(Vars, colfa@c, RowX, DestinaЭЪpyData.Value,‰…Ф:=Š, _-mIgnoreMiss€G:=ъљŠ, ƒƒF ЪKMaxФZ:=25Ј7 -I*.ƒ)B"Q€™aveBBvС,s o€—ertain€;ntrols for nex@t timeCGuфtSCoDФWСџJBЦЊТC.ТЫ-€@§ƒ,СЛУ… ˆC?ЬJFOƒ„K‹@›Ra ngf@NewBookРShe€et, lst€z0iabl@ ByE„IG@уridGthis dialogUnloa0d MeBv СžSub dlgXYPlot2џџџџoДNstats_functions $џџџџ›щ,dlgStack џџџџБ'modUtilityџџџџСCџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ ,h€ џџџџ€˜€ џџџџ„ € џџџџ€Р€Ш€а„и€ џџџџ" ш€ џџџџ№€ џџџџ"ј€ џџџџ€   '0+@ (P (`€ џџџџ",p,˜(,И,р(,€ B(,p ˆ€ џџџџt˜€ џџџџ6ђА€ џџџџ )ш€ @ј 8 H Xh€ џџџџp€ џџџџ"x€ џџџџ  ˜"ЈР€ џџџџШ€ џџџџ"а€ џџџџ€ Nи€ "()P`€ џџџџx€ џџџџ" €€ џџџџ*ˆ ˜И)Ра€ џџџџи€ џџџџ" р€ џџџџ6ш€ џџџџ‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“ўџџџ•–—˜™šЅœžŸ ЁЂЃЄ”ІЇЈЉЊўџџџЌ­ЎЏАЛВГДЕЖЗИЙКЋМНОўџџџРЯТУФХЦЧШЩЪЫЬЭЮПабвгдежзийклмнопрўџџџ6уфхц7ш§џџџыьэюя№ёђѓєѕіїјљњћќ§ўџј€ џџџџ" € џџџџ)€ џџџџ€ џџџџ" € ,(€ џџџџ€ ,X ˆ ˜€ џџџџЈ€ џџџџ" А€ ,И€ џџџџ€ ,ш  (€ џџџџ8€ џџџџ" @€ *H€ џџџџ€ Px Ш и€ џџџџш€ џџџџ" №€ џџџџј€ џџџџ€ џџџџ"€ & !фДі!Љ!M?1Нй$џџˆЖџџџџџџџџџџџџБ$o(ХиЖYv‹§њW$o(ХиЖYv‹§њ.$o(ХиЖYv‹§њА$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ<џџ€<џџ0<€џџ<„џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџbv2ўџџphdџџџ џџ џџџџ@ўџ`џџџ џџ џџџџ@ўџPџџџ џџ @ўџ@џџџ џџ 80џџџ џџ ф:р”ьRpи,џџџџџ џџџџ@ўџ(џџџ џџ џџџџ@ўџ$џџџ џџ џџџџ@ўџџџџ џџ џџџџ@ўџџџџ џџ џџџџјџџџџџ џџџџ tтPrџџџџp0№ўџџ џџ (pьўџџ џџ @ўџшўџџ џџ ˜@ўџфўџџ џџ џџџџ@ўџрўџџ џџ А@ўџмўџџ џџ џџџџ€ўџиўџџЈ џџџџppШўџџ џџ џџџџ@ўџИўџџ џџ bv@ўџЈўџџ џџ џџ@ўџ˜ўџџ џџ џџ@ўџˆўџџ џџ џџр˜И`x   @ˆџџџџ(И аР џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџа@„˜џџџџlџџџ џџ€ј@„’џџџџ\џџџ џџ€ тPr@„šџџџџLџџџ џџ€ џџ@џџ&t ќ”'§<#N/A њўџџџџ €"џџ џџјўџџџ џџи"ўџш@0fXЮ€ш(єўџџџџ @ўџ№ўџџџџ p%((рўџџ џџ @ўџоўџџџџ @2џџ џџ`мўџџџ џџP2˜и4 PpЬўџџ џџ ш@ўџШўџџџџ џџџџP@Иўџџ џџ џџџџ@ўџЈўџџ џџ џџџџ@ўџ˜ўџџ џџ џџџџE@„˜џџџџlџџџ џџ€(E@„’џџџџ\џџџ џџ€PH@„šџџџџLџџџ џџ€џџџџˆўџџ џџ @ўџxўџџ џџ џџ@ўџhўџџ џџ @ўџXўџџ џџ рTўџџ џџ @@ўџDўџџ џџ (pX@ўџџ џџ @ўџ0ўџџ џџ @ўџ ўџџ џџ џџpўџџ џџ џџ@ўџўџџџџ @ўџўџџџ џџџџр24 xЬўџџ џџ @ўџШўџџџџ џџџџ0Иўџџ џџ @ўџЈўџџ џџ @ўџ˜ўџџ џџ @ўџˆўџџ џџ @ўџxўџџ џџ @ўџhўџџ џџ @ўџXўџџ џџ ˜Tўџџ џџ @ўџDўџџ џџ џџџџX@ўџџ џџ @ўџ0ўџџ џџ @ўџ ўџџ џџ џџџџўџџ џџ @ўџўџџџџ 8Eџџџџўџџџ HEџџџџHџџџџ@˜џџџџˆ ( џџџџџџџџ џџџџ(X џџџџџџџџџџџџА ˆ Ш,єџџџџџџџџџџџџџџџџџџџџџџ,ш ˜ 7BпўЪ€ џџџџ€ џ€ џџџџ @€ џџџџP€ џџџџ"X€ "`€ˆ€€˜€ €Ј€ џџџџАШ€ ,р&& 09H`&xˆ&7€ џџџџ€ И.–и € џџџџ R{ € џџџџ6ђp € џџџџ Ј € џџџџИ € џџџџ"…D.Р € @№ € џџџџ€0 €8 €@ €H €P €X €` €h €p €x €€ €ˆ € €˜ €   €Р €Ш €а € џџџџ€р €ј € џџџџ€   ( € џџџџ 8  H  X  h € Lx € 8Ш     %8  X h  p x € џџџџ € € Hˆ а р №  € . @ P  h  €    € џџџџ Ј  И € Ш ш € "Ng0‰Xˆ&NdЈ0‰(€ џџџџ€ 8ј0 H%h ˆ€ џџџџ€ ˜"HИ€ џџџџ€ р>ј€ џџџџ€ Lc(€ џџџџ€ NxШ и€ џџџџ№€ џџџџџџџџXр Form dlgXYPlotџџрG Copyright 2002: Statistical Services Centre, The University of Readingџџр& Written by Howard Grubb, Colin GrayerЭџџ`]ЖColour Gradationђˆ t]ђА ]ђ]ђи ]ЌЌђ(–˜oџџ–ир Initialise the listsџџџџ мA„ ўЗбA@ ` \B@^ \A@џџџџ bA@„ fЖData Points only hAdџџџџ fЖ Lines only jAd А fЖLines and Data Points lAd fЖ Curves only nAdџџ fЖCurves and Data Points pAdр< Call AddChartTypeToList(cboChartType, "Bubble", xlBubble) f R hAdЌ f(r р т ф цA@оІ t т ц ф f b \ ў v xA@ш z!|œр9 Workbook is shared - must create chart on a new workbookЗ ц(З т(З ф(kџџoџџˆІ – ~ѕ dC@^ ‚5„Ќ +Xqџџ8oџџ0–РрH Check that the number of selected items in the lstYvar box is non-zero,р If so enable the OK button b$ 'V VЌ  (oџџ€– \!rЌœЌ'Tр1...n selecteddџџ@ \$ 'Tkџџ(oџџ –@ v! ў(oџџ–€ ў$ '2oџџр–Рр& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџP–р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџР–@р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџ–€ џџ!(A@joџџ№–Рр Cancel button has been clicked џџA@roџџЈ–р OK button has been clicked]ђ@]ђx]ђА]ђш]ђЌ TсŽ8Ќ VсXр& Get the ids of the selected variables \ ŽA> b A>ЌЌсx v 2ЌœЌ 2с˜ ў A>kџџp f!dЖ Data Points„Ќ'’р Find the output rangeІ $э ц ф : рЖXYPlot$”.. .А›G|jІ     Ž  . ь! f!d Rб˜ ’б’ xбšA–І t т ц ф f b \ ў v xA@P џџA@roџџ@І %+їЗЗЗ– р9 Plot series on a graph from stacked data (for filtering)]ђ`]ђ€]ђ ]ђР]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИр Dim ByColour As Boolean]ђа]ђ ]ЌЌђ@ ]Д&t ќ”'§<ђx ]Ж#N/Aђ р Find the output rangeэ ..ž Ž‘'T ‘'V ‘'2 2Ќ œрF Factor(s) specified. Get their names and set ByColour appropriately.р1 NB ByColour doesn't make sense without a factor.џ ІўЌ 2’ ЌЖ›G ЌЖ,'Ќj Ќ І$$О'Ќџ ІўШdџџЗ'˜kџџ€ ˜œрB Do not use factor to unstack, but carry the factor values across.ЮЌсДР ЮЌсЖр Ќ$Ќ+Жdџџ№р( Unstack using the factor, but no carry.Ю 2сД џ ІўЌ 2’ І$ І+Дџ ІўШЮЌсЖ kџџX VЌ'В TЌ œр An X column is specified.Ќ$Ž$О'Јр Unstack the Xdata by factorэЌЌ  %ФЌ А  %Ф$0.ЄэЌЌ ž%ФЌ Ў ž%Ф$0.ЂkџџhэЌ Ў ž%Ц. І   Д Ж   œ В КбРЗбТЌ  !N бм $J 'Ар2 set up string of Y column names, comma separated.џ ІўЌ V’ ІЌ ›G ЊЖ,'Њj Њ І$$О'Њџ ІўШр Choose default chart type f!rЌ›GЌ f(rjр Hide the dataЗ ž!Ш!Ъ(Ьр Produce the chartІ f!r$X Ђ Є Ј Њ Ќ ˜б˜ ’б’ šбšAЮ рG Replace temporary small number with #N/A to get rid of spurious pointsэ ž!Ш.ž К М žB@аoџџшџџџџрІ  Ž Д И ž œ В КбРЗбТЌ ž!N бм $J 'Ўџџџџшџџџџ:ЗAttribute VB_Name = "dlgXYPlot" " €Bas€0{4D9183FF-C5EE-11D8-B659-0004768B FDFA}JAEJ dGlobal!‹SpacoFalse ŠCreatablPre declaIdдTru BExpose0TemplateDeriv–CustoHmiz‹D …'Р Form †Ј ' Copyright 2002: Statistical Services Centre, T he Un€Arsity of R@eadingƒ%Written by Howard€ Grubb,2linayerOption A€zlicit Const strByColour…J"DGrad@%onРg Dim NoOfFactors As `IntegХXVaTYRCha€rtTypeLР>(0 To 6)1J P_a Sub chkTr end_C0k(т)A0EndС‰ PUser^_€+i†vC 'Р-@itiali€ВtC€Vts €CallBСžs(cшmnD€˜Aš€РˆPutРFumnТ€?o.box l@stBy, G:=Уš@ РXvar.AddItemР DummyAТџкc VТ0РVBTB((cbo†, "A5 Points only", xlXYScZaIrc_ p@S"8Lin UтNo€Markers_ ї%A C aр:шKBCŸ ˆ CurvSрmooth?BTь(я„ Zу `'РAŸ*‚*ђBРwleBC_Gˆyа:).aInd”ex ~0ЇHInхcOutputRa€nge ref0, opC"Ne@wSheet…BXookG €eрЃretrols ёуЪSav G aŒ }+._" )@@k_,џaoaep „Ф‚…‡@If ActрЈWorkbр.MuHltiA…Ed@nJgA­ne ' х 0is s ,€Р- вmО cЯe’˜@h a new >wф %рР#Ё.Vxalu!е&ƒ Х.ќEnЁЧша€уЅ+RЩAŸIf‚ є ЮBр• З$2, Iƒ ]Byр TexЪtСYSƒngПсsCodeH]А," рWith АТА?6RqEVKт7+Count - 1)џP+БВсТпрїd1#рX_` -!aA 20yheck that@e numberбvsel(ectРi \s Ѓ0ubcstYА с_№!non-zer o,дР&so e#’ђOK `–toWѓ%Ёtс+s@ N’S T(„-3?btnOŠKи(‡> 03ў џїЁ1їrрђ а ?`БK@ 0Ё#}= 01'1...ьn 5вEв™I C Ф+џ Byп   By.ViјsibтŸ?#6ђџћїёhMдA …ф= o ByŸЋ‰Е<§Ъ 'А–Q€E3TP˜@has be ›ch№Ї!r' Make %ok naАИС%сelabelŒ vЂtxtхIчбˆиЧ‡bl/&Ÿ” ЕG, `‚QsџQ_Б`  бV  Tї  Л№%l $  Ёџ СX —^Pџ џ џ in4, sinАЫaaТcann\ot`€tЁd_mўeXЩO?0ta№CHelp'bG„etQ Me.qsЁ`Р]IDТПДCТa lBut@L<лЃN ї-qКeЃВРUnloadpŸџйЛRO,іSяБЛ1ШТJо(ФРЁЁZsЏЁ?ƒ?ПБєЋсk#le–aЃ ЁD€inвЯс>T 0Re1 џ‚ЭvQ“DѓS іaѓL' 0rcid@КfыЂEW pgi!ƒiЫБiœInudqV, т7ѓ’Ї!Шs6б, еЖYvars) ReDim Factor(@0 To 0РIf chkBy And NoOfAŒs <> œh|en~„\˜JCall ItemsInBox(l`stBy,y%E iIfVMarkers = (InStr(cboChartType.Text, "Data PoРints")—m!C' FiQthe output@ rangeSet Desti@nation€3OR(optNewBook, !ƒShee9tx@tWorksNРame, _'€o1ref-€ZXYрPlot"U€В CIsЕthing T€А Exit№ Sub2ЃNXYBySeries(Ь, XVЉ€ъ, ю,‰n,фCopy˜.Valu .ByCol`our:=ЯY€Fs4trE)K<„i:=KTrendlрine:=€’BC=B2utSaveControls џƒEТ\DKVbЩƒK–вY@B, XК?š‚ГТB‚"!Un@load Mƒ†  СЁ] Pub(lic` ]() As Inteјger‹!ЭƒBgш ‚qŸш ‰‘Р$ФO™ЇBy@A хB ^lean‰Op!fal уУ%CрDFals,K­ џŒФFсl‚8ЁKЅI`K' ak sc рza graph from st€acked dс†(for filrt`ng`BAЁX+Q)ІYКXiumМnsЁ)B0ч6idHЦXС‹StrџРЧсТ Ѓ€ДВїI­ сYёXQ‚a•C‚ DAрsLabe € W„Pј '€>с1&L‰dі рbQеYq[С0„š_?Яы^тж^hDф Choo ZdefauЬltз@ы tPыђ€šьListInшdex€-ф 0"B' HidžeВ^a?2ћ-urазtRegрэ.EntirАж!G.HiHБdden = True @' Produce the chart\Cal€l MakeCH(TypeLi@st(cbo ."Index), XColumnаs, Y_žоС XName%-FactorBy:our:=  , CMark ers:=,кendline:h=Tr )~'@ Replauemporary smtnumber with #N/A to get rid of spurious point s&SXDes€tinatioЌ! .CurAtRМeg‚ …DS?BN?, NA End Sub р$ this is default (arrays start at 0)–]ђ€ђ˜ђАђШр7 Nrow = x.Rows.Count ' need to consider input as arrayр Ncol = x.Columns.Count ж к мAо ж$р›GzjЮ кЮ мстр output is same size as input иЌœр) straightforward (natural) log (of array)џ ІўЌ к’џ 8ўЌ м’ І 8$ж :%ф ІЌ 8Ќ +тџ 8ўШџ ІўШdр/ a power - note no checking for range of lambdaџ ІўЌ к’џ 8ўЌ м’ І 8$ж иЌ  и ІЌ 8Ќ +тџ 8ўШџ ІўШkџџр т'дiџџа–р1 Compute slope of line y=bx (i.e. through origin) ш :%ю ж :%ь'ъ ж :%ю ж :%ь'№р0 each bit works separately and returns an array,р" hence need array operations below ъ № :%ђ :%ь'цр" above is array version of Num/Deniџџ –ˆр9 Compute intercept (a) of (3 point) resistant line y=a+bx ш ж$ј'іЌ$і'єр want first element of arrayр4By default arrays start at 0 (use Option Base 1 o/w)iџџШ–р5 Compute slope (b) of (3 point) resistant line y=a+bx ш ж$ј'іЌ$і'њр want second element of array??iџџ(–ˆр@ why can't we use Application.Offset(x,start,0,finish-start,1)??Ю  ў Ќ с@]ђHџ Іў ў ’ І$ж І ў +џ ІўШ 'ќрD PartArray = Application.Offset(x, start, 0, start + finish - 1, 1)iџџ–`р4 find the median of part of an array x(start:finish)Ю  ў Ќ с]ђ џ Іў ў ’ І$ж І ў Ќ +џ ІўШ  :%'iџџ0–8р( Compute (3 point) resistant line y=a+bxрD use RSlope and RIntercept to extract slope and intercept components]ђИђаЮЌђшЮЌђ ]ЮЌђXЮЌђЮЌђШ ж :%' Ќ ЌЌ+ р" how many in first and last groups ЌЌ$  Ќ+ р how many in middle groupЌ$ Ќ+ р how many in end groupЌЌ+ р  where to start first groupЌ$ Ќ$  Ќ+ р where to start second groupЌ$ Ќ$  Ќ+ р where to start third groupџ ІўЌЌ’ ж І$  І$  І$  Ќ $ І+ ш І$  І$  І$  Ќ $ І+џ ІўШ   :%'   :%' Ќ+ір why start at 0?? Ќ+і і'јр; note that returned value is an array of two (3??) elementsiџџ`–рA fit a resistant line y=a+bx and return the fitted value at new_x ш ж$ј'р* this function returns parameters as arrayЌ$Ќ$  'iџџ – р? Converts a range or array parameter into a 2-dimensional array $ œрA Parameter is either a range or an array (possibly 1-dimensional)ЩрIn case we have an array !'рConvert range to array Ќ‘'кЩ"р In case of a 1-dimensional array Ќ‘'мdџџPр( Parameter is not an array - return nullЗ'kџџ|џџЃ"Ќ кЌЌс$`џ ІўЌ к’р- Copy from 1-D array into temporary№Œ дАџџџџ“ "1НвРџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(<џџ<џџ< џџ<џџџџџџџџџџP д`џџџџџџџџџџџџ@ џџџџŒIƒжџџџџџџџџ џџ`€sGiƒиџџџџџџџџџџџџџџ„`„Іџџџџџџџџџџp`„8џџџџџџџџџџ`„кџџџџџџџџџџ˜•E`„мџџџџџџџџџџШ р цˆ`џџџџџџџџџџџџH џџџџ ŒIƒшџџџџџџџџ џџh€Iƒжџџџџџџџџ џџџџџџ€ є`џџџџџџџџџџџџШ џџџџŒIƒшџџџџџџџџ џџш€Iƒжџџџџџџџџ џџџџџџ€ј њˆ`џџџџџџџџџџџџH џџџџŒIƒшџџџџџџџџ џџh€$Iƒжџџџџџџџџ џџџџџџ€rt a ќ``џџџџџџџџџџџџШ џџџџ ŒIƒжџџџџџџџџ џџш€er iiƒўџџџџџџџџџџ€ = xiƒџџџџџџџџџџџџџџ€Aо( `„Іџџџџџџџџџџр 8`џџџџџџџџџџџџ  џџџџ ŒIƒжџџџџџџџџ џџР€of aiƒўџџџџџџџџџџр€iƒџџџџџџџџџџџџџџ€H5M `„Іџџџџџџџџџџ ena ј`џџџџџџџџџџџџx џџџџŒIƒшџџџџџџџџ џџ˜€œIƒжџџџџџџџџ џџџџџџ€@„Іџџџџџџџџ џџT@„џџџџџџџџ џџ„ џџџџџџџџ „ џџџџџџџџPing 8„џџџџџџџџˆe bop „џџџџџџџџРЈ „іџџџџџџџџј choр  `џџџџџџџџџџџџ@ џџџџŒIƒшџџџџџџџџ џџ`€optiIƒжџџџџџџџџ џџ€€I MIƒџџџџџџџџ џџџџџџ€invi оџџџџ`џџџџџџџџџџџџрџџџџџџ„iƒџџџџџџџџ џџ€!(iƒкџџџџџџџџџџ € Ciƒмџџџџџџџџџџџџџџ€d@ џџџџ8џџџџџџџџџџџџ џџџџˆ`ˆџџџџџџџџ0ƒвџџџџџџиџџџџџџџџџџџџџџ%џџџџxџџџџрџџџџшџџџџ№џџџџј8џџџџџџџџџџџџ џџџџˆ`ˆџџџџџџџџШџџџџ@ џџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ 7BпўЪ€ € џџџџ€ N € џџџџ€ p€ џџџџ€ Z€ 0№€ 2 € *X€ &ˆ€ 6А€ Bш€ &0€ X€,`€ џџџџB €˜€ џџџџ€ >И€ ј0:H>ˆШр2ј 0 @8Pˆ <И ј  (€ џџџџB 0€ 88 p € 6А€ (ш € (0X€ џџџџB `€ @hЈ0Р€ :№0€ џџџџB 8€ <@€4˜а€ џџџџB и€ Fр(€H€ џџџџPh ˆ˜€ J №€ џџџџB ј€ : @ €` € џџџџh  €    А Ш € џџџџB а € .и € J €&X €&€ € џџџџЈ FР @ 0H 0x BЈ B№ 8 :P :  а р ј & 8 JH ˜ € џџџџB   € HЈ B№  8X€ џџџџ" `€ Fh€ џџџџ А€ HР"(0X*h˜Ј€ .Арш№€ џџџџ€ј € 48€ 8pЈ Раи€ џџџџрџџџџ№р Module Stats_Functionss\рG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Howard GrubbрT This module contains a few functions for alternative forms of regression including:р* PowerTrans - Box Cox power transformationр+ ZSlope - regression through the originр# RIntercept - intercept of res lineр RSlope - slope of res lineр/ Written by Howard Grubb, October/November 1998р< Department of Applied Statistics, The University of Readingр http://www.rdg.ac.uk/~snsgrubbрЭ 2-D arrayр1(NB Redim Preserve won't change no of dimensions) І$ ІЌ+$џ ІўШ $'х oџџџџџџџџџџ<ИAttribute VB_Name = "stats_functions" ' Module JShFh 6Copyright@ 2002:Histical Services Centre, The University of ReadingKWritten by Howard GrubbThis m‰contains a few ­ for alРternatfmsgregressв incl ut:_PowerTra&- BPox C€p –t €(m€%on€ZSlope - )throuPgh t€oo€†i‚RIn€Dcepxt -€:…€zE Pline)R‰)s‚/Œ‹, October/Novem 1998)Departm€К}Applie dЭsšФ' http://www.rdg.ac.uk/~snsgAƒc' Op‡ Base 0 '@>@g€default (arrays €“rt at 0)qPubPlic Х G_(@x, ByV@Lambda As( Do€ e `Dim iССTg er, jJNrDow col ( AF  = x.Rows.Count€/neРGto –sideђr€kpuР-@˜С1CAAColumn Call €Make2DAС c3, N 0 If IsNull(x)Тn E˜xit†BСRe9hRes@P(Ш(o,ut$@Xsъsiрze asƒ)@Z(N=РZ'€_r.aч@БТг(РХural) log N(Mт4# F giс€€1 To%! ]нj@ xЂ i@\12- 1) bNcg.Ln((x(i€)ф РNext jЃb2iaEl I€a Ёp- no “nр2pheckр„|Рrgњe[l"EЃ‚Ф= Ѕ ^ D*‚N/Єу vnd@= Š шŠ=„$ E€e_бaу‹(y, x•@%'`‘m >e Ц‚† y=bx (№i.e.РnƒŽТ+ШNumь/MMсI)2тpose(y)gc lЏ= Љљxф' each Тb Ywork~A€ately a  returЕn "M,AihenceV bn‚ €ЊrbEsР belowA,d­KQ@,+InaЪe(DenL' a:b`Ђ Рe "Юon{F€/РŸ1ЧЗ2i‘&Л(a)Ё (3`Vе )РТsрпaРŠ„5Аa+bx€ОfР$НЂAL€ПЅ `hХ=сQР(0)awСfirst eleЧхЙBр(By Х­B1Љ­ (u`iЉД1 јo/w D}Pѓh/3(м(bяяяn &•&'oІC' Ђse%XdО??пPrќiv`&ЈdoЦW Š`g dцbFinisha Phy ca€n't we љ/OffsetА\ЁBl,0,f2-у\1)a PA[xw(эD-Ёv№+АPЁџЩk115Kг 0WѓЁќ qUтAUPTP {”GSPE ?с5 Y Сi# 0,zь+ Г S\1Pn"§РMedianЁ/#  `dPKe ^mтЁ3‘qa$B єx(т :# “q#яO"O Fm Ohrt(F Ё(~i2Їiзр9ƒ(џЂ 0ol*а}Щ?7^Dюt2Ђр^D'*Ф3БU‡јЅ ‹uractДbёGJcomponр sБ%’, n Шl(3€\ns`˜ЩEmxтmybѓKь(2’!nЌТ”аВl(r€№7((nQs/ 3AMhšmxanyР‹P'БMС l*a@Ngаlp2 nl €№n)2 * ‡№bBЩmidd`ЩB4=Пin VeАh‡sУ 1!Vh№ere №2' ™Ў2‘7р+Іw[їtKi“sQ b`сFЪthird VЅ*Œ3 iїї'б6рisРтpЛAŠDy№+РHyРўsPdH—.уШSkw2(m@m‰ њ aUr’Э‹vЩ„#§m=ˆУWSёСгTДљР= R 43 уs`‚Ёth€†рЛvpalue"…Dр­two (3??)Eeа%?:?:1:Fitcbp0ew_™|aп1zOoјŽN tf € юnAс € sА š@ §а sІь ƒ“аQПАуї ШжШQgs$ ƒќ+ ’Р3гПГSub ВMake2DArray(Data As Variant, Nrow@Intege"r@col@) ' Converts a range or aЄ parameter into>2-dimensionalHDIf Is‹) Then fPLs ei,thV qnt(possibly 1 m­IOn ErrЃResum@e Next 'In case we haveœ a„(A= Р.Value€~'€„~t~Ѓ=€ UBound‚В, 1FGoToЮ ƒЧ+†Fof€›Šd[ˆ›€NЪ /2/EHlse…B' ŠŸnot†o - return null D;N…End IfBExit Sub -:BReDim €temp(1 4/?€;Ф @ BA@шoџџH–XЖFirst ~B@^ retЖSecond ~B@^ray ЖThird ~B@^ј F ~(roџџр–ррR Variable list has just changed, so check whether the OK button should be enabled. ќ$ 'ж жЌ  (oџџP–  B! &( B! .( B! J(oџџ–` 2 4( 2 *( *!œЌ *(rA@NkџџИoџџА–  6 8( 6 ,( ,!œЌ ,(rA@RkџџXoџџP–р]€ђ ]ђ8 *!r'V ,!r V›G T ,(rj .!r V›G T .(rj V'Toџџи–P]€ђ]ђЈ ,!r'V *!r V›G T *(rj .!r V›G T .(rj V'Toџџ`–Р]€ђ]ђ .!r'V ,!r V›G T ,(rj *!r V›G T *(rj V'Toџџш–0р& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџX–pр% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџШ–Ар$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџ–№ џџ!(A@joџџј–0р Cancel button just been clicked џџA@roџџА–pр OK button has been clicked]ђАђШђр]ђј]ђ]ЌЌђ0р Find the output rangeэ ц ф : рЖStack$”.^ ^А›G|jр& Get the ids of the selected variablesЌ жт<€ ќ <A> &$ '`р* Get the ids of any selected carry factorsЌ `тd  & dA>р Set up order of columns *!rЌ+b ,!rЌ+b .!rЌ+bр* Call the Stack routine to do the businessІ  < d ^ ь 2 4 6 8 : < > @ bбbAf І    0 ь т ц ф ќ & 2 4 6 8 * , . : < > @ BA@P џџA@roџџШџџџџРџџџџMЖAttribute VB_Name = "dlgStack"  јBas|0{4D918403-C5EE-11D8-B659-0004768BFDFA}J3ACJ dGlobal!ŠSpacoFalse ŠCreatablPre declaIdгTru BExpose0TemplateDeriv–CustoHmiz‹D ‡'Р Form Љ ' Copyright 2002: €Жtistical Services Centre, The UnBrsity of Readingƒ%Written by Martyn Byng,€1lin€ Grayer€Option €z licit Dim NoOfVars As InhtegC P@=@? Sub User1_activ@„()A '@+@t up tР(l@0 boxes B РCall@itrs(cmnD@lAРm@РPutРColumnТ€ oLР lst@$iСTBZ Car ry, FР&or:=Уy€BFillOrderBo`x cboТ!,Œ 0У, 1—РRow, 2Т@Initia@@eOutputRa€nge r8 ф„z A Љ1НЇџџˆЖџџџџџџФџџџџГ$o(ХиЖYv‹§њ[$o(ХиЖYv‹§њ,$o(ХиЖYv‹§њВ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ<џџD<џџ0<џџ<џџџџџџš0{4D918403-C5EE-11D8-B659-0004768BFDFA}{4D9183AC-C5EE-11D8-B659-0004768BFDFA}(%%џџџџ иX`џџџџџџџџџџџџџџџџџџџџџџ” (р`џџџџџџџџџџџџ˜џџџџџџ ”)ƒџџџџџџџџИР€$%iƒFџџџџџџџџџџџџџџ„? C  `џџџџџџџџџџџџџџџџџџџџ џџ” H``џџџџџџџџџџџџџџџџџџџџ$џџ” L `џџџџџџџџџџџџџџџџџџџџ(џџ ” Pр`џџџџџџџџџџџџџџџџџџџџ,џџ ” NP`џџџџџџџџџџџџџџџџџџџџ0џџ ”€р„Tџџџџџџџџџџ`„Vџџџџџџџџџџ RР`џџџџџџџџџџџџџџџџџџџџ4џџ ”€р„Tџџџџџџџџџџ`„Vџџџџџџџџџџ X0`џџџџџџџџџџџџџџџџџџџџ8џџ ”€р„Tџџџџџџџџџџ`„Vџџџџџџџџџџ p `џџџџџџџџџџџџџџџџџџџџ<џџ ” "А `џџџџџџџџџџџџџџџџџџџџ@џџ ” $№ `џџџџџџџџџџџџџџџџџџџџDџџ ” &0 `џџџџџџџџџџџџџџџџџџџџHџџ” *p `џџџџџџџџџџџџџџџџџџџџLџџ” ,џџџџ`џџџџџџџџџџџџџџџџџџџџPџџ##”`„Іџџџџџџџџџџoss.`„Zџџџџџџџџџџс`„\џџџџџџџџџџ+ „^џџџџџџџџ( U%`„`џџџџџџџџџџ no „bџџџџџџџџ` Hhˆ€ўџиџџаџџЈџџџџџџџџ%ўџџџџџџџџџџџиџџџџџџџџ %b€жџџџџ4џџџџ@џџџџџџџџџџџџШАџџџџџџџџрџџџџ P0pр№X0pџџџџџџџџџџџџџџџџџџџџџџџџР `џџџџШƒўџџџџџџџџџџџџџџџџџџџџџ‚ zџџџџўџџџџџўџџџџџџџџџџџџџџџPџџџџјџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџpџџџџиџџџџџџџџџџџџаЈЬTџџџџџџџџџџџџџџџџџџџџџџ 8˜ 7BпўЪН€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ ,h€ џџџџ€˜€ џџџџ€ € џџџџ"Ј€ џџџџ€ А а р№€ џџџџ € џџџџ0€ џџџџ(fH€ џџџџА€ џџџџ" И€ џџџџРи№ € џџџџ€ џџџџ" € X(€ џџџџ€€ џџџџЈ€ џџџџ"А€ џџџџИШи€ џџџџш€ џџџџ"№€ џџџџ ј   (8@€ џџџџH€ џџџџ"P€ џџџџ X h x ˆ˜ € џџџџЈ€ џџџџ"А€ џџџџˆИ€Р€ џџџџ Ш и ј€ џџџџ € џџџџ"(€ џџџџˆ0€8€ џџџџ @ P p€ џџџџ˜€ џџџџ" € џџџџˆЈ€А€ џџџџ И Ш ш€ џџџџ€ џџџџ"€ , € џџџџ€ ,P € € џџџџ € џџџџ"Ј€ ,А€ џџџџ€ ,р  € џџџџ0€ џџџџ"8€ *@€ џџџџ€ Pp Р а€ џџџџр€ џџџџ"ш€ џџџџ№€ џџџџ€ џџџџ"€ & 8H€ џџџџ"P€ "X€ џџџџ€€€˜€ €Ј€ џџџџ€ И&и€ џџџџ€ ,@Xh€ џџџџ€ 0xЈР€ џџџџ€ а№  € џџџџ€ 08 Jh € џџџџ(fИ € џџџџ € џџџџ0 € џџџџџџџџ@ р Form dlgStackџџџџрG Copyright 2002: Statistical Services Centre, The University of Readingр% Written by Martyn Byng, Colin Grayerstaef0, opƒBNe@wSheetBXook‡e•rˆeCoРolsA‡ ckSavР‚chіkСŽƒ0_ Р:ƒЭїЬHV,YO € ‰RckЃ txtЂљС4, ee$ CУ- J.0eх‚)oMatch"Omi€%@ `TraiР[Р\€Ђk! EМndWUiY)B(ЁBAР^Combo`,‰ gVaVdexшaЅ]@.AddItem "First`—`/ъSeco„ndThirшщ]In = dруі(7_ChЁKp?' …e "phas jР’@5Сd, so`eck wheurЂuOK РОt ‚shoul€d be enand.c)ЂЦƒ= NumberSelРected((z€btnOK.EcE@Ў(f> 0C гіХ8_C “kaТƒ€ Ђ;.VisiЃН}%.@5aК` IlўbУ NљfclрSeЋ &bЅСkљIКf€ГtЪ–Ц`Тn‚ џЈт ЩJу“,ЄG‚adќIfЂ С_рт пC;/sб?П kУџU#ПЙœ,Прi§т_.пиcџџ CйДж)€0{ Olžd“<)t€тuewПяАB€`У=[f RџаЬi6af$‰џU =Б0P ]кџХ@?хRO%E%ta*oo…oT‹oџsўtMО3oa„njџˆOd O@E кХПOЏmbšE"А*a*џW5 Xч6эя'> ж4/taџ >/РOРvOOяBE•‡OP&'PД` Иž ƒžPБЕЁwbeАИ\chХZb ' ЙkТeРБok nAжaЎaŠlabel vУmЂPdWorkўb0ЁLUІ­Pl/’аиЏПџ ѕ pтЇ, ` aўsЁЉЋ  a   ч л okOpл’=џ  СЎ  2 3in4а”inPщnewуcan(notб“rр“meђd_meшnДц o%Ž7TTР–HelFp'bGetQ Me.qФextIDТПАГSub btnCancel_Click() ' Ј button just€ been c˜ed˜Unload Me End   PРrivateО„OK Ж' OKЌhasUZDim i As Integer, k1 jun 3OuРtRange,NoOfCar0riesIrder(0 To 2)  ' Fi€rthe ouРtput r5‚ аSet †==€@(optNew@Book, ƒSheet, tx@tWorksName, ref‚, "Stac$k"ЧIf‡-Is Nothing Th€ЧExit7МлSGFRid s of selected variables ‚ReZVars<(1>IAN@Call ItemsInBox(lsцtР B, B Т Y= NumbernS„С `yԘ 'B +any +cРky facto~r ,‚kH!-B,9@ЗrrФ!„!pup oMcolumnOУ†) = cboBData.ListInXdexТC 1I FB.в ™GRow OD%‚]Сo‚ƒ rРine to doбТubussУ)B -B (d„9,, _Т@Š€chkCШopy!, €џЃ SЂЃReЃтVCƒУl Match 8OmiЃ\РTr8ail@W@A*:=b&щAutSaveControlsў Ђ! Чi@Рjџфflm V€A Eџп к Ё+E€ЄE(ХH'?‹2!hk(ngџ#"db:‚шБ B*ГR1*#229*\R0*#13*\R0*#fп 0ўЪЪ€ € џџџџ€ N€ џџџџ€ :h€ џџџџ€Ј€ А€ џџџџ€ џџџџ€ DИ€ € џџџџB… € L8€ Xˆ€ џџџџ€р€ш€№€ џџџџ ј€ :HPX.S`€  АР'Ш€ р ј € @ X€ ThРШ€ $а ј€ B'Pp x€ џџџџ€ џџџџ"… ˜€ џџџџ*А€ џџџџр€ џџџџB ш€ B№€ "8€ џџџџ€ `€ "€€ "Ј€ а€ и€ $ј€ € (0€ 4X€ "€ 0И€ ш€ ј€ € ,0€ 6`€ џџџџ€№lд(џџџџ3?71ННџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 8џџ0> џџџџК џџџџ:џџџџ<$џџLџџџџ”џџџџџџџџџџџџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<џџџџџџј И+j№`џџџџџџџџ0мўk@џџџџ## Œiƒlџџџџ џџџџ`„iƒnџџџџџџџџ€‚џџџџIƒpџџџџџџ џџџџџџ„@џџџџ`„tџџџџbџџџџџџџџџ`„vџџџџ`џџџџџ`„xџџџџ^џџџџџ j€`џџџџџџџџџџџџ 0џџџџџџ0„Iƒ|џџџџџџџџ џџX„ strinIƒ~џџџџџџџџ џџџџџџ„Helim+„ `џџџџџџџџXФўkРшџџ##6„)ƒўј џџрџџџџ€age%%`„†џџџџtџџџџџј`„Іџџџџpџџџџџe en+Ј`џџџџџџџџ8јўk`ˆџџ Y„)ƒ’џџџџ џџ€џџџџ€Ќ%%`„Іџџџџtџџџџџg sp ”@`џџџџџџџџфўkш џџџџ dŒiƒ–џџџџџџ џџ€vg iƒ˜џџџџџџџџџџџџ€iter`„Іџџџџjџџџџџthe œ€`џџџџџџџџџџџџ џџџџџџџџџџ „„+ЂP`џџџџџџџџИ дўkРџџџџŒiƒЄџџџџ џџџџр„n thiƒІџџџџџџџџ„iƒЈџџџџџџџџџџџџ„`„nџџџџjџџџџџ`„Њџџџџdџџџџџ+Ќа`џџџџџџџџџџџџ,џJАџџЅ„iƒџџџџ џџџџџџџџ„%`„Ўџџџџpџџџџџ+ЖP`џџџџџџџџџџџџLџ  џџџџЕŒiƒЎџџџџ џџџџџџџџ„ „ИџџџџpџџџH%+Мџџџџ `џџџџџџџџџџџџ џџџџ ФŒiƒ–џџџџџџџџџџџџџџ„џџџџH€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Јƒhџџџџџџ џџџџџџџџџџџџџџ%`Ђџџџџxџџџџџџџ ssc-stat.hlpџџџџџџ`„Єџџџџtџџџџџ€џџџџр(џџџџџџ`„Іџџџџpџџџџџ€€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Јџџџџџџџџџџ`„Єџџџџtџџџџџ€џџџџˆ( џџџџџџ`„Іџџџџpџџџџџ€џџџџ`„Єџџџџtџџџџџ€%`„Єџџџџtџџџџџ€џџџџ%`„Јџџџџlџџџџџ€А@ `„Іџџџџpџџџџџ€џџџџX џџ џџ`„Јџџџџlџџџџџ€ џџ€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Ј`„Єџџџџtџџџџџ€џџџџ`„Іџџџџpџџџџџ€џџџџ`„Јџџџџlџџџџџ€џџџџ`„Єџџџџtџџџџџ€`„Јџџџџlџџџџџ€ш`„Іџџџџpџџџџџ€џџ`„Јџџџџlџџџџџ€џџџџ€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Ј`„Єџџџџtџџџџџ€џџџџ`„Іџџџџpџџџџџ€џџџџ`„Јџџџџlџџџџџ€џџџџ`„Єџџџџtџџџџџ€`„Іџџџџpџџџџџ€ џџ`„Јџџџџlџџџџџ€ џџ€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Ј`„Єџџџџtџџџџџ€џџџџ`„Іџџџџpџџџџџ€џџџџ`„Јџџџџlџџџџџ€џџџџ`„Єџџџџtџџџџџ€`„Іџџџџpџџџџџ€ џџ`„Јџџџџlџџџџџ€ џџ€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Ј€PPџџџџџџџџџџџџ@џџџџџџџџџџџџ№а €Ј`„Єџџџџtџџџџџ€( `„Іџџџџpџџџџџ€ џџ˜ `„lџџџџtџџџџџ€@  0@„pџџџџdџџџ џџ€`„Јџџџџlџџџџџ€`„lџџџџtџџџџџ€p џџџџ@„pџџџџdџџџ џџ€@ X ( џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџ(џџџџџџџџџџџџ@џџџџј џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(р x`„lџџџџtџџџџџ€џџџџЈ  џџˆ @„pџџџџdџџџ џџ€џџшџџџџ8 а Иџџ џџ`„lџџџџtџџџџџ€ џџџџџџИўџ@„pџџџџdџџџ џџ€`„Іџџџџpџџџџџ€џџ`„Јџџџџlџџџџџ€€ `„Єџџџџtџџџџџ€џџ`„Іџџџџpџџџџџ€џџџџ`„Јџџџџlџџџџџ€џџџџ`„lџџџџtџџџџџ€(@„pџџџџdџџџ џџ€џџџџ`„lџџџџtџџџџџ€џџџџ`Xџџџџџџ@„pџџџџdџџџ џџ€џџџџџџџџмњ4џџџ џџ @ўџXTџџџ џџ `„lџџџџtџџџџџ€џџџџ@„pџџџџdџџџ џџ€џџџџ@ўџpDџџџ џџ џџџџ@ўџˆ4џџџ џџ ˆ @ўџИ$џџџ џџ џџџџ@ўџ џџџ џџ џџџџ@ўџџџџџџџџ џџ џџџџ@ўџаєўџџ џџ џџџџ@ўџшфўџџ џџ ˆ@ўџџџџџдўџџ џџ џџџџ џџџџxџџџHџџџџ@ўџHdџџџ џџ џџџџ@ўџџџџџ`џџџ џџ џџџџ@ўџ(Pџџџ џџ шџџџџ `„lџџџџtџџџџџ€џџџџ@„pџџџџdџџџ џџ€џџџџ@ўџИLџџџџџ џџ@ўџџџџџHџџ/џџ џџџџ@ўџи8џџџ џџ pX`„lџџџџtџџџџџ€@џџџџа@„pџџџџdџџџ џџ€`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ№8 @ўџ(џџџ џџ џџџџЎ 0(џџџ џџ џџџџ@@ўџ@џџџ џџ @ўџџџџџџџџ џџ @ўџџџџџјўџџ џџ `jџџџџxџџџџџ`„lџџџџtџџџџџ€`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx џџџџџџџџџџџџџџџџџџџџШ  џџџџИ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџРџџџџ`џџџџџџџџЈџџџџиџџџџаXџџџџџџџџpџџџџџџџџџџџџPџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXИ @„pџџџџdџџџ џџ€ H`„ptџџџџџ€џџџџњzмџџH@ўџ8Lџџџ џџ @ўџА<џџџ џџ џџ@ўџh,џџџ џџ џџ@ўџ€џџџ џџ џџ@ўџ˜ џџџ џџ џџ@ўџрќўџџ џџ @ўџџџџџьўџџ џџ `„Ўџџџџtџџџџџ€@ўџџџџџмўџџ џџ X „џџџџxџџџh ј џџ`џџџџўџџџџџˆ0џџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџРџџџџџџџџџџџџјџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџpџџџџџџџџџџџџј0@ўџxlџџџ џџ џџ@ўџ˜\џџџ џџ џџр`„јtџџџџџ€@ўџџџџџLџџџ џџ џџџџˆHџџџџџџ@ўџџџџџHџџџџџ`џџџџџџџџpџџџџџџ@ўџА8џџџ џџ џџџџ@ўџШ(џџџ џџ џџџџ@ўџџџџ џџ ˜џџџџР@ўџ0џџџ џџ џџџџџџџџШ@ўџџџџџјўџџ џџ @ўџHшўџџ џџ @ўџ`иўџџ џџ @ўџџџџџШўџџ џџ @ўџџџџџФўџџ џџ @”џџџџlџџџ џџџџџџ€Рџџ џџџџџџўџџџџџš\ @ўџ@ўџаXџџџ џџ `џџџџH(џџџџџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџаА@ўџшHџџџ џџ @ўџ8џџџ џџ @ўџ0(џџџ џџ @ўџџџџ џџ @ўџџџџџџџџ џџ @ўџHјўџџ џџ @ўџџџџџшўџџ џџ @ўџxцўџџџџ @ўџџџџџфўџ/џџ  xџџџџxџџџџx џџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  ˜ 7B*\R1*#175$*\Rffff*1042384913$*\Rffff*3442370a09*\R0*#e*\R1*#c4*\˜€ € џџџџ %Ј7И а€ 0и€ 0€ 8€ џџџџ&_H€ џџџџp€ џџџџB x€ џџџџ€€ <ˆ6'4Ј Ш Qи€ џџџџј€ џџџџB  € J € џџџџ€X € џџџџ0`   € џџџџА € :Ш    € 2  X !h € Hˆ  а "5р € > € 0H .>x Ј € 4А  ш  ј     0  @ P € џџџџX € џџџџ" ` € 2h € џџџџ  :А № ,ј ( € џџџџ0 € џџџџB8 €P €X € џџџџ€ ` € p € :€ € &Р € 2ш €  € 8@€ x€  ЈИ6Zа€ џџџџ€ џџџџB  € <(€ *h€ џџџџ€˜€ џџџџ 6Ј!Ра€ џџџџ€и р€ џџџџш€ џџџџB  №€ :ј€ џџџџ€8€ џџџџ@!HX`€ џџџџ€hp€ џџџџx€ џџџџB  €€ Tˆ€ џџџџр€ џџџџ№џџџџHр Module modUtilityрG Copyright 2002: Statistical Services Centre, The University of Readingџџр3 Written by Howard Grubb, Martyn Byng, Colin Grayer˜ ЭџџPЭџџHр==============================================================џџџџр Miscellaneous proceduresІ ї r–рF Returns the trimmed string starting at pos and delimited by DelimiterрQ Changes Pos to point to the position after the delimiter, or 0 if end of message]ђЈ]ђР]ђи nЌœјр4 Already at the end of the text. Return null string.(rjЖ'jzџџЈkџџ  n l l nЌ$њЌ$zbр Ignore leading spaces› nЌ 'njЙџџ8 l n$њ'l(rjр StartPos = Pos l p„'vg vЌœ hasр: Delimiter not found - return the remainder of the message l'xрN Pos points to end of message so that subsequent call returns an empty string.% MЌ'ndџџ0р Return the delimited message vЌ 'xр< Pos points after the delimiter ready to get the next field. n v p Ќ 'nkџџˆ l x$м'jiџџhІ ї €Ќ–№ T$R!VЖ\ ~ | :B‚oџџ–€р; Returns a range containing all data contained in a column,р starting at the given cell.р Dim EndOfData As Rangeр Dim NewEndOfData As Rangeр Dim NewEndValue As Stringрр On Error Resume Nextр Set NewEndOfData = Start(1)р Doр" Set EndOfData = NewEndOfDataр. Set NewEndOfData = EndOfData.End(xlDown)р If Err.Number = 0 Thenр) NewEndValue = NewEndOfData.Valueр Elseр NewEndValue = ""р End Ifр% Loop Until NewEndOfData.Value = ""р0 Set AllDataInColumn = Range(Start, EndOfData)]ђ№]ђ ˆ!Šѕ5Œ5Ž! Ќ '†qџџ(р* For i = MaxRow To Start.Row + 1 Step -1р* If Start(i).Value = "" Then Exit Forр Next iэЌ$ў †$ў$0$.„iџџˆ– ]ђџ Іў ’!Ž!ЌЌ• І$’!Ж›Gyjџ ІўШэЌ$’ І$’$0.iџџ–ЈрC Returns the format needed to display number to specified sig figs.]ђ( –$š›Gzjр0e.g. if it is an error –'–рMake it positive ˜Ќ ˜Ќ œр4 SigFigs out of reasonable range, use default formatЖ'” – –eр, Number is an integer, so display as integerЖ0'” –Ќ ˜Ќ  eрA All sig figs are to left of decimal point, so display as integerЖ0'” –Ќ –Ќ Ќ  eр8 Number is very small, display in scientific format withр) specified no of sig figs in the mantissaЖ0.0 ˜Ќ Ж#$\ЖE+00'”dџџPр- Calculate how many decimal places to includeЖ0.0'”џ Іў ˜Ќ Ќ Ќ• –Ќ І ›Gyj ”Ж#'”џ ІўШkџџЈiџџ –@р, Give standard error message if error occurs ž!–ЌьœЖ/Tried to write outside the worksheet boundariesA@вdџџЖError ž!–Ж:  ž! A@вkџџаoџџШІ –€]ђ ]ђ8р Pos = 1р Doр3 Field = NextField(ThisString, Pos, Oldstring)р If Field = "" Then Exit Doр+ ReplaceString = ReplaceString & Fieldр If Pos <> 0 Thenр2 ReplaceString = ReplaceString & NewStringр End Ifр Loop_џџX Є І„'n nЌ›Gxj Є nЌ $м Ј Є n І $њ'ЄЙџџ№ Є'Ђiџџр–Pр5 Returns range referred to by the given defined name.р# Returns Null if it does not exist.]ђИЩАX  ˆ%В!Д'Ўэ Ў$0.Ќzџџ(ЃА эА.Ќiџџ–ар4 Checks whether the supplied range address is valid.]ђ0ЩКИэ Ў$0.ИЗ'Жzџџ˜ЃКЗ'Жiџџ€–PрM Converts a number in local decimal format to standard decimal format (23.45) –X$О'Мiџџџџџџџџџџр І$’$Ў ›Gyjр/Modified by CJG 17/2/03џџџџјџџџџИAttribute VB_Name = "modUtility" ' ModuHle T XCopyright 2002: Statistical Services Centre, The €UniversЌ of ReadingKWritten by Howard Grubb, Martyn Byng€, Colinayer7Option Expl@icit P№rivaвИ)Џ=9wMiscellaneous proceduˆres/PubA FuncINextField(ByV€‡Mess@age As“r{, _ ByRef PosIntegerƒ~€6ƒ9Del@imiterщv`bTab)?gReturns t€fmmed s9ng€€]@) at pР and :d„diЦCh˜angРzA+to pint @iyBDafA"Р3or 0 if e;Р€„mCIFCDi2m–rt‹BEnіd•`L@•@]„PУ ЕCIУW=€ @ЇnAAd' Alr@ЇyЏ?A,„'tv.РЎAN null„L.7‡Ц~Р]"аyExitFˆƒ / IfУDo WhiРйб3<= .(„nQHMid,A†, 1)€Space(1)C ' Ignore ђlи s@ЉУ!A"=–+ 1У LoЬop#ХT=  Р ~'€|c1bЃD0=Р InStrg†Dwd.F0!‚j.І €not fou@- r‚TbTrem№aindрY@Ea1ЪE_>Ћ'Ѓ'poTр^oьN so @^subseq*u@— €™l„s an empty‹o>Ѓ*0ф!lseiпmb‡h™Є$-4N#i€adyСngeЫ o`zn@U fˆSлЩ?Ф +BM‡5 цУЦSЉZLeftЧ<Ѕ.9 < AЅ ЃSub GetHel$p(Ь”Co ›xttId`Y1XœЬA FССe= SSCРR‚ “bР%Ca sApсТ€вon."Add0Ins(фЁн).Path & "ќ\" … AЭЄ р  ‘НAllDataInргumnі(bda­RсЂЂЎ"bB&'„‡ I rс cя [Т­ d@ e ВUоaРl ,s–tЇГс`gРъn aг3=aВ !Ї 1OfЧaІgNewпАk.uXkаOPwrrср[Resu@ƒб!“~Sа'Њ№ё J!DDžoƒPБ7= yJ 6.(xlАDownpJ + Err.NumўbВoЅFфpуГ [Ж.BЖE’<l@чp’в‘№ p’2ЁџсTАŽ” Ѓ@.1aqпбЌ#а’"#$,aѓU(РqMaxRoВwALo!”di)в"Wiр-A@‰veSheet.Usedз(€Д= .E!+bs.C№WtЏ–@с ‘ƒFpi  Y”Tozє1аeјp -РeQp_"1x(i)H`А›AqoчрœСa$ i‚ B/n!emoveTDra ЊngB™kЌs(x &,# (# ќ))ѕ яIVyА9Џш(MyТ `„‚=џb !Л&ЃЁ5рN2'рIs@+oЗаsА)’' ­i0]B˜CJG 1Р7/2/03bƒƒд Ч<> ""нзАШqR_sС1J/%’_o } BPмАSigF o`rmat(t9РVРariantАђ/ЉЎ“ЗRaNfђ needpQ№Ѕdispplay`˜’>sˆpecуsigАoќgsQ№VЙ ‚*N0‡IsА eric4 •Н 'e.ьg.AЋ€+i3‘P‚СД = AbsF Р'Make уАvуЕуs < 1 Or х> 8RbA–outƒд0Њsonab0ЃA’d, usepКfјaul”сХC`) PtЉёMIf f џКЇ$р“ѓШ“ёEas d/ •аR0ГА;> 10 ј^ (EА‡cЇ0RВ х a€­€lˆЕ!d№mЯ",œЏџџџ6>аРAЇчє т -9] 0эcЁPl, еP{slciЄа(cРЌЁ ЮwАXg З*noЁ &ыАс.m 1iPуя ф 4.0!‹Sлј2, "#")1E+Ž0HЇа‘culђhДow many decimal places to include SigFormat €= "0.0"l`For i(Fs - 2 To -9 Step -1P’If Number > 10 ^8The€n Exit H‡* r & "#@Next i9E nd If  Function Public Sub FlagError()' Give stand ard e message ifoccursW/ƒf€".„h=€h04 gMsgBox "TriedЋwrite outside the worksheet bDou>iesmEls†П$Z " ,& <€†:† DeрscripzA‰G€ˆ†H ReString(ByBV€ƒThis ŒAs@s, _E7‡@“COldsBб1NewM)ЧB €Dim PosA€Integer† FieldŒ ž'@+ jDoУГРC = “Т(?ђ,, Ц3РŒ@ ѓ€Г""B~CВЪUѓ@ЩЫ& Т†!A(№<> 0’D]†LFХ~СLoopŸУG=@€УBIn-яЊ #Ф=Є‡УшD= Left'`‚1)€VЇ:& M”idЮ+ n(чЃsF- ч"V~†\FindNamedрRangeЄ\gEЂLТb 'cturns rA reІf€ƒƒyby"xg@‡Ђn@ЈfinрnР Т.LNullЁˆ`œdoрЋnot eАxistЂD YpAddr`ŽW ,O“`Є‚’Go`ЋNoС #тe= A veJSa‰.as(Ё)Є.RAsTУ>SџЋ aRЂ!$ c.ВІЇ 4 Ѓ:ТђNoМth ‡Ÿ1 Œi 1Efb1Boolea И`' Che€cks whe€Ї‚rт/supplсЋ#4a„(is vaшlidl,rЁ+ч;bЙ‹+Inтgarг$уgрTruЖ‘'Љ ГC(jFaЅН'DЃѕУЮ…XЃъK'#ЈB 'onverts a nƒin loіcp^хfѓ}р–pЌР(23.45#"rК0БDCDbl(г )ЅЁHe8 __SRP_a 3џџџџС __SRP_bџџџџџџџџџџџџц}modUnStack+џџџџџџџџъА›__SRP_16џџџџџџџџџџџџ8ф#,џ k`џєЦя ltџJфp^џє„# k`џє­p^џ'k`џЉDLџdџћы,џћ”џ(<џћœ џU„5џ k^џчtџMLџ@,џ ,џ`1xџ5,џ H0xџdџtџ ,џџ џќўмў0 ќЦ№  Ь%lџ$ @lџW\џ ўїLџLџqHџlџ7lHџџA8џ lHџџ=\џ џA(џ ћ”џ(џћœјўќ"qtџ6\џ8џ(џџ ѕqHџ_(џ%H ўЂ\џќ‹ltџ§iиў%H ўЂ8џќ‹lџќэ8џќэ\џ$  QlџФўФў xџФў6\џ8џИЬ,bxџLџ(lџФў\џ8џ(џџјў<јQ(8џ%H ўЂdџќ‹ltџ§iџ%H ўЂPџќ‹`џќэPџќэdџ$  Q`џxџ6dџPџ„ј(bxџ`џdџPџџДpl У§•§XџћйHџbєаєкХE :Xџ§lџg§8џ§XџћщHџћ3j :Xџ§lџg§8џє ыє­ыћЯ§kXџ]ћt– :Xџ§lџg2§8џ(Xџ]ћpHџ§џє ыєїыћЯ§kџ]ћc(џћ'јўџ >:8џ:XџNHџHџє­ч(џ  (џћяјў:џћяшўќіlџ6Hџ(џјўg :Xџ§lџє­jџєїєџўkфўg§8џє ыkjџыћЯ§kXџ]ћtKglџ:XџћяHџќіlџ jџeфў+§•%˜p(blџHџ(џјўшў0 ќЦ@  Јl CtџlCpџlClџѕltџlpџѕў§фpjџ kjџєЦ>Zkjџє­чtџMTџ@Dџ DџllџF4џћя$џ'єўkjџчlpџJЊtџMџ@фў фўћядў`1tџ6 Dџєў$џфўдўltџCxџЈЈ8b xџpџlџtџdџ Dџ$џєўфўдў0 ќЦP  0 ќЦа  0 ќЦP   >rU€€€ џџџџџџџџ0 ` §џџџџџџџџџџџС й щ  &,Љ `§џџџџџџџџџџџ )  ssc-stat.hlp4б `§џџџџџџџџџџџi I =I 4љ `§џџџџџџџџџџџ I =I ,! `§џџџџџџџџџџџ™ /&$I `§џџџџџџџџџџџ0q ` §џџџџџџџџџџџБ б ё 0™ `§џџџџџџџџџџџ I (С `§џџџџџџџџџџџ) (щ `§џџџџџџџџџџџn$*\Rffff*154238491c*\R1*#90*\R0*#10$*\Rffff*1042384913*\R0*#14*\R0*#e*\R0*#f*\R0*#19$*\Rffff*1142384913$*\Rffff*1242384913*\R1*#b3*\R1*#c4*\R1*#229*\R1*#b$*\Rffff*3442370a09*\R0*#13п 0ўЪя€ € џџџџ€ N€ џџџџ€ :h€ џџџџ€Ј€ А€ џџџџB…lL&0*€ џџџџ€И€Р€Ш€а€и€р€ш€№€ј€€€€€ €0€@€H€P€X€`€h€p€x€€€ˆ€€˜€ €Ј€А€И€Р€Ш€а€и€ч      !"#$%&'()*+,-./012345ўџџџлЊ9:;<=>?@ABCDEFGHIўџџџ^LMNOPQ_STUVWXYZ[\]^K`abcdefghijkўџџџmnoŠ§џџџrstuvwxyz{|}~€№ф/дШџџџџ1y1НЙџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ 8џџ06 џџџџўџџ џџ`„" 8ўџџџџ`„$X4ўџџџџ 8 X џџџџ€џџџџџџџџpƒРџџџџџџИџџџџџџџџџџџџџџ%@„6џџџџ8џџџ џџ€ @„Lџџџџhџџџ џџ€%@„Lџџџџhџџџ џџ€џџџџ`„ь џџџџNўџџ џџ@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€џџџџ€ (џџџџџџ@„ТHџџџ џџ€џџџџ @џџџџџџ@„6џџџџ8џџџ џџ€0@„Lџџџџhџџџ џџ€@„Lџџџџhџџџ џџ€џџџџ@„NџџџџXџџџ џџ€@„Т(Hџџџ џџ€0 X@„6џџџџ8џџџ џџ€ˆ p@„ШH(џџџ џџ€@„NџџџџXџџџ џџ€И@„Т(Hџџџ џџ€ А ˜@„6џџџџ8џџџ џџ€X Аџџ џџ@„ШH(џџџ џџ€ џџ@„Lџџџџhџџџ џџ€И@„NџџџџXџџџ џџ€ @„Т(Hџџџ џџ€@„6џџџџ8џџџ џџ€@„ШH(џџџ џџ€@„Lџџџџhџџџ џџ€И@„NџџџџXџџџ џџ€ @„Т(Hџџџ џџ€@„6џџџџ8џџџ џџ€@„ШH(џџџ џџ€@„Lџџџџhџџџ џџ€И@„NџџџџXџџџ џџ€ @„Т(Hџџџ џџ€@„6џџџџ8џџџ џџ€@„ШH(џџџ џџ€@„Lџџџџhџџџ џџ€И@„NџџџџXџџџ џџ€ @„Т(Hџџџ џџ€@„6џџџџ8џџџ џџ€@„ШH(џџџ џџ€@„Lџџџџhџџџ џџ€И@„NџџџџXџџџ џџ€ˆ @„Т(Hџџџ џџ€@ @„6џџџџ8џџџ џџ€џџџџ@„ШH(џџџ џџ€џџџџ@„Lџџџџhџџџ џџ€@@„NџџџџXџџџ џџ€ @„Т(Hџџџ џџ€И @„6џџџџ8џџџ џџ€џџџџ@„ШH(џџџ џџ€џџџџ@„Ш((џџџ џџ€Ш @„м шџџџ џџ€ џџ@„NџџџџXџџџ џџ€@„ТHџџџ џџ€@„6џџџџ8џџџ џџ€ @„Ш((џџџ џџ€@„м иџџџ џџ€ џџ@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€ џџ@„6џџџџ8џџџ џџ€џџ@„Ш((џџџ џџ€џџ%€@ўџ)ƒ.џџџџџџш€ џџiƒœ0џџ џџ(„џџiƒЦџџџџ џџ џџH„IƒLџџџџ$џџ џџp„ IƒNџџџџ4џџ џџ˜„ IƒТџџџџDџџ џџР„ џџIƒ6џџџџTџџ џџр„ џџIƒШџџџџdџџ џџ„џџIƒм џџџџtџџ џџ0„џџIƒР@„џџ џџџџџџ€џџ@„м Pџџџ џџ€(@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м hџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м јџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м ˆџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€џџ@„ТHџџџ џџ€џџ@„6џџџџ8џџџ џџ€џџ@„Ш((џџџ џџ€@„м џџџ џџ€џџ@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€@@„6џџџџ8џџџ џџ€p@„Ш((џџџ џџ€X@„м Јџџџ џџ€@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€џџџџАџџџџˆ@„6џџџџ8џџџ џџ€(@„Ш((џџџ џџ€€@„м 8џџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м рџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€P@„6џџџџ8џџџ џџ€@„Ш((џџџ џџ€ @„м pџџџ џџ€џџџџџџ @„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€џџ@„6џџџџ8џџџ џџ€џџ@„Ш((џџџ џџ€џџџџџџџџˆ@„м џџџ џџ€(@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м Аџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м @џџџ џџ€џџџџ@„Lџџџџhџџџ џџ€ @„NџџџџXџџџ џџ€ˆ`xџџџџРH@x 0@€€а0 H РШјААџџџџ№џџџџ@џџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ`xџџџџРH@x 0@€€а0 H РШјААџџџџ№џџџџ@џџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ`xџџџџРH@x 0@€€а0 H РШјААџџџџ№џџџџ@џџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ`xџџџџРH@x 0@€€а0 H РШјААџџџџ№џџџџ@џџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ`xџџџџРH@x 0@€€а0 H РШјААџџџџ№џџџџ@џџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџ0@„ТHџџџ џџ€(@„6џџџџ8џџџ џџ€€@„Ш((џџџ џџ€џџџџ@„м аџџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м  џџџ џџ€џџџџ@„Lџџџџhџџџ џџ€(@„NџџџџXџџџ џџ€€@„ТHџџџ џџ€џџџџ@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м 0џџџ џџ€џџџџРра Иша@xXˆШј Ј  јџџџџрџџџџ"џџџџџџџџџџџџџџџџh!џџџџџџџџџџџџџџџџ@ џџџџџџџџџџџџ0p,€@„Ш((џџџ џџ€џџ@„м ( џџџ џџ€@„NџџџџXџџџ џџ€(@„ТHџџџ џџ€€@„6џџџџ8џџџ џџ€џџџџ@„Ш((џџџ џџ€џџџџ@„м Ј џџџ џџ€џџџџ@„Lџџџџhџџџ џџ€џџ@„NџџџџXџџџ џџ€X@„ТHџџџ џџ€@„6џџџџ8џџџ џџ€џџ@„Ш((џџџ џџ€@„м џџџ џџ€@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€ џџ@„6џџџџ8џџџ џџ€@„Ш((џџџ џџ€p@„м ˜џџџ џџ€@„Lџџџџhџџџ џџ€@„NџџџџXџџџ џџ€@„ТHџџџ џџ€@„6џџџџ8џџџ џџ€(џџџџш@„Ш((џџџ џџ€p@„м (џџџ џџ€џџџџ(BDFH*,.@ўџ ўџџ џџ @ўџрўџџ џџ @ўџР ўџџ џџ а+џџџџјш`xџџџџР(@`0@€€00РШ`шрџџџџџџџџHџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ўџp"№§џџ џџ pШ02468ъ <:@ўџ˜$ь§џџ џџ ј>О@0žšH: @ўџh ш§џџџџ € @ [ џџ@ўџ!ф§џџџ !h [џџ@ўџџџџџр§џџџџ @ўџ$м§џџџџ @ўџи Ь§џџ џџ џџ@ўџ№ М§џџ џџ @ўџ€$Ќ§џџ џџ 0!h ^@ўџ@!Ј§џџџџ X!!d@ўџИ!Є§џџџ €!@!d@ўџ! §џџ џџ Ј!h!kџџџџ@ўџ %œ§џO џџ а!!kџџџ@ўџр!˜§џџџџ мњј!И!pџџ џџ@ўџ "”§џџџ 8"р!pџџџџ@ўџџџџџ§џџџџ @ўџH"Œ§џџџџ `" "}(@ўџ˜"ˆ§џџџ @ˆ"H"}Z@ўџ#x§џџ џџ А"H"‹џџџџ@ўџР"t§џџџџ и"˜"џџџ@ўџ(#p§џџџ ш"Р"џџ џџ@#Р"•ўџ( вjОVмњXZ@ўџx#`§џџ џџ џџ@ўџP#\§џџџџ h#(#Бџџџ@ўџИ#X§џџџ Ј#P#Бџџџџ@ўџ#H§џџ џџ џџ@ўџp)8§џџ џџ а#P#Д@ўџр#4§џџџџ ј#И#Э@ўџ0$0§џџџ Ш $р#Эџџ џџ@ўџи$,§џџџџ џџH$р#Я@ўџX$(§џџџџ џџp$0$д@ўџx%$§џџџ Ш$X$д@ўџА$§џџ џџ @ўџ`%§џџ џџ @@ўџH%§џџ џџ №$X$кџџ@ўџџџџџќќџџџџ %р!§џџџ%!ўџ/џџ8%@! ўџи%јќџџ№`% % џџ€@ўџP&шќџџ џџ @ўџџџџџфќџџ џџ џџ@ўџ %рќџџџџ И%x%џџ@ўџ&мќџ/џџ Ш% %џџ№% %ўџџџџџиќџџШ`&и%џџџџ@ўџ(&дќџџџџ џџ@&&!џџџ@ўџx&аќџџџ h&(&!@ўџˆ)Рќџџ џџ &(&%џџ џџ@ўџ &Мќџџџџ И&x&(@ўџШ&Иќџџџ р& &(@ўџ№&Дќџџџџ 'Ш&/(@ўџ)Аќџџџ '№&/()№&6ш`xџџџџР(@x0@€€00HРар!h"˜ џџџџј&џџџџHџџџџџџџџџџџџџџџџр"џџџџџџџџџџџџџџџџЈ&џџџџџџџџџџџџџџџџџџџџџџџџш`xџџџџР(@x0@€€00HРар!h"˜ џџџџј&џџџџHџџџџџџџџџџџџџџџџр"џџџџџџџџџџџџџџџџЈ&џџџџџџџџџџџџџџџџџџџџџџџџш`xџџџџР(@x0@€€00HРар!h"˜ џџџџј&џџџџHџџџџџџџџџџџџџџџџр"џџџџџџџџџџџџџџџџЈ&џџџџџџџџџџџџџџџџџџџџџџџџџџџџА@ўџ8)Ќќџџџџ P));џџ џџ@ўџ*Јќџџџ џџ`)8);џџ*8)Bџџ@ўџш)˜ќџџ џџ @ўџ )ˆќџџ џџ @ўџИ)xќџџ џџ @ўџа)hќџџ џџ џџ@ўџџџџџXќџџ џџ @ўџџџџџHќџџ џџ (* &r@ўџ8*Dќџџџџ P**~@ўџp*@ќџџџ `*8*~ˆ*8*€@ўџА*<ќџџџџ ˜*p*‚Ш*А*‚џџџџp'@ўџи*8ќџџџ №*А*„@ўџ+4ќџџџџ +и*Š@ўџ@+0ќџџџ (++ŠX++Œџџџџ *@ўџh+,ќџџџџ €+@+@ўџ+(ќџџџ Ј+h+@ўџИ+$ќџџџџ р++—џџ@ўџ, ќџџџ џџџџџџџџ *№+И+—,И+™(,h+œ@ўџ8,ќџџџџ P,,Њ@ўџџџџџќџџџ `,8,Њџџџџ8,бј"`dœџџџџ0+џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX˜ 7B*\R1*#175р€ш€№€ј€€€€€ €(€0€h/€8€@€H€P€X€`€h€p€ˆ*€ џџџџx€ џџџџ€ 8€ И Ш и€ џџџџ€ ш0H`xЈРи№ 8p/P€ џџџџ€ X %x€ џџџџ€ Fˆ а€ џџџџр№€ ("R0 X h€ џџџџ€ 6p&Ј€ џџџџР€ $и!0 @P!X€ ,p ,  А€ Ш р !ј€ < 1H€ 0`  ˜ @,P' Ј€ $А "и€ 4ј 0 8,_P €  А€ @Р    € 2  X h  p  € € џџџџ€ F € .и     8(  H P X  ` € џџџџ p € 6€ € dИ € HH(€ :(€ а( а'€ Jш' *^4Ј* *˜*8(р'  0 @ )H € 2h    € 6А  ш ј  € F P X (3p Hd˜  р № € 2ј  0 @ H € "P ,x ˜   € .Ј и  ш € џџџџ  № € :€ N@ @ И а€ Fи€ 6 € џџџџ€ "X€Bu˜ р€ џџџџ€ "№€ *(Xp*lxЈ(OАи р€ џџџџ€ 4№@( @€ 4H €€ џџџџ€ "˜ 6'€ ,Р №*&0H  P€ 2X   € 4Ј рјRY` h€ >x€ >ИDOј@H`h p€ џџџџ€x & € Ј€ HH)€ :)€ а))€ LИ & &8№(  + *)ј( € џџџџ 0€ 8№)P€ (h 0‹ Р€ ,и 9 :  @P€ џџџџ X€ Nh 0‹И  ш №    ( 0€ >@€˜:— р шј€ JPFh €€ :€ Bа€ * PEp€ Dˆ!Eа!:ш!  $0 XD`xD(Ј€ Р! 9и!&Vј  ( 8€ <H ˆ€ ˜!9И! а!и№ј€ $ (*8h:p ˆ /@Ϙ/:˜ А Р QШ€ @ш&y(P€ 2X€ &˜!&yР ш€ 6№!*($&yX!€ ˆ€ 6!*Ш$&yј! (08€ P:pˆ  Ј АР€ Ш€ Fш€ 4 +€ `X+€ RИ+€ .0 € ` € 8€ € T(,€ 8ш,А,8а, ,€ BИ ! ! (!8!@! H! X!€ <p- €,8X-  ,€ TА-€ R.  `! h!C@-€ h. ,ˆ. ˜.€ &А.и.m/ №.Ј.`. €! /€  -.š0/ ! р/ ˜! !€ џџџџ Ј!€ RА!€ F" <•P" B" и"  №" Dј" # (# 0##@# X#  `#€ &h#9# Ј# А# 7И# и#€ (ш#$ $€ ,0$7`$€$ˆ$ ˜$€ &Ј$#а$7ш$%%% %€ ((%;P%h%8' x% €%€ &ˆ%9А% Ш% а% PЏр% 0&@&€ џџџџ>H&=`&p&€ џџџџ€ x& %˜&€ џџџџ€ .Ј&и&р&€ џџџџ€ш&№&€ џџџџј&€ џџџџџџџџ№/р Module modUnstackрG Copyright 2002: Statistical Services Centre, The University of Readingр3 Written by Howard Grubb, Martyn Byng, Colin GrayerрЭџџPЭџџH]ђH]ђ`]ђx]ђ]ђЈ]ђР]ђи]ђ№]ђ]ђ ]ђ8]ђP]ђh]ЌЌђ€]ЌЌђИ]ђ№]ђ(]ђ@]ђ`]ђ€]ђ ]ђР]ђи]ђј]ђ]ђ(]ђ@]ђ`]ђx]ђ˜]ђА]ђШ]ђр]ђ]ђ]ђ0]ђH]ђ`]ђx]ђА]ђШ]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]ђа]ђш]ђЩ&8р2 Get the number of factors and number of variables <‘'ж Т‘'2 Ф‘'ар Handle unstack options 6$(œ 6 BЌ'Ц 6 BЌ' 6 DЌ'  6 FЌ'Т 6 HЌ'њ 6 *Ќ' 6 ,Ќ' 6 .Ќ'  6 0Ќ'  6 2Ќ' 6 4Ќ' 6 6Ќ' 6 8Ќ'kџџ`р switch calculation off < :(:џџр? Select the output range so that subsequent selections work OK.џџ .A>n deЮ асо0џ ІўЌ а’џџXр! Set up row factor column headers І$Ф$ОЌ І .,Фnџџџџџ ІўШ Ќ'єр0 Unstacked columns follow the row factor columnsэЌ а .%Ц.ъџ 8ўЌ ж’џџџџр Unstack one column at a time 8$<$@'и 8$<$О'ьэ и$0.і і!Œ'юЌ'Юџ Иў і!B“џџџџр % Handle multiple areas in this columnџџџџ И!Ž!'Ъ И!Œ ю '№р  Loop over rowsџ ZўЌ Ъ’э Z$И.цр 6 Ignore hidden rows (i.e. they have been filtered out)џџџџ ц!D!Ь›GšFjџџр ) Cater for possible error value e.g. #N/AЩ ц!'"џџџџЩшр  Optionally ignore empty cells L "Ж›GšFjр . Get the factor value combination for this rowЖ'жџ ІўЌ 2’ Z № І$Т$@$0#!'р рЖœ N›GšFjЖMissing'р р$šeр: force the factor number to be prefixed by the factor nameЗ' kџџˆ ІЌ œр, Separate multiple factor values with commas жЖ,'жkџџ( ж р'жџ ІўШр @ Look at existing output columns to see whether this combinationр ( of factor values has already been foundЌ'вџ ІўЌ Ю’ ж$H І$к$Hœ І'вyџџ@kџџ8џ ІўШ вЌœр/ This combination has not been encountered yet.р] Increment the factor level counter, and add the new combination to the array holding factors ЮЌ 'Ю ж Ю+к Ю'вэЌ ЮЌ ъ%Ц.ђр, Set up the column header for the new column 2Ќœр/ No factors, so simply use the data column name ь ђ(dџџ˜ œр? Make header in form Dataname:Factor1=Value1,Factor2=Value2,...Ќ'nџ ІўЌ 2’ ІЌ ›G ђ!Ж, ђ(jІ ђ! І$Т$ОЖ= ж nЖ,$j ђ(џ ІўШdџџ р+ Only put the factor value(s) in the header ж ђ(kџџP œр Prefix the data column name ьЖ: ђ! ђ(kџџјkџџ№р' New column is empty, so start at row 2Ќ в+мkџџЈ аЌœр4 If there are no row factors, then put the data intoрG the first empty cell in the column corresponding to the current factor в$м'дэ д в ъ%Ф.т дЌ в+мdџџРр@ There are some row factors. Insert new value in next free row,р0 and handle concatenation of rows after sorting.р Get the row factor values.џ ІўЌ а’І*ЗбJ Z № І$Ф$@$0#%Ў І+оџ ІўШр Get the next available row єЌ 'др$ Insert the row factors into the rowџ ІўЌ а’ œœ І$о$0! д І .%Ф(dџџшЖ= І$о д І .%Ф(LkџџИџ ІўШр. Point to position of the variable in this rowэ д в ъ%Ф.тkџџPр . Remember the highest numbered row used so far д є ›G д'єjр  Insert the data cell valueр% Directly copy the data into the cell " т( Р$( "Ж "$šœ Р$О т(kџџ@ eр, Set value to 1 to indicate that it occurredЌ т(dџџш р- Copy the reference to the data into the cellЗбJ ц%Ў'ш Р$(œІ *Ж =IF(ISNUMBER( шЖ), шЖ, Р$ОЖ) т(Ldџџ( "Жœр7 Blank data cell. Use an IF function, to avoid problemsр7 with references to a blank cell being treated as zero.І -Ж=IF( шЖ="", ШЖ, шЖ) т(LdџџH Ж= ш т(Lkџџ( kџџ kџџ ЃF џ ZўШр End of loop over rowsџ ИўШр E Point to next set of output columns in case there are more variablesэЌ Ю ъ%Ц.ъџ 8ўШ .ѕ ъ!N .!N 'Ь  аЌ œр ! Sort the rows by the row factorsІ эЌЌ7Ф є Ь7Ф$0.фџ Іў аЌЌ•р % Sort by row factors in reverse orderэ І ф%P.ќ ќбR VбT фB@Тџ ІўШkџџ8 аЌ œр G Concatenate rows with the same row factor combination, where possible.І "эЌЌ7Ф є Ь7Ф$0.ъ ъѕ аЌ ЬсPЌ'ІрStart at row 2Ќ' І єbр7 Check if this row has the same row factors as previousџ 8ўЌ а’З' І 87Ф ІЌ 87Ф Ќ›GyjЗ'џ 8ўШ œрC Same row factors. Try to concatenate this row with previous ones.џ 8ў аЌ Ь’ І 87Ф!L' Жœр3 Cell has something in it, so is a duplicate value.р; Take appropriate action according to the duplicate option. œр$ Look for a free cell in this columnџ Zў 8$ ІЌ ’ Z 87ФЖœр!> Copy the value into the free cell and clear the original cell  Z 87Ф(LЖ І 8;Фyџџˆkџџ€џ ZўШ Z 8+ 8$  ›G 8$'j eЌ 87Ф!'џ Zў 8 Ь’Ќ Z7Ф!'  $м œр! Names match  Ќ $њ$X' 8$ Z7Ф!Ж›Gyjkџџhџ ZўШ Z Ь œр6 No suitable column found - create new one if possible ZЌœр! Insert new column name Ќ Z;Ф Z'Ь аЌ Ьс@pkџџ˜kџџр Copy the value into column k ZЌœ І 87Ф!L 8$ Z7Ф(Lkџџ Ж І 8;Ф 8$'Ж І 8;Ф 8$'up e 8$ 87Ф!Жœр9 No value so far for this combination, so insert this one І 87Ф 8$ 87Ф(dџџ@р, A value already exists for this combination œр!Overwrite it with current value І 87Ф 8$ 87Ф( eр!/ Overwrite current value if new value is larger 8$ 87Ф! І 87Ф œ І 87Ф 8$ 87Ф(kџџ eр!0 Overwrite current value if new value is smaller 8$ 87Ф! І 87Ф œ І 87Ф 8$ 87Ф(kџџpkџџhkџџ` 8$ Іœр Clear the current cellЖ І 8;Фkџџ 8$'kџџ№kџџшџ 8ўШdџџар Row factors do not match.р@ Delete any redundant columns of previous row factor combinationр( i = LastRowUsed + 1Ір End Ifр2 Blank out the first row factor of redundant rows.р; Make this row the first of the new row factor combination.џ 8ў аЌ Ь’ І 8+џ 8ўШ І'kџџP ІЌ 'ІЙџџ8Ќ'џ ІўЌ є’t cellџ ІўШndkџџАqџџЈkџџ  Тœр L Sort the columns into ascending order. This has to be done after adjustingр @ for duplicates since the number of columns and rows may change.ІэЌ аЌ 7Ф єЌ Ь7Ф$0.фІэ єЌ аЌ 7Ф єЌ Ь7Ф$0.ќџ ІўЌ Ь’Ќ'8Ќ І ф%Ф!d'ў ўЖ:„'nЖ' nЌ œ ў nЌ $м'kџџш њœр Insert column name into 1st key Ќ І ќ,ФЌ'8kџџ ў nЌ $њ$Z'ў ўЖbр" Insert a factor into the sort key ўЖ=„'n nЌ œр& A factor name is given - strip it off ў nЌ $њ$Z'ўkџџР ўЖ,„'n nЌ œр Another factor follows this one ў nЌ $м'$ ў nЌ $њ$Z'ўdџџ8 ў'$Ж'ўkџџ р" Insert factor value into sort key $ 8 І ќ,Ф 8Ќ '8ЙџџШ њœр Insert column name into 3rd key Ќ І ќ,Фkџџxџ ІўШІЌ ќ%ŽбRЌ ќ%Žб\Ќ ќ%Žб^ `бT фB@Т ќB@ZkџџЌЌ7ФB@H5Ш!ЪB@bqџџар Turn on calculation d :(:р' Return the number of columns generated Ь'Jzџџ`Ѓ&XA@œiџџHџџџџ@ 8Ќ ›Gxjр' Can only sort on max 3 factorsџџџџ€(џџџџр( ž!–Ќ›GЖError'"jр<Modified by CJG 17/2/03 œ "ЖErrorœр8Modified by CJG 17/2/03џџџџр( Ю м œkџџH)рC Cannot cope with so many factors - ignore any further combinationsšF№(џџџџш(рB The following If statement checks that the max no of combinationsр3 will not exceed the number of Excel columns (256).tRegNoр Added by CJG 18/3/03@dk ъ!N Ю Ќœyр!No point in creating more columns(рB The following If statement checks that the max no of combinationsр3 will not exceed the number of Excel columns (256).р Added by CJG 18/3/03me3@р2 NoOfColumns = OutputColumns.Column - .Columnџџџџи'І0 %+17;AGїЌЖ""ЗЗЗ–џџџџШ+]ђа р œkџџа+З'р ІЖToo many factor levels found. : Ж"Some factor levels will be ignoredA@вџџџџ`+ м 'Ьџџџџx,р- If LastRowUsed < i - 1 ThenрY Range(.Cells(LastRowUsed + 1, 1), .Cells(i - 1, NoOfColumns)).DeleteрL NoOfOutputRows = NoOfOutputRows - (i - LastRowUsed - 1)џ 8ўШy willdрN They will be deleted later, but Excel's Delete is very slow so should be doneџ 8ў Ќ ІЌ ’inџ 8ўШ.џ 8ў Ќ ІЌ ’Ж 8Ќ;Фр1 at the end rather than in this loop. CJG 4/4/03р Delete redundant cells.in ІЌ7ФЖœ3Ж 8Ќ;Фр 5 Blank out any redundant rows at the end. CJG 4/4/03р N Now concatenate non-redundant rows so that the redundant rows are at the end.р K This enables them to be deleted all at once, which is much more efficient.kџџ )р Ignore redundant rows Ќ '  І œkџџи(р Move this non-redundant row upџ 8ўЌ Ь’џ 8ўШ І 87Ф  8;Ф  є œ Ќ Ќ7Ф є Ь7Ф$0B@Zџџџџp(]ђ 6 ъ Ќ'ь џџџџ80 ь e 8$ 87Ф! І 87Ф 8$ 87Ф(џџџџ01 'єџџџџа/џџџџЖAttribute VB_Name = "modUnStack" ' Modu(le TsT XCopyright 2002: `tistical Services Centre, The University of Re adingKWritten by Howard Grubb, Martyn Byng, ColiBnayer7Option Explicit СPrivaвИ)Pub" Fu nc2о(Vars() As Integer, _ FacDto)RowЎD:e€ЁnЅ€l€KRa ng€Ÿ˜JByVal€pyDataeBooleanŸše•ƒƒ)AsDB@pIgnor eMiss@v =Р FalseЉ!C#ИSort€TlrujУDs),)"ъax@Дumn"sР*256уNonNumericЩ­­BDim iЙ†LoмРЗAjNBk.NoOfРXsХ EфgІ су8C№ombiZЂ1e—с -хl`%No1џЁ ayu#в@c J#pThisХЦЁ SрЅH(сBtЅfьnL@Є(1 To >"8,NextFr|eeрыъ C Aрddres„˜’ ƒtuePrab†6CurrЖCellџjТO“%ФAŒOutputћ(ILoЂ>!г LlB9рЮrtр!a j$AreaOffsetёNNew#! AI?c` "FŠ >/PoƒL„9FoundgфЊ†.с*ByЃ9ѕKЌeyA+H шeЂ83Ь""5owЂ­ Ma˜tchvП" ‘B1 HasС m xLasƒtк”U seЂКDuplчp ?m дW уbяуСПГM|axЏЄ0† &џplP,_mАwunt8Occв3Qя Oџ ’Р oBђQ%пˆб1а”ialŸOБInрcludeРСQd2?Н D3&%аƒvaОlПBАcё *ь&M№GageDispl ™N.’.Opšrror GoАORep zEвB' G… :tЂnumb-ePЂf#— aА3WvariablesУrЦ_= UBQ6bў)Жƒ Avф0(N7sт' HЩРАun’А o"ЈsIf Not IЊsD(є„)бЏnђG€wƒ—–= (… ЂAPcmn>)‚~0cюа?}!)№ <> Nг"!Ÿ…GLFЯmnqѕ)stЦN™eСFсNqpMCї@!њ9n2Ќ4HљOmnзoMŸї–ЯldM_ 2г}olђNOBБ/lŸaP lMРQѓin"SЫаT EР/Ifb2B ' swiРj хHculбofA†p1п2.Calі= x@ nual2а2ДSelec”t бEo‡ r‘е so0at s@ubsequа sЂхs worрk OK.Bp‘эЛq‚x(ЈкЦ9R№Pќm  #У3АbšБJFъsSFPQip"RЁ  r 'ѕt up row 3Q cy’‘ hR€H8 .!™s(1, iDРU'б>(DьЖors(i)) Next iPoOfOutputRows0 = 1X' Unstacked columns follow@ the rf`actor:jS(et ЂCf= Destination.Offs€et(0, N{ЕuFCsšBFR"j‹ To%VarsМ• oney at a time%ThisRangeNaDmeJGetGA€ddress()ќ(jˆ+ƒяp†/€-‚3(Š8f+с‚ StarЏ€†.€|V„ƒ‚Com6b”Ц0…ˆEach r In a"Area†Œ7' Handle @multipa‘ inйis„K/E Ф`r$s.рCountHУlc€/Т - Š5 ' Loop ov\erС‡‰&0k€1u@Щ#VDat aCell(kЦQ@€' Ignore hidden‚ (i.e.AЄy have be@filtDerЎout If .Enti$re@".HCThЩGoСexСl7 CaР€Сr p ossib€XerrЌvalue e.g. #N/BAЫ On EB RјesuЄAрK$ƒѓ€ЫФ@.VСЫ @/@ .NumbРX<>\ 0€ƒР,Щ"Т"Р+ 'Modifi@Bby CJG 17/2/0>3Ћ цBЦN" ' OpAwally i0empty< c5l8рc4MiР#ng Andт-y…""™, u: лФ‹Ccgcт/t@|!@+acni = ""ћыСQiрЦQƒЌ яу"1Р_(Ў‰„!Ќ@)(k + Їf)џБ8р %K #Ыcџƒ*#E+œUcŒ dЌ!Ё@Else7s@K eric()B6Ѕ1'A1ceЉ5nCSto q prefœixЃOЦ$:naGЕУЃIncludЦeC„БTruЦКf2E JIf.i > €:рxѓSepar€xGЄЉLs wШithрЄmm ЋУѕKѓ& ",P-“у_ ШУ & 4Kшћ/ц r[katexriБzg €SPcs рsee whze`r№вdжjэo fЪ;s Ys alйРhdyZpfdk §”xoа6ŒH?;ЂƒIs ƒ@!UCaseђyЛf )@уЎLpпё<Џ/Є‘Nб •ƒдeExit € џŽ ,Š™lрp ;Ѓ`ž' лвnobt“enc1тryet.@‡crement‰>lev el"№‚er, !€‡ addnew€fб#`# ar„raPzoldiaїs7Wё epE‘Іq `Јtѓcheck р(h Ÿ!max Иno №&јa?'p=У@…1exceIС;ЄJРE@Б Сs (256)' ЧаЃГL’t8/3žt€=№ N ­хVA–Ma:xѓ-s% !' ˆCan cop7сHso many$5s˜dxBurА AИ—.€b t MаЏageDispxlayа Qdџ‘ MsgBox "4To  ’СРunрd." _ят@& vbCrLfqрJ"SoФVwвi@beT…dЏRsy> = _aЃo5s ў ‡•poТ Ьїq‚+єгТD~ џ’EёHo`UжG~1ЖNewПC(аOЊкЬйž ‘'1ьДЩP' QupЂ?“т  headЊfБџ’6AС  ъ2БoL”'Ј€VdC, P1siЄmp@Љusˆd€ГћpGa /†SЦs™ џГб†О A‘Np0 ЏŠ4P' Mako`ЫCаиpmbБa :Iƒ1=RІ1,у2aу2,..ЏH“P>oё#ћYъrЖNoOfFact@ors If i > 1 Then NewColumn.V@alue ="&0 ","œ!€Ge‚tdName(ЁР(i)) _XО!}=" &•xtField(ThisBCombination, PPos,Љ)”(N ext iElse' Only put thHe f‚­ v”( s) in he№ader!`‘РEnd If‘ €с€Include‡Ћ‚ч R' Prefix‚+dataф c} ndд .ћШ€e:ƒeŠ‘T1”'СŸE'is empty, so start atР row 2NСw€FreeRowD˜љ„+o)ЕЬ ‹€Xž(СгРЌ€0)SY†'РiСVre aРМno)ƒ‹€ЅРŽn‘Ё‚_intoŽ0'‚g firstУ= cellE™Dlcorrespondi ng toТ cu9ntЈ `NoРx$nSet CУ CЁ= Out“aЃ*s.s(" Ь, хq‰NoOp›3БУ+ 1‹ђr'0!Ф,some -. Inse DneжwЃt'n!f@CaЂ,' aрlh€leOncateƒŠ ofAs after`Prt`.~..P ž3aUЉ†sQЏForВ=Вo> +N @y€%Ѓ-AddAsРЈ ;Ranјge(цЌe†Сп­Р H(k + AreaOffset).Ѕ р)ernal:=TrueГ=N­˜$4avaiјlab`0`&Ž#Xї муP sрlFР`qїƒ@!Жч/s@AЄe П0(#рLf CopyDAЉсшЃDesч@F"д fi)цэC7Р?Э:DQ Xж/ No , @mula§№""BuOЯ€ пRв ПA=uЂGо  hoаOс‘KposiС{q6С№vari ruР_ќ IIIŽ~Io ' Reme mbр> high‘  nu!edс@˜ us€ifa< cВа•q?=П.ћj?>k?ѓШ= Џ˜р“6_]№>IQB =е(ўjŒ{)бŸЧ*ƒ=џ*KБР}gАNau=ЛеR’R.ЭЅ*jU\7Sя^ŒTpLO, Se FlАГ„= (Mido џi бW‚@3w%џ'€3Д=kO.ŽїO..` k З!e‚м Ÿ^ `o su""Р' NoЊso fa r for@ЏisРЌmbination, insˆertУoneZLSЇ€ЁLfТІZ„' AФ0already exist~sв2DŸСŒbPQO€verwrit }t with cРurrentУ]П%#}П% (hMaxg_@@' gj Рif newф+РBРlarger_ ‰ћ%lђo<ъoџу ћ^?Є_%у _žсi*inc *Фs smИallŸ*Р ќ~>Ÿ*џc­Ÿ* ЭŸ*У Ÿ*сП _ЁLЧK <>œ iп3 Рєle ћсєх]cРщ§ZЩK@кќпџџ :Ф /rŸ‚tOЯХNext jў Ё-O ' 0…actors do not m`atch.ясDelePany €redundaрOss of previous rŒowt)f 'h Єа.љ<Р- 1џQRange(ы,Т+ 1, V10’%  ,рoO„fCв™s)).C ПѓNoOfOuhtpuё–sр -И (iP) 0)я§уiЙ Џ ?ѓQBlank ouqye firМst pЧ€sЯА'y€kll be d’d l€ater, bРФExР1's D``aoy slА sрhouldВŸТ (' a# e0Іra3`7Q†anрБ…loop. CJG€ 4/4/03_&$ А­ j_ Tоo“!?ТjёаO;Qџ1В@' Mјakec С+1C“рчСёqfaб2Y-я/№U б#@6FRs ?р Q)я а —4#ПР iO П g‚@љ&= ЯП& o с ЋL'ю ч({@аs ѕ я/ У”Б51`ЯšSЏa3Np+con–c.ЎeРMn-‹2йЏthD+ЌaКч,<С4№1enablФesP#em рx5А~Брe, which mupmСПefficiПаЃœЛœA%E25$Я‡J.G„}1)"1DUѓv†' 4ЩKNdџ#[ й`^0O_П 'ЃQР9ovФ9noё\ upВ58Рdўo9`ят@t& ЁцА€zДlls(i, j) Next jpEnd \Ifd,ˆi TIf LastRowUsed < NoOfOutpus Then\' Delete redund@ant ceТ.)Range(. C( h+ 1,` 1),  ;,CColumnsx)).7‹.’p ^=‡‰mˆWith ‡ %… Sort ' ‚ the cP into ascending order. is has €be done after aрdjust€…5€љ' for duplicates€ since Сnumb@ ofFa@}rows m`ay chAY _SŒetB)‚_ = Ša^A[€|Factoиrs c@b_#б v гj@3ЬkE"KќeyЭ!‹|!ƒ?&ФЎT+ &F[i€$1и ToI› AjA‹јHea€wРV„АaРUi).T@ъ Pos@ InStr‚(, ":"ŒњThis^Namre ""k`QС> 0ЭQ#5ЋLefіtF с-@m K^ƒЩ€ NoGBycCГ Р' Inse@c` n‚`1st јkeyk   a%@@)%я Ј.!/2ЋqІ1Trim(Midъ[ь,Do While $<> Ч-р&a f‚dc|нqsa‚q-= #ъ<о=э<€ 9тAƒ+s given - strip рit ofЯО@?"п,"`1+Р2,?Ž9A` ' Anoр'rЁхfoll!˜t_ў @Ѓ‘DQ`ЙПZр Ч@? 0 lse> ?бFpI”+FLLvaјluec&/&ƒ 2]g4рj, i)d4SЎ Q4jЁUž@(j >Ф 3> Ex% 1€ ' Can№Hly bon0fx pc s‹LoopџpС>D$ bЖDј3rdD0 Dp]–џDS[>Ог[‘181:=Ёё hs(kб‰p>2l2 r`3 l3t` Orientation:ј=xlёБШ %+Žћ хчS1).SelectЇurr RegА.En0tire ”.AрutoFiЃІAТ' Tur РcalculТ ’lApГˆCЗ'xjl1m c’B'p RetЁQR/‹gPener€dТUёрpackАa€ƒ Г%aЂ(FuncAВ  RepPWError:"Flagтa 7 __SRP_177&џџџџ№modStackџџџџџџџџџџџџR€@dlgDescriptiveStats(.џџџџџџџџq&ydlgTwoTtest*џџџџЌarU€€€ џџџџџџџџt`4§џџџџџџџџџџџС )Ii‰Бйёё б! џџ""fff=I ƒЏnrU€€€€~| љb)e™eљdС љЉ ^m1mamЁs s™h ˆ9ˆrU€€€€~| *Yu!; с1сSщсgЩuСs!‰С 1k t9Z™hсV Д‘ДБДБhЁ` 9tщiЙiQt9vytСtСlсt uщXYY pЉnaq1uI <"№ &ў’$hџў’4Xџў’DHџў’T8џў’d(џў’tџKф € єќЫфpўў €єќЫфpќў €єќЫфpџ8џ Уѕ8џ( ўћ'ў(ў]ћ/№§ќVp 8џ( ўћ'ў(ў]ћ<№§ќVp@ў8џ( ўћ'ў(ў]ћ<№§ќVp>ў8џ( ўћ'ў(ў]ћ<№§ќіHџ8џ( ўћ'ў(ў]ћ<№§ќVpzў8џ( ўћ'ў(ў]ћ<№§ќVpnў8џ( ўћ'ў(ў]ћ<№§ќVpLў8џ( ўћ'ў(ў]ћ<№§ќVpZў8џ( ў ћ'ў(ў]ћ<№§ќVpXў8џ( ў@ћ'ў(ў]ћ<№§ќVpVў8џ( ў€ћ'ў(ў]ћ<№§ќVpTў8џ( ўћ'ў(ў]ћ<№§ќVpRў8џ( ўћ'ў(ў]ћ<№§ќVpPў8џ( ўћ'ў(ў]ћ<№§ќVpNў%ѕйяџџѕ ь§$ ь§ $ь§ l ѕkџчДўўŽ€ѕџkџчўdф§ЎR( ў%lџ§iЬ§%lџ€.р§@ 1м§-р§>м§F№§%Haўю§ѓь§ь§ўЄь§6ў№§ џfф§R ѕq„ў&( ў%kџDЬ§%HўЂўў§ѓ˜ў5ўѕџkўўчўdЄ§r lџ€ .р§@ 1м§-р§>м§1№ўlџ€ .р§@ 1м§-р§>м§1”ў!ь§'ў%l№ўF ў%$  Qь§€ў€ўaўќ"qў5ўєpџ!€ўaў8§ѓ [ §Ќў5ўўˆœ§ш ,Ќўaў§ѓь§ь§a№§vќ"qџь§6ў№§Ќўaўќ"lўЎqŒў5ўѕ џlџўd”§л !l џ§i ў%ЌўўЂў§ѓ ў5ў, ўaўї§ѓь§ь§a№§ џь§6ў№§2б Kџџ ўaў`18ў5ў$§ ь§ь§  l§ѕЬь§v C8ўKўџhџl8ў ћ0§ј ўћ'ўџ5 ўб  Cєўѕџkќўчўdˆ§Œ_lџ€.р§@ 1м§-р§l џlŒўЊ§iў%ь§' ў%>м§Fў%$  ь§ўЂ№§џAx§`1Аўь§6ў№§x§ lАў ћ0? Xџџ4б CАўXАўM ў@ Xєџp>ўlџѕлt lєў*1єў lєўlАў*1єў џfˆ§Йєpџѕџkџчўdp§љ8єўM ў@ў ўlџиў@Mў@№§ №§ћ36ў№§э lџфpџљ џfp§Ї kџєЦяkџD ў]џћ3` k2ўУY4'`§'x§'№§ѕ*#м§*Fў /м§6ў№§x§`§єџp2ўб  kџєЉpџ lєўkџчиў;kџpџ)( ў%kџє­DЬ§%˜ўўЂўў§ѓˆў5ў kќўєЦЪl”ўF ў%ˆў,оk>ў“єp~ўѕџkќўчўdX§lџѕл"%ˆўaў: ўћя№§%ˆў,6ў№§dˆўa№§lџ€.р§@ 1м§-р§>м§Fўћяx§: ўћя`§:ў%~ўlєў FH§ћя8§%ˆў,6 №§ўx§`§H§8§ џfX§яІlєўF ў%ˆў,k@ўм,l”ў*Fўˆўa№§ћяx§%ˆў,6ў№§x§ѕkџчМўЃ kџєЦ_ kџчМўžqјў@lјў§i ў%kџDЬ§%˜ўaўю§ѓь§ь§ўЂ№§§ѓЈўь§6ў№§lјўѕЊkџчМўЃ* ѕџkџчўd0§єulџ€.р§@ 1м§-р§cМ§%l џlŒўЊ§iў%ь§' ў%>м§Fў%$  ь§ўЂx§§ŸўЇ`§`#,§lџlДў;/,§ь§6ўx§`§ џf0§ul„ўѕЊqјўѕџkџчўd$§ъ k lь§'ў%lџlДўžF ў%$  ь§a№§%lјў§iЬ§%lџ§iЌ§%Haўю§ѓ§§ўЂx§џC)ь§§6ў№§x§о OlџlДўž*F№§%lјў§i ў%lџ§iЬ§%Haўю§ѓь§ь§ўЂx§џCь§6ў№§x§ џf$§ @lјў§i ў%kџDЬ§%˜ўaўю§ѓь§ь§ўЂ№§§ѓЈўь§6ў№§ lјўl„ўл@ lјўq„ўkl8ў ћ0ХЉ l8ўF ў%Јў,&l„ Уl8ў ћ08ўM ў@ УХФЄ l„ў ќэўЈў,5ўЯ kLўФ ( ў%Јў,Я  c ў% ўўЋ ўь`1œў5ўl„ УP Ylœў*#м§*#,§lœў*#ќќ*F№§l„ў ўћяx§: ў ћя`§%Јў,2м§,§ќќ6№§ўx§`§Э  l8ў ћ0Б O!lœў*#м§"*Fў(џћя№§: ўћяx§lœўFўћя`§:Ь§ ћяH§%Јў,/м§6 ў№§x§`§H§Ы lœў*Fў%Јў,5ў  џf”§р Ќўў‹œ§‰˜ўaў№ќ"kџчЊѕж5ўV &( ў%kџDЬ§%˜ўўЂўў§ѓ˜ў5ў&˜ўaў№ќ"Ha№§№ќ"Ўфpџ6ў№§f  џUpџr  џfЄ§ђ €ќјјќknўkџєкФЋ ‹( ў%(Ь§%јќaўю§ѓь§ь§ўЂx§ќ‹l„ў§iЌ§%kџD§%јќa№§ю§ѓ§§ўЂ`§ќ‹фќќэ`§ќэx§$  QфќЄў)ь§§6ў№§x§`§kџчџѕѕџџџџўlмќЋ 9lџ§i ў%Єўaўё§ѓь§ь§ўЂ№§§ѓtўь§6ў№§:ltўќјь§ь§§“ @ўСў%ЄўўЊp lь§=tўь§ џgмќ.  kџєкS‹( ў%(Ь§%јќaўю§ѓь§ь§ўЂx§ќ‹l„ў§iЌ§%kџD§%јќa№§ю§ѓ§§ўЂ`§ќ‹фќќэ`§ќэx§$  Qфќ˜ў)ь§§6ў№§x§`§ l˜ўќјиќkџєЉчkџч`ўўŽ€ ѕqџ ѕq\ў lџl„ўж$ѕџkџчўdаќIєplў’lџ§i ў%lџ§iЬ§%иќaўю§ѓь§ь§ўЂx§lџѕЎ§iЌ§%lџ§i§%иќa№§ю§ѓ§§ўЂ`§ћ( ў%(Ь§%јќaўю§ѓь§ь§ўЂx§§Ÿў˜(ь§6ўx§=јќaўѓ§ѓь§ь§a№§і§ѓ§§ў э)ь§§6ў№§ќcќјјќ%ѕїяџџѕ ь§$ ь§ $ь§kџpzџ )€d№ ь! §œ§јќиќœўАўtўЈўМў’єўpўhў(џ4ў№ў8ўHў`ўˆў”ў˜ў8џЌў€ўЄўДўиў’HџDў ўџhџXџHр§м§,§ќќь§§фќў№§x§`§H§8§˜ќHќk     ўџџџўџџџ!"#$%&'()*+ўџџџ-./ўџџџ123456789:;<=>?@ўџџџBCDEFGHIJKLMNOPQRўџџџTUVWўџџџYZ[\]^_`abcdefўџџџhijklmnopqrstuvwxyz{|}~€H^Ќ hђ€^ђИpџџІ0  &,28>DJ–а]ђј]ђ8]ђP]ђh]ђ€]ђ ]ђР]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]Ќ hђ№]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]ђа]ђш]ђ]ђ]ђ0]ђH]ђ`]ђx]ђ]ђЈ]ђР]ђи]ђ№]ђЩ&€рL Keep track of the sheet holding the original data, as will be moving sheetsэ ˆ.–р7 Get the number of variables, initialise some variables <‘' Ќ'Ђр Switch calculation off < :(:р? Select the output range so that subsequent selections work OK. .A>р6 Work out column labels and setup pointers to them forјр each variable.Ќ  с8Ќ  с€Xџ œўЌ  ’ œ$<$О'ў ўЖ:„'n nЌœр $ No colon. See if there are factors. ўЖ,„Ќ ўЖ=„ЌœЖ'Ž ў'Тdџџ№ ў'ŽЖ'Тkџџиdџџар 8 Treat the string before the colon as the variable name,р % with the factor list after the colon ў nЌ $м$Z'Ž ў nЌ $њ$Z'ТkџџЌ'Zџ ІўЌ ‚’р - Search for the variable in the existing list Ž І$œ І'Zyџџ˜kџџџ ІўШ ZЌœр 1 Variable name was not found in the list - add it ‚Ќ '‚ ‚'Z Ž Z+kџџр/ remember this name in info about this variable Z$ œ$€(р Handle list of factors ТЖœр ! No factors specified or requiredЌ'„dџџPр # Find name and value of each factorЌ'8Ќ'n_џџ Т nЖ,$j'$ $Ж›Gxj 8Ќ '8 $Ж=„'Œ ŒЌœр' No factor name specified - use defaultЖFactor 8'’ $'”dџџP $ ŒЌ $м$Z'’ $ ŒЌ $њ$Z'”kџџр ! Look for factor name in the listЌ'Zџ ІўЌ „’ ’ І$Ќœ І'Zyџџ˜kџџџ ІўШ ZЌœр! factor name not in list - add it „Ќ '„ „'Z ’ Z+Ќkџџ Z 8 œ$€,l ” 8 œ$€,nЙџџр 8 œ$€(2kџџРџ œўШр3 Work out where output data items start using Order p›GЌ'Јj tœ ‚Ќ ›GЌ'Њj „'Ќkџџ( d‘'` b$(œЌ'А ЈЌ 'В В Њ Ќ 'ДdџџаЌ$bЌœЌ'АЌ$bЌœ ЈЌ 'В В Њ Ќ 'Дdџџh ЈЌ 'Д Д ` 'Вkџџ@Ќ$bЌeЌ'ВЌ$bЌœ Њ Ќ Ќ 'А А Њ 'Дdџџи Њ Ќ Ќ 'Д Д ` 'АkџџЈdџџ Ќ'ДЌ$bЌœ `Ќ 'А А Ј 'ВdџџX `Ќ 'В В Њ Ќ 'Аkџџ(kџџ kџџр Set up the column headers ЈЌ œ ‚Ќœр 4 Use single variable name as header for stacked dataЌ$Ќ А .%Ф(dџџpр # Use the name specified by the user rЌ А .%Ф(kџџkџџ ЊЌ œ vЌ В .%Ф(kџџиџ ІўЌ „’ І$ЌЌ В Њ І Ќ .%Ф(џ ІўШџ ІўЌ `’І І$d$ОЌ Д І Ќ .%ФV ўкџџџџ‰ …/1Н{ЙџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџRRџџџџџџџџџџџџџџџџџџџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(@џџj<џџ0< џџ<џџџџџџџџџџ№`аџџџџџџџџ "jџџџџ0џџџџџџh€Hџџџџџџ(€l€x9L–`(€nИА for–˜h€2џџџџ((џџџџџџ+fџџџџ`џџџџџџџџџџџџџџџџџџ  Œ )ƒ<џџџџџџџџHP€€ 0)ƒdџџџџџџџџˆ€€ p)ƒ.џџџџџџџџАИ€%iƒœџџџџџџџџ џџи„iƒpџџџџџџџџ џџј„iƒrџџџџџџџџџџ„iƒtџџџџџџџџ џџ8„iƒvџџџџџџџџџџX„iƒxџџџџџџџџ џџx„iƒzџџџџџџџџ џџ˜„iƒ|џџџџџџџџџџИ„iƒ~џџџџџџџџ џџи„iƒbџџџџџџџџ џџџџџџ€ „€џџџџџџџџ(џџџџ%`„‚џџџџџџџџџџ`„„џџџџџџџџџџ`„`џџџџџџџџџџ „†џџџџџџџџ˜% „ˆџџџџџџџџИ% „Šџџџџџџџџи%`„џџџџџџџџџџ`„ўџџџџџџџџџџ`„nџџџџџџџџџџ`„Œџџџџџџџџџџ`„Іџџџџџџџџџџ`„8џџџџџџџџџџ`„Zџџџџџџџџџџ`„Žџџџџџџџџџџ`„Тџџџџџџџџџџ „џџџџџџџџша „Ќџџџџџџџџ `„$џџџџџџџџџџ`„’џџџџџџџџџџ`„”џџџџџџџџџџ`„–џџџџџџџџ џџ`„˜џџџџџџџџ џџ`„šџџџџџџџџ џџ`„œџџџџџџџџџџ`„Иџџџџџџџџџџ`„žџџџџџџџџџџ`„ џџџџџџџџџџ`„Ђџџџџџџџџџџ`„Єџџџџџџџџџџ`„шџџџџџџџџџџ`„Іџџџџџџџџџџ`„Јџџџџџџџџџџ`„Њџџџџџџџџџџ`„Ќџџџџџџџџџџ`„Ўџџџџџџџџџџ`„Аџџџџџџџџџџ`„Вџџџџџџџџџџ`„Дџџџџџџџџџџ  @ ҘhџџџџBџџџџџџџџџџџџџџџџџџpƒfџџџџџџИџџџџџџџџџџџџџџ%џџџџXџџџџРџџџџШџџџџаџџџџиџџџџра`џџџџџџџџџџџџа`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ 7B(*\Rffff*1342370998\0п0ўЪ2€ € џџџџ€ N€ џџџџ€ ,h€ џџџџ€˜€  € џџџџ„ Ј€ џџџџ€И€Р„Ш„и€ш€№€ џџџџB…l:ј€ џџџџ€8€@€H€P€X€`€h€p€x€€€ˆ€€˜€ €Ј€А€И€Р€а€и€р€ џџџџ€ш€№€ј€€€€€ €(€0€8€@€H€P€X€`€h€p€ џџџџx€ џџџџ€ R€ и€ џџџџ€ >ш (8€ џџџџ€ @ `€ џџџџ€ Fp И€ џџџџ€ <Ш€  8Ph€ € *  (а ј      (€ >0€ ,p   Ррш№€ 4 @ X ` h p €€ 8 Ш и р№€ 6ј0€ H h€ (x  Ј€ *А р ш № ј  ( 8 H€ .Xˆ  ЈАа №€ (ј   ( @ X ` h  p  € € ( И Ш а  р  ш       8  @ € џџџџ€ :P  Ј А Ш а  и  ш ј   ( 0  H  P  h  x    ˜  Ј  И Р  и  р  ј      (  @  P X  `  h  €       Ј  И  а и р € џџџџ€ ш     € :(  h ˆ € *  Р р ш  №  (2@ xˆ:  р€ џџџџ€ №(@€ џџџџ€ Xx€ Lрј€ џџџџ€ (€ <@ $€ ,Ј€ џџџџ€ *и € џџџџ € (@Xp€ 4x"А и€ >ш€ >(6h ЈИРШ р ш ј € џџџџ€   @Hh,€ А Р€ џџџџ€ Ш ш8@PH˜  € џџџџ€А И€ 8Ш   (8P Xh€ ˆ˜А И Ш а и€ џџџџ ш€ џџџџ€ .ј(0€ џџџџ€8@€ џџџџH€ џџџџџџџџXр Module modStackelрG Copyright 2002: Statistical Services Centre, The University of Readingр% Written by Martyn Byng, Colin Grayer“Эџџ`ЭџџX]Ќђ`reas№^ђ0^Ќ hђ(џ ІўШр Go to the second cellэЌ А .%Ф.†эЌ В .%Ф.ˆэЌ Д .%Ф.Šр Loop over variablesџ œўЌ  ’рE Get the variable, and the number of rows in the corresponding column œ$<$@'Є Є$0!'žр Loop over rowsџ ИўЌ ž’р 6 Ignore hidden rows (i.e. they have been filtered out) И Є$0#!D!Ь›GšFj z И Є$0#! |›GšFjр # Keep a track of the number of rows ЂЌ 'Ђ ЈЌ œр Put in the value И Є$0#' Ж›G Ђ'Ўj œœр- Copy the reference to the data into the cellЗбJ И Є$0#%Ў'ш Жœр7 Blank data cell. Use an IF function, to avoid problemsр7 with references to a blank cell being treated as zero.І-Ж=IF( шЖ="","", шЖ)'dџџX Ж= ш'kџџ@ kџџ8  ЂЌ †,Фkџџ ЊЌ œ œ$€! Ђ Њ ˆ,Фkџџр р  Put in the factors tœџ ІўЌ œ$€!2’ І œ$€%n'  Ђ Њ І œ$€%l ˆ,Фџ ІўШkџџ8 р  Put in the carriesџ ІўЌ `’ œœ И І$d$@$0#! Ђ І Š%Ф(dџџИ І Ж=ЗбJ И І$d$@$0#%Ў Ђ І Š%Ф(Lkџџ` џ ІўШЃFH џ ИўШр 2 Ignore trailing blanks unless otherwise specified ~œџ Іў Ђ ЎЌ Ќ• ЈЌ œЖ І †,ŽkџџЈ ЊЌ œЖ І ˆ,Žkџџx `Ќ œЖ І Š,ŽkџџH џ ІўШ Ў'Ђkџџ( џ œўШ d :(:р' Return the total number of rows output Ђ'fzџџШ Ѓ&Р A@œiџџА џџџџЈ џџџџьЖAttribute VB_Name = "modStack" ' Module L PCopyright 2 002: \tistical Services Centre, The University of Reading–Written by Martyn Byng, Colin @Grayer)Option Explicit СPrivaРЈA)ConstLxFactorNoд6 TypщarStr@ucture R ‚{As€br‚J OutputƒƒD(1 To‰() €IntegƒN ValueC<1NoOf0sa &End SM  Pub€w Fu nc‚Еck(Vars( B, _E CarryЩ%De€qna‚€8pRang€pжУ`alРl@=РlpyData4Booleќan& B6{KrЌcВ.OУ€‰umnСu Matchƒ‚ƒсnOOmitѓ."VЁуS'>TraiРtgBlankƒBSЦ>OrderЁс YiantŽj-Yр!‚\Dim `InќfoуZ€ Hz!lџ!2"Щuхc>ZСgўiР™ ~!  daІу ”rt,1 HЯ@Іƒ%C4Po’РV2Сi‘j‘kљ‘VnaФ@!Ќу",$0у4ВЁ/ОЅС-Tјhis Am Сё‡1*І'СSheeBgрObjecЫРLС Зт‘•ad$ьvЁ3э.т\LoоФ nrlow&Ћv Лtќot`,A,"aCellAddrЬesq3"ol`K|m ё32hIm 1Fјrom/&"‚xOFLastNonobDБ:ƒtРo m6 сr"§ Ronw#` `OP…rror GoP~ReportEт B ' Ke`ep trp‘!ŒtE@s‚#holСŒ eop`inрpЁ!, as willT bё“v€ "s#SP'#&= A9~veвS' †G€бnumb0@”@"iables, initia€lise so№›+Ігn№s№UBаoundrƒ)“%8= 0“' (Swi№h №œcu"lг€offгApC˜B.Cal= xlManuaЮlsR elP5у9R• rA…а 0at subsequ9РЂ sЂPžporрk OK.BPqЅћqbS(XŠд С 2рWout c.labels aа•setup poi№›rs tТoС m fopІ1€' each •3@ЋAAхLЁТRЎeфRiюFр%vpг‡ƒ ”]=a2УQ€s(v)ц q^P= In@>(#, ":"іIf Е#0Зnе№ '<Qon.РЙe iBfёre a0fm’9s4б l,") <> 0 єOr=ЅPОIџГb№ФpФ‚D9A)s ёЈ Els#ЙіEЎ[‡")ДIД* ‚ ,' TreP'eё4sАЯngа9e_1Sa;сѕ 1o,[ а1hу р7tp aftа9‘ 'oЩE Trim(Left!- 1Ggj ђMidъ+ЛщЛk&Ц<'i'/AXЄ+дG€ `2SeќarА.ђ 6 з‘ ќexaн@(0"E qd(i)'  iѓx Ex€ЊР X[ рNext Fb O_-€BPђ wРVn|otP—‹ л@$€ХTriРm(LeftJ94№- 1)ŒV†AИMid@S EР‡IfЫ%' Loo8k fРЁЇCGin the lis}LDk€BЦЂ@"#Рiс€1 To@YJЎ  Р…E=TW(i)wSm iŽB’FмorЮ‘9Ў Œ€"B3“'ЯУCnot РDСC - adјd iŠOэMN\чьNH%k)@-B(ЋБVarInfo(v).OutputуCol(jНСkKдbMFbћЈ€GpШ(G!Œ&fЩ‚2vУЃ' Work out 0wher™Т dHata .em@Їtart ving 0Ordeф?€9StackD!Th ЧBРumnшœe?Ѓ!Ъ?@срсRs >  ZЅ From§Ž H^‡У тЃƒj МCarriЂЛ€UBound(yЄ} IsMisњs(kdB€€!>=ЇA…a`ckуХЈORowУ…ў+h$тбd hбѓрЂ(0!KЎА… ћщМц1сЃ-Ѓ `cBџ%с??ф oЖŽ џy,ЃЉьsT 8y"| QЫN9ПeЬr(ВŸq jС џЁї"yOz.(„#џI{ŒРžџџUџ ,3ˆ n џsQњё єŸYџXC Ъ7"/*YячBC(= Wуёљo orМ(†™ѓP' SeА[pВ…c„ol`Y hea@\ўsp.1 Щ X‹+4Ч&ZаO|' U‘Sle variaЖb€3Вs"s!cPИёeВDestination.Cells(1,љЈ2).bppxD№5еŸ “Ё”вGЇbyBпЇ ŒрН=УЁeŸvтФдљ> OO@`rtЧOxrigѓ‡9А˜ Э rСф ПЙї01сЩ + 1А&WuџPЃгЩNьUnBъi@ž1•_5s3Pр= GetЇs{рЄ{љГ' Go †t 0ЕsecoРcp%Т!1p$Ranьge % 2К'6ƒПo%+`GVсyO/HЫ$ ђ ТТp poverf5Єqvcр Аio n07& o`рт.Е8,Въb1u mbаыrows1ЖQcorresўppaž“B#1Ёр#аfAdds(]`sрЎT Сnr=Ž 2bв0).C—ПМwщ Q—б rж ЛA' Ignoa№ЊhiddАЇ (i.e.ay have2Д been filtered o@ut) If Range(ThisVar)(r).EntireRow.Hi$dd€ThGo€To Next0ˆOmit AndšValue <= " N V' Keep a track of the numb„er rows 18totl + 1 ‹NoOfSt0Colum€ns > 0 P‹€™' Put єinCvj…uŽЉŽ€<<> ""8 LastNoРnBlank‡aNot Copy№DataV‚WB+ref€nce ”todinDpcellŽ@CРAddressР$‹Ф(†ernal:=TrueяŒ™Р€Ц<=…< ' У@B)'. Use an IF function,С2avoid problemLƒƒ' wit”h AsB bТY#€ЩingР™eat€Щas zer o.T'y"=IF (" & I& ("=", _O( R)"QEјlseT‡)pr РwtIf.Eг€…‚A. Ds(n, 1)?РDb+ бBСoFromОoFactorRlrInfo(v).NamяL$Q‹J}f"ŒK@Ђ†УspFor iљ !1 Їр%&@Žу2V7(OutpuцtcТ(i2l#Ÿ$љРœ+ є 1  Д8 UAР iŸ;8*carИrieŒЊ%A:CБ/@/~Ÿayђ i)†.,т(GetƒOџ%™bA ‚с‚k`ѕnУњ mula Bрƒџр†ј‚_рє_Џ С <г‚|] ф}:јтr' IgnoТr drailqS‚T s unlAboPzrwi№ZspecрifiedиРСkжTДr^sя3 е …|G4ъq€} Stр-џ ~№2_}_А!€0ѕђ.s€пV_CчтФ?LenhЂAч:яf яТфџq&4ЯŠИ(ŸxŸю я!№Ѕ=ŠŠH‰ b#vТBApplica{.Calcp0Б xlAu(tom cч' `ReturГ–€aўlŒŸБЌ Q‚X i2ExЉFЄ‚ ReportError.Flagт 7 џџџџ€ џџџџ€ € џџџџ€ N € џџџџ€ p€ џџџџ€€ џџџџ„ ˜„ Ј€ џџџџ€И€Р€Ш€а€и€р€ш€ џџџџ"№€ џџџџ€ ј  (('8€ џџџџ€ 2H+€+˜+А Ш€ 8и++ +0+@+P+` p€ џџџџt€€ џџџџ0Ђь˜€ џџџџ!@€ џџџџP€ џџџџ" X€ џџџџ`€ h ˆ˜ € 6Ј р №ј€ џџџџ€ џџџџ" € X(€ џџџџ)€$)И€ џџџџР€ џџџџ"Ш€ џџџџ6а€ џџџџр€ џџџџ"ш€ R№€ џџџџ)H$)X€€ џџџџˆ€ џџџџ"€ џџџџ€˜€ џџџџ$G € џџџџ€ 8Ш 0@P X h x ˆ ˜ЈА€ џџџџИ€ џџџџ"Р€ џџџџ€Ш€ џџџџ$Gа€ џџџџEјE ( 8€ џџџџH€ џџџџ" P€ џџџџ6X€ hˆ#Ј#АШ€ џџџџа€ џџџџ" и€ џџџџ р€ џџџџ№€ џџџџ" ј€ џџџџ   € џџџџ0€ џџџџ" 8€ џџџџ€ @€ 0`€ , Р а€ џџџџр€ џџџџ" ш€ џџџџ€ "№€   8  H € џџџџX €‚ƒ„…†‡ˆ‰l‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉўџџџЋН­ЎЏАБВГДЕЖЗИЙКЛМЊОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийкўџџџqнопђстуфхцчшщъыьэюя№ёмѓєѕіїјљњќ§џџџ§ўџА1фДы1И1œa 1НœZџџˆЖџџџџџџџџџџџџ7„‘MюХиЖYv‹§њ6„‘MюХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ<џџ0<”џџ<˜џџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџџџ`„ўџџџџxџџџџџ€`„ўџџџџxџџџџџ€`„Lџџџџtџџџџџ€@„„џџџџdџџџ џџ€@„ЌџџџџTџџџ џџ€`„ўџџџџxџџџџџ€`„Lџџџџtџџџџџ€џџџџЈ@„„џџџџdџџџ џџ€џџџџ@„ЌџџџџTџџџ џџ€џџџџ`„Lџџџџtџџџџџ€џџ@„„џџџџdџџџ џџ€џџџџ@„ЌџџџџTџџџ џџ€џџџџИ) BDFвдH+м`„ўџџџџxџџџџџ€`„Lџџџџtџџџџџ€@„„џџџџdџџџ џџ€@„ЌџџџџTџџџ џџ€€+PLNмPRкџџX,ˆXжZ\о^џџX,pdрfhjlџџX,XpфшjšМџџX,@ОtцРъvџџX,(z|~€‚ьџџX,ь–@& + ˜ +џџџџџџџџџџџџP+h+џџџџџџџџџџџџџџџџџџџџш џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH-@&€+џџџџX&џџџџ+`„ўџџџџxџџџџџ€ `„Lџџџџtџџџџџ€И@„„џџџџdџџџ џџ€№%@„ЌџџџџTџџџ џџ€џџџџ,€ЬК„ZЂм,X8џџџ џџ @ўџ(џџџ џџ @ўџџџџ џџ @ўџџџџ џџ џџ-џџџџ0*џџџџHјўџџ џџ X,єўџџ џџ @ўџфўџџ џџ џџ€,џџџџИ+џџџџ`, шџџџџ˜ 8 џџџџџџџџ џџџџ h џџџџџџџџџџџџ@   Xџџџџџџџџџџџџџџџџџџџџџџ)И ˜ 7BпўЪœ€ џџџџ" ` € џџџџ€ "h €   А  Р € џџџџа € џџџџ" и € џџџџр € џџџџ№ € џџџџ" ј € &  ( 8 € џџџџ"@ € "H € џџџџ€p €ˆ € €˜ €@€Ш€ џџџџ€ Ј (ŸШ № € џџџџ€ , 90 € ,H x &   € џџџџ€ 8Ј € $р 9 € ( H &`  p € @€  Р  и № ј € 4 8 P  .%XByа€ џџџџ2X p € џџџџ€ $ˆ А € џџџџ0ЂьИ € џџџџ `€ џџџџp€ џџџџ"x€ :€€ џџџџ€ Р€ џџџџ€а€и€р€ш€№€ј€€€€€ €(€0€ џџџџ€ <8BЄxР а :р€ џџџџ€ C 8@2…X JС € џџџџ№JСXhpxJЋˆирш>S@PX`\lxиш0№0 JС(xˆJјшј00  :80X :p0Ј А Раи р №"20 8 @ 0H h €Ј":Р+ш   ( #0 @ H 0P p ˆ +˜*И€ Ш р№-ј€  8@€ HX`0<h ˜  Ј'А &dРш№€ џџџџ€ .јS('H*X Qp RА€ ,И.@ шј' € (A@X€ џџџџ`€ џџџџ"…h€ 6€€ џџџџ€И€Р€Ш€ џџџџIа№7"@(,4PH€    Ј А И Р Ш 0и №  ј    € џџџџ0џџџџHр Form dlgDescriptiveStatsрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin Grayer2Эџџh]Ќђ˜ ,@]Ќ ђР џџџџ]ђ]ђш ]ђ(]ђP]ђ ]ђ8 ]ђ –шр Set up the list boxesџџџџ мA ќA@K*\ ўЗбA@р, Put values into the box for proportion type000Ж Proportion ОB@^Ж Percentage ОB@^ЖCount ОB@^ftЌ О(re р2 Put values into the condition box for proportionsЖ< РB@^Ж<= РB@^Ж> РB@^Ж>= РB@^Ж= РB@^Ж<> РB@^Ќ Р(r}# р т ф цA@оnІ   - 9 Т ь т ц ф Ф v ќ ў Ц Ш Ъ Ь Ю а в ђ д ж и к м о р т ф ц О ш ъ ь ю №A@ш!4c5 т›GA@joџџЈ–( Фœр Display the variables boxЗ ќ(et2A@dџџXр0 Hide the variables box, and show the factor boxbЗ ќ(ThЌ'жЗ'vA@Škџџ№A@єoџџр–hрR Variable list has just changed, so check whether the OK button should be enabled. ќ$ 'жn жЌ  2Ќ  ( if A@єoџџ8–Ј v! ў(oџџ–шрL By list has just changed, so check whether the OK button should be enabled.tring ў$ '2on жЌ  2Ќ  (the A@єoџџp–(]ђh жЌ 2Ќ  Ф'і nр2 Disable all statistics except CountAll and Blanks і Ъ( S і а(va і Ь(ex і Ю( і в( іœЗ Ъ(џџ˜З а( ІўЗ Ь(ZЌЗ Ю( 1 VЗ в(me waskџџPA@јoџџ@–€]ђР жЌ 2Ќ  Ф'і і Ш ю(is nam і Ш №(is varЗ ю(Z$З №((oџџА–и в! ќ(р Adjust width of dialogor вœ џџ!€ И џџ(€„dџџP џџ!€ И џџ(€alkџџ0oџџ(– ф ш('noџџ–X ц ъ('$ ц О(Gx ц Р(ЌoџџШ–˜р refRange.Visible = Trueр) refRange.Text = NextFreeColumn.Addressр% Make book name box and label visible $З ('’З ( $oџџ–ир refRange.Visible = Falsee in tр refRange.Text = "$A$1"З (’ ІЗ (oџџ –р refRange.Visible = Falseœр refRange.Text = "$A$1"З („ЌЗ („'Zoџџ(–X џџ!(A@j8oџџ–˜р Cancel button just been clickedœ џџA@roџџР–ир OK button has been clickedut dat]ђђ0ђHOrde]ђ`]ђ€]ЌЌђИр Find the output rangeЊjэ ц ф : рЖDescStat$”.. .А›G|jр& Get the ids of the selected variablesа Ф жЌ œр& Get the ids of the selected variablesВЌ жт<Д ќ <A>kџџXр2 Unstack or copy the data to the destination sheetр Position data after the table v 2Ќœ'Др" Unstack the variables by a factorЌ 2с(џџ  ў A>b жЌœр : If no variable specified, assume first factor is variableЌЌт<Hџџ(Ќ$Ќ+< Skџџdџџр. Simply copy the visible rows of the variablesinglЌЌсh headekџџЈ !$X'˜e spec ˜Ќ›G Ж'˜jр Set up the descriptive statsAІ   - 9 Т ь т ц ф Ф v ќ ў Ц Ш Ъ Ь Ю а в ђ д ж и к м о р т ф ц О ш ъ ь ю №A@P! ` џџA@roџџP–pр3 Sets up the table containing the descriptive stats G]ЌђАond ]ђШ]ђш]ђ]ђ ]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]ђа]ђш]ђр6 Insert sufficient columns at front of sheet for table theІ эЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ. Є  B@э ..КэЌ ЬЌ К%Ц..рSet up headers ЌЌ .%Ф( 'Мџ ІўЌ Ь’Ќ І К%Ф! М ІЌ .%Ф(џ ІўШІ б МЌ$Ф М ЬЌ $Ф$0бД ˆ!ВB@B МЌ 'М ЦœІ б МЌ$Ф М ЬЌ $Ф$0бД ˆ!ВB@B $ &A@"kџџX Шœ ( *A@"Іэ МЌ Ќ .%Ф МЌ ЬЌ .%Ф$0.kџџш юœ !Œ М 'ЦЖR[ ЦЖ]C/SUM( .б, %ЎЖ)*100'L 0 LA@"kџџp №œ !Œ М 'ЦІ *ЖSUM(R[ ЦЖ]C2:R[ ЦЖ]C)/SUM( .б, %ЎЖ)*100'L 2 LA@"kџџи Ъ›G 4 6A@"j а›G 8 :A@"j ЬœІ <б МЌ$Ф М ЬЌ $Ф$0бД ˆ!ВB@B > @A@"kџџ8 ЮœІ Bб МЌ$Ф М ЬЌ $Ф$0бД ˆ!ВB@B D FA@"kџџШ вœ д›G H JA@"j и›G L NA@"j м›G P RЖ1)A@"j к›G T VA@"j м›G X RЖ3)A@"j ж›G Z \A@"j оœ ^ `A@" b dA@"kџџ№ рœ f hA@" j lA@"kџџР т›G n pЖ0%бЌA@"j фœЌ'n_џџ€ ш!d nЖ $j' Ж›Gxj $šœ $М$X' Ќ Ќdœ r Ќd$ОЖ)'L Ж%  t LA@"kџџИ kџџА ЙџџЈ kџџ  цœ Р!'Ќ'n_џџx ъ!d nЖ $j' Ж›Gxj $šœ v  $М x'L О!rЌœр Proportion L z'L |'ў О!rЌeр Percentage L z ~'L €'ўdџџ€р Count ‚'ўkџџ` ўЖ  Ж   LЗб„A@"kџџ(Йџџ kџџ ь!dЖœ ь!dЖ?Ж$Ђ ь!dA@"kџџиkџџар( Finally, prettify the descriptive tableэ Ќ .%Ф!Ш.. .!ЪB@b ˆЗЗЗЗ .B@†ЗЌЌ .%Ф!Ъ!Š(ŒЗЌЌ .%Ф!Ъ!Š(Ž ьœр%Convert to values and delete the data B@ –б” B’ К!ШB@˜dџџр Hide the dataЗ К!Ш!Ъ(ЬkџџXoџџPІїЗ– р0 Adds the row containing the specified statistic]ђш]ђ ]ђ ў МЌ .%Ф(џ ІўЌ Ь’эЌ І$К$„.  L$ZЖ? !Ў$Ђ'š šЌ$мЖ=›GЖ= š'šj М ІЌ .%Фѕ „œ š9œdџџ š9Lkџџ№ Ќ$(œ5 ˜$”9ždџџР Ќ9žkџџАqџџЈџ ІўШ МЌ 'Мoџџ€џџџџx]ђШџџџџPџџџџИЌџ .!N Ќ'м р9 CJG 19/3/03џџџџАэЌЌ .%Ц!Ш.р? CJG 23/7/03џџџџИ]ђРІ <  И . ь! ђбТ м бм 6б6$J'Ьme CJGџџџџа B D '6р9 CJG 24/6/04џџџџ8џџџџЗAttribute VB_Name = "dlgDescriptiveStatsˆ" ЈBasЈ0{4D91844E-C5EE-11D8-B659-000476€8BFDFA}J3B0J dGlobal•SpacAoFalse ŠC€reatablPredecla‰IdоTru BРExpose0TemplateDer‡•Cus tomiz‹D ' Form ЊƒCopyright 2002: Иistical Services Centre, The Un€Crsity of Readingƒ%Written by Colin GrPayerO€цon €ulicit Const DefaultSi gFigs@H4  CExtraWidth@160С Dim NoOfVars AsР IntegA FactoаD@iР$umnТ RangРaA ›tinaќti€'@HШ ЪCurrERowy!Lo@AХ1Щ& PРnРp Sub  Userd_@*$iv@()A6  '\t up t€Yla boxes РCall@;itЄs(ctmnA4A@Ÿ@РPœutƒ*Т€*oLЁР lst@KiA†CBZ By, ƒP:N=ƒЊР‚ '  valuРƒintoB)for p roporТPty†p@V€ cboP€.AddItem< "A Ркer"c€*ageCountkСIndwšZš< я Т6I n€a€IeOutputТ[ refa, opC"N€ewSheet…pBookЂ‚€e  Œre!trol&s`wчДavрƒchўkс‰ASb‡ @ Ё % }Ф _ `6CРEU,ю €ЁQШW,aYaЯCbNonBlaЄnkƒumРІcbMeanStdev"Total|, Я @VbEЁрS Vф@MaxiˆmumЂMingˆediф Qua bles1 SkewXnes`с SтCъVТPЃ`i" ЧfЧЁƒjN txtъсзfrррOРŠr) b`CumulЫ0ЂI–ffCСОnІ_C ИУB7 End џ ›!™‰Р%:уРE јRr№' DispoyRFvarђKsQ%ˆ!.Vixsib2xFK@_ьCh_`ER|€ @' HideO,d a shр]СXfReпR и|Гvj=Ю ƒI`№ByJi '2XЁIfbEnџa[&ysJЯ”‘eџд eU rehas j ƒ@6ad, soАeck whFeq""OK а™t€quld beф e" d.cRˆNumberSe€lected( cjbtnOK.c БŒ((Ц> 0)№ Or e|A“ЏQПДH)' Bцyb.VQmЂ џyЗByT$WАџgњeџrџџ іф= /ByЯЯЯяЯPЁžs% ЯФН‡AУ OnlyСНp^lАVє@ ш=ууа(Ёž0 AP6 #Œs ! A Not№(^kU+З‚AA1 ‘sаС`Žics exАceptpЇ‚AА’џё;‚`У €€С`иQџЧ BpRa_`ЅUџсdOLЂf_\зfЏџЉ Yз ъRй Б,FЊHћW п г ЯТT џпвй .ИL1 ДyХNП''О'aО' @,џ'У€X'dG'ДАџ”uиx!,ј ѕ!ruї22@/kV^РфЎ/'—Aт fќraYЦspyСђа' Adтbwви`пљ@ŽloPпАP)zŠ)иMe.мІ+Pр“н7Зth Else€АMe.Width = P- Extraƒ\Рnd If( ESub Private  chkPercentiles_Click()JЪtxt8.Visibles 5aropoрrtiona aУ‚0cboP рCondi6›‰optRangeХ †'€†ref‚ +TruЩ Tex t€NFreeColumn.A@ddress‚c' Make bo@ok namx aЯlabel vƒВРWor:k N@ N@%lb l ™:NewS0heetG;   )?@ ‚ т џ `ЧХReѓс@! (1Ё2х Ž3@ Call ItemsInBox(˜lstт, AC!aзй"Unstack or c(opyBdРH toch3Ђ-Ђ' PosBУ ‚aftterтtA#b##BЦyf"#Ls <я"Ѕa.ц+ by a ўfW" c"iUЁ"$ ‡c А!By, УПV %`'Ћ@'  noі specified, assu№ffirу€A isІе P­M1пP 2(Р>=T АUH™‹' РSimplywo№ rowf+л* Ѓ>(@б>’hЕ<= cmnIncluцdєwБ6 +hƒb'CJG 24/А6/04C=ЁL€((255 -й8.E) / 2)‚ b19/3/03bA…G= Un = •A-%, DЧ'LР7+, _2ЃPР:Cp.‘R.Va@lue, S•:6=€,0…eN:=Щ , D:=„s$вSigFigsћP$ (АIƒа&9e<=„A…Deрfault$RBPRupХ8criб€Vve `;t#Hв.™pTupOђon utSavрntprolsС5q,ЋBV’WхVЏWk‡ ”F@By, кGР1CountђNonBlanFkУ5ricВMean‚Stde‚v’TotaloќhkЁIбЦ€є CаimumbMDinЗeditQuaрЕ@XhkS0kewnРЇSSљbCVbиНѓ'З№ѓЖ.€"zёy№OQрР ”вCumќulˆˆu./‰dЪ}"ч!Ъ@b&s t&B\pE8nta`€rqYde>sЯ'~Р–pPp9rtјRow`0ƒ; 1lд;ToInsertџ1‚R A9П‰%~џЂˆЛiAЄ“єЁStrаNumb@lP—і‹Б ForНРa [рC а‚do Headѓќе/b ћ Off~s @з ‚ B jsРufficiРчPqвs at fr˜ontё‹‚{ f0~Ÿчy€  Вv= Ђ(а™.Cell€s(1, 1),pщZ+P]).E]0ёrdr ќ .d!(xlShiftTРoRightsSq !4Р%XвhŠ= ј.у(0, -NyЕoOfColumns - 2)   'Set up headersLDestination.Cells(1, 1).Value = strADcStat^CurrentRo6w8*r2For i(1 To| N„‚iK,…9+ vDataФ –i–QNext i ActiveSheet.Names.Add :=ˆ_Hdr8, _‚GRefƒTo:=Ra0nge(ƒ‰J2)ь,  n ZБ€„@8"R[" & Ф& "]C/pSUM(JCСИress(BБenceStyle:=€xlR1C1)€€")*100"… gЇ:$х , I/юC–u€=ПeП "Aщ/2:o)Фн8ъ:ў&ь-@$s$Ђ?$тy€Numericb$ў Ч,сGD$]уЉ-cf`TotalЭ‚,‡ Љ`OMean"Ц;П ЁИс?ˆ"СчT,ѓрШ?Ё1)#Ё@2‡ у ЁiŽLStdevџџЏК`sЃ4…чПGЛ ТZ` iсъ$;х4#>ттF‚, ТI рЃMin0imumэФ, П@gQuartilesнLQ,Ю Х”СC1)–CФиedi4'8 MR orŸŸЗ!UŸ‘3‰žaxotrMcАƒЯРSkew>npRR5 , ЕŒкKurtoќsi№p•мЈ-€ЃЬSSяqCsА@чOˆ1UsŠwРЏMА…VЂCV ;VфГ^at:="0% da6"иPosхРi1DoШАФP‘™Field(Htxt8.T ›,‚  , " "ЖBOР €'""C E0xit IsѕtU(4)ђ @д1Рber   Œ(DРecimal3ім ф>= 0 ЦAрŽ[<= dџ? !tРd& иStrѕ$/ЁЃ{ПЖtb!”Б2% ў&QК4Ры|щћ"“с>Loop…Ы€A5PropoDo'№Х)ЌрCoа= јcbo‘ТOƒФˆŸ$џ§ђІ№{$W$“ Sџ@ _$ˆpW$?$oт6412&f [%є& Ч$2Јг€.Li€stIndexац0%ѓ 'Xо0O”0•a3Ÿ | H‚с€П— žEјlse_ R РпXЭ ‹bP erВageПо %Ј_ Ђ&” 3‡ §D4яЌ • Ё яў 0ЂжЏ›O.5џгФ;D НЂ;є#QА r#і;, AsArray:=Tru\Nv;ХГ End If   If txtOther.Text <> "" Thenˆ”AddRow Replace€String( n , "?"")>,  Šь ' Finally, prettify  descriptive table-Se@t Dest2t ion = .Cells(StartБ, 3).CurrentReg.!.EntireColumn.AutoF it‚ ormat xlRange‡Classic1, Trueс‹FalsƒZ 9ƒQ 1) ?Fontр.Boldj&ŽC›Italic€;яchkCop yData ы'Convert to values a€†deletсР[he d€ ‚ @€eD]c@Vts€Щ3Offset(2, 4J['CJG 23/7/03З.A&EC€€Сr„PasteS€pecial(P:=xlV‚+)†Р)ps {.Clhear‚ Eb$H|idO8HSŠˆРdeAhŠГSub Priva€R€ а(By€. Header As SBв, EУF@˜ula _зХ8€-‡OРФo@ЬФ €AsArray~L, b Ё atƒ('Us‚nrр|cрPa,in€|Bs0fied stati @ocТ‚Dim У&"L€тcfThisІiIntјegeу4#Ч{zЅJќow‚L@р#)b`  i@1 To №NoOfd9‚@'XAш= All!IZnЃ(CsAYi)цKI=Œ Tri|m(ф@Ÿ‚ Ѓс .aр>ressF рqLpeft(H ЂЎ=GУЎ€t'&= "Р&УiWithPŸ)%јi +@r€ Р…Eћ,М€.Ф…IhH i€ш€/T*Ю РIјsMiРІРШЁрP@JЮ NumberУ  SigF@тАф(.b@, ƒ',рџP, C ЉJxС+њNЁтiBg+ ˆ , т Ц џџџџ€ € џџџџ€ N€ џџџџ€ h€ џџџџ€ˆ€ џџџџ€„˜€Ј€ џџџџ"А€ џџџџ€И€Р€ џџџџ8vфШ€ џџџџ€ @ ` (p'€ ( ( € џџџџАШр №€ @  P ?h ?€ ˜ Ј И Р аир€ џџџџш€ џџџџt№€ џџџџ€ џџџџ" € џџџџ€€ €(€0€ џџџџ8Phxˆ ˜ Ј И Ш0и 0 P X0h˜ € џџџџЈ€ џџџџ" А€ џџџџ€И€Р€Ш€а€ џџџџx!фtЛ!€!ДM1НgOџџˆЖџџџџџџџџџџџџИ$o(ХиЖYv‹§њc$o(ХиЖYv‹§њ2$o(ХиЖYv‹§њЗ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџ0 рh џџџ џџ @ўџџџџ џџ @ўџџџџ џџ @ўџџџџ џџ @ўџ№ўџџ џџ @ўџрўџџ џџ @ўџаўџџ џџ 8Ьўџџџџ @ўџМўџџ џџ (Иўџџџџ @ўџЈўџџ џџ @ўџ˜ўџџ џџ @ўџˆўџџ џџ @ўџxўџџ џџ ўџtўџџШ`р(8@dўџџ џџ @ўџTўџџ џџ HИРМОЊЎ8јPўџџ`џџџџьJЈАВФ8АLўџџџџ @ўџHўџџџџ ш(8ўџџ џџ @ўџ(ўџџ џџ XЦТІтP88ўџџ џџ №ўџўџџ `8џџџџGџџџџ0ўџџџџ @ўџ ўџџџџ @ўџўџџџџ @ўџўџџџџ @ўџўџџџџ @ўџ№§џџ џџ p(р§џџ џџ @ўџа§џџ џџ @ўџР§џџ џџ @ўџА§џџ џџ @ўџ §џџ џџ @ўџ§џџ џџ @ўџ€§џџ џџ џџџџр|§џџ џџ @ўџx§џџ џџ @ўџt§џџ џџ @ўџp§џџ џџ @ўџl§џџ џџ @ўџh§џџ џџ @ўџd§џџ џџ @ўџ`§џџ џџ @ўџ\§џџ џџ @ўџX§џџ џџ @ўџT§џџ џџ @ўџP§џџ џџ @ўџL§џџ џџ @ўџH§џџ џџ @ўџD§џџ џџ @ўџ@§џџ џџ €ўџ<§џџ џџџџ0,§џџ џџ @ўџ§џџ џџ @ўџ §џџ џџ @ўџќќџџ џџ @ўџьќџџ џџ @ўџмќџџ џџ @ўџЬќџџ џџ @ўџМќџџ џџ @ўџЌќџџ џџ @ўџœќџџ џџ @ўџŒќџџ џџ @ўџ|ќџџ џџ @ўџlќџџ џџ аџџџџшpџџџџp  џџџџџџџџ˜џџџџ@ џџџџџџџџџџџџЈ € АLџџџџџџџџџџџџџџџџџџџџџџ,+Ш ˜ 7BпўЪx€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€и№( 8 H X h0xЈ А0Р№ ј08@€ џџџџH€ џџџџ" PX`h€ џџџџ" p(x € џџџџ" Ј(Аи€ џџџџ" рш№ј€ џџџџ"(\0€ џџџџ"8(\@h€ џџџџ" px€ˆ€ џџџџ"  x˜€ џџџџ"  x ˜€ џџџџ"   xЈ € џџџџ" (  x0 Ј € џџџџ" А  xИ 0 € џџџџ" 8  x@ И € џџџџ" Р € џџџџШ  а  р  №      (  8 H € џџџџP € џџџџ" X € џџџџ` € џџџџx € џџџџ"€ € џџџџ 6ˆ  6˜  6Ј  6И € џџџџ 6Ш  6и  6ш € џџџџ 6ј  6  6  6(  68  6H  6X  6h  6x € џџџџ ˆ  ˜  6Ј  6И  Ш и  6ш  6ј     ( 0 € џџџџ[8 € џџџџP € џџџџ" X € ,` € џџџџ€ ,  Р  а € џџџџр € џџџџ" ш € ,№ € џџџџ€ ,  P `€ џџџџp€ џџџџ" x€ *€€ џџџџ€ PА  € џџџџ € џџџџ" (€ џџџџ0€ џџџџ@€ џџџџ" H€ &P xˆ€ џџџџ"€ "˜€ џџџџ€Р€Ш€а€и€р€ш€№€ј€€€€ €0€8€@€H€ џџџџ€ P(–p˜€ џџџџЈ€ FА ј% @( S@ SX Sp @ˆ S  SИ Sаш№€ 8ј0 8 &P )` Yp ˜ &А )Р а€ 4ш Y @€ џџџџ€ <Hˆ ˜  ЈB›Ај  *€ џџџџ€ >8Cx0Š0ŠР № % (€ D0€ <x 0ŠИ `Zш H >ІX ,Q˜ .QШ .Qј ( e0 ,QP .Q€ .QА eр ,Q .Q0 .Q` ˜€  >Иаи6р"60€ џџџџ€ $88•`€ џџџџ>˜€ џџџџ8vфА€ џџџџ (€ џџџџ8€ џџџџџџџџHр Form dlgTwoTtestрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџp]ђp ]ЌЌђ˜ ]ђ–p]ђА]ђаІ    % І ь т ц ф Ј Њ Ќ Ў А В Д Ж И К М О Р Т Ф ЦA@шueр Set up the list boxextFre мAdress ЎA@e book ДЗбA@ АA@e $ ВA@'’ЖSample 1Ќ+ ЖSample 2Ќ+ ngэ $Ќ.Ђ ЂАœ Ђ!Ќœр 9 Descriptive stats are displayed. Take these as defaultsџ ІўЌ Ђ!’ls І$Ђ! ШB@^ І$Ђ! ЪB@^џ ІўШ (Ќ Ш(r(A@ЬЌ Ъ(r8A@Юkџџ kџџA@а р т ф цA@оœoџџ№–ш]ђ(]ђ@]ђ`]ђ€ Ш!rЌ 'Іut dat Ш!dЌ+ Ordeэ $Ќ.вэ <$Ќ.дэ B$Ќ.жЖ К(dЊjЖ Ж(d: Ж И(dat$ вАœА І$в!Ќ ›G І$в! К(djkџџ№ дАœ І$в!Ќ ›G І$д! Ж(djkџџЈ жАœ І$в!Ќ ›G І$ж! И(djkџџ`З'ЌoџџP– ]ђр]ђј]ђ]ђ8 Ъ!rЌ 'І Ъ!dЌ+ э $Ќ.вэ <$Ќ.дэ B$Ќ.жЖ Р(dЖ М(dЖ О(d вАœ І$в!Ќ ›G І$в! Р(djkџџP дАœ І$в!Ќ ›G І$д! М(djkџџ жАœ І$в!Ќ ›G І$ж! О(djkџџРЗ'ЌoџџА–XA@аA@кoџџ–˜ Ў!dЖ Д!dЖ (oџџX–и Ў!dЖ Д!dЖ (oџџ –A@аA@рoџџ–X А!dЖ В!dЖ (oџџШ–˜ А!dЖ В!dЖ (oџџ–иA@аA@цoџџp–І ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџш–XІ ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџ`–˜І ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџи–иІ ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџP–І ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџШ–XІ ' Ж!d$š И!d$š К!d$š М!d$š О!d$š Р!d$š (oџџ@–˜ ФœЗ Т(З Ј(З Ќ(З Њ(dџџшЗ Т(З Ќ(З Њ(kџџАoџџЈ–и Ј Т Ф(oџџ€– Ј і( Ј ј( Ј А( Ј В( Њ њ( Њ Ў( Њ Д( Ќ ќ( Ќ ў( Ќ ( Ќ Ж( Ќ И( Ќ К( Ќ М( Ќ О( Ќ Р(З Ш(З Ъ( Ќ ( Ќ ( ЂАœ Ђ!Ќ œ Ќ Ш( Ќ Ъ(З (З (kџџаkџџШ Ј Т Ф(oџџЈ–Xр& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџ–˜р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџˆ–ир$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџи– џџ!(A@joџџИ–Xр Cancel button just been clicked џџA@roџџp–˜р OK button has been clicked]ђи]ђ№]ђ]ђ(]ђH]ђ`]ђ€]ђ ]ђИ]ђа]ЌЌђш]ЌЌђ ]ђX ]ђp ]ђ ]ђА р Find the output rangeэ ц ф : рЖTwoTtest$”.. .А›G|j Ќœр? Select the output range so that subsequent selections work OK. .A>Ќ'ЬЌЌ .%ЦѕЌ$ ЌЌ;Ф К!dЌЌ;Ф Ж!dЌЌ;Ф И!dЌЌ;ФЌ$ ЌЌ;Ф Р!dЌЌ;Ф М!dЌЌ;Ф О!dЌЌ;Фqџџdџџр2 Unstack or copy the data to the destination sheet ЊœЌЌт<ш Ў <A> Д A> <  И . ь!ЗAJ ЈeЌЌт< А <A> В A>Ќ$Ќ+<р . Simply copy the visible rows of the variables < И И . ь!ЗAJkџџИ р6 Insert sufficient columns at front of sheet for table ФœЌ'Ьdџџ` Ќ'ЬkџџP ІэЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ.   B@э ..КэЌ ЬЌ К%Ц..р8 Calculate the mean, stdev and df of the first 2 columns К!Ш!Ž!'эЌЌ К%Ф Ќ К%Ф$0.эЌЌ К%Ф Ќ К%Ф$0. !Ў' !Ў' ЌЌ .%Цѕ Фœр > If either column contains a blank, make the difference blank.р 6 Note that Excel treats blank as zero in calculations!эЌЌ К%Ф Ќ К%Ф$0.І Ж=IF( Ж =" ","",IF( Ж=" ","", Ж- Ж)) (œ !Ў' ЌЌ К%ФЖ - ЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(œЖ =AVERAGE( Ж)ЌЌ7Ф(œЖ =SSCSTDEV( Ж)ЌЌ7Ф(œdџџаЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ =AVERAGE( Ж)ЌЌ7Ф(LЖ =SSCSTDEV( Ж)ЌЌ7Ф(LЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ =AVERAGE( Ж)ЌЌ7Ф(LЖ =SSCSTDEV( Ж)ЌЌ7Ф(Lkџџhqџџ`р Hide the dataЗ К!Ш!Ъ(Ьkџџ( ФœЖPaired tЌЌ .,ФdџџјЖ Two-Sample tЌЌ .,ФkџџШр Set up the descriptive statsІЌЌ .%Ц Ь Ц Фб ТбAЌЌ .%ФB@HІ    % І ь т ц ф Ј Њ Ќ Ў А В Д Ж И К М О Р Т Ф ЦA@P џџA@roџџРџџџџИџџџџBЖAttribute VB_Name = "dlgTwoTtestˆ" ˆBasˆ0{4D918407-C5EE-11D8-B659-000476€8BFDFA}J3B2J dGlobalSpacAoFalse ŠC€reatablPredecla‰IdжTru BРExpose0Template Deriv–Cu@stomiz‹D  ‡' Form ˆЊ ' Copyright 2002: Statistical Services Centre, The Un€Crsity of Readingƒ%Written by+lin€ Grayer€Option €u licit Dim NoOfVars As In˜tegA Sa€=eHC(1 Toш 2)A S€ŠС erRange7AP€J€L S€ub UserA>@_activ@(Р) pCellH€AiGF$Х utR€ЃoreCoDols" …ЈSavРGchŠkСSD€„, _‚#€€optB', @NewBookСХSheetŽ €ColumnsТ OnРBSummary cboЉCM, †1ТsS 2ТBL txtM ean, StШdevCiz€3I0џФ  „@ @‰ @A€Unequal@`hkPai@П‚CIШD‚'™t u(p t@KlO b$ox"Caр2InitAps(cmnС*Aрm8Put$ѓт@5oLР Їт њЁ!F Cor:=чCs€5? e1_ „.›‚LZ)œc 1€_+р]Р $2$et Љ^= Fin d! dтK(strDescЁxHdr™#%IfрlыIsAіh waznт Ј .Count >˜= 2Њ' Ё „ri zve s`†„s `œ dis •yed. Ta keС:`Еas d€efaultsE ѓ€Рr i  Ђ{ю` ZЃ=1.AddItemщ (i)№.ValAЋ`F†2ŸƒNext iHшСKIndeŠx@0R_Cha‘љq2.ЩУGC‡ЬРEnd If‚ H‘тSho@ˆxeІ)Ђeia€heOuŒtp`•ЃrefGŸ'€'’Ђ Ё џ@Ї-ЉG!-ЉnІТЋaHџТЌTЂHПc[A#Гз˜+ “‹41Ё6эјT@ЂSа42.ƒџЯ4Ч4bу4Q— OGџQ7( OGbS‘VэрU. @'"3@Pџ_’lД?XЏ?r(€УGі4 > 0В?тaџИП`€˜*ЄБ ѓџŸŸŸ‘љіІВgтŸheщN eџ0I`2!q5Пџ”:Р4Фye?5АЎб‰ѕV)2?5 ˆ№?5"џ2Бця6р–gВЏ:5йJ?5Pc(;52џr?5jjВї1— я1љ?5 ‘( O?5№я45 N5ot"}Д-эз# Я-Р \ АPtџвV#n5і/&$&5џЯ|Бpпб-=!ІџіŸ›H__ц5џЖ'ЯФŸ5cМ?пjгqЖ6Г_C@ЧkфjЛs8Уbє7Ÿ:—:Šдb€tnOK.Enз !м(CC<> "˜" A |€ByHџ€/Џ "Ы’ћ@oХОoњoodq§|GЦ/.oх…р“1? _ЙжžOьG1т ШГ <> "" And cbosample2.Te„xtШ) ElSub P€rivate 8ИSИ_Change(V btnOK.Enabled = (ЎP1Ў1тoptSummary_ ClickpShowBoxes  ~txtMean“Н &]IsN€umeric(„ ‚`)^Š Stdeњv_‚CEГ‹јize0pƒв•E…џ-FФ —}B;}J9+џD9O@Nщ8N@u’qbNя€{?NƒЃПœ ?NDcbw П hjS"'Cz2џ?'Ÿuy?'"wВ<ŸuЮЯ_N?'0Ž?'b …u_'џџœb _'_'пЃJЎ…#Я1ї!‡_'_'dсйЭлA'A,џŸNŸNŸNЂ&Џ€ŸN?ЮŸN?'Ÿя: chkPairedWz"IfЇ Th en… Unequal.Visiƒpƒ`ƒFalseTwoColumns.Valuтe TruДЈ‡q=One3?АE?/ џџ я= s&Q•IfOŠ%–hўk„ B S8jёвNotATп Чv”бЂlbl•›‡ћJk2П#bx п’eeЈogВ Fрactor‹†ЯS Oв EByџR№5{t #RЊ ч!=ry"€G?џ‘IB“/'‘:o  Гч9ќOev/ёЗEПѓ@tb`C71јџ—9ц™чd п е 7п ж аGС0HeaderRёЪ IsТ hingъHX.Count ј> 2J№B 0Bа1џi`™џ і “я0џзMљZиEŠFCь= :=Cl‚oJdJаJJ' ExistСгPion has bee2n`Ios4`т' Make boo k nam‘x aАчlabel v“aЂ0Work}ЁN˜!цU€/lZcџ ї NewShXeet, ` asџБQ Sm    Пc ЅrF  B  жЖew Workbook option has been chos€en €' Make Ќnam$x and label invisible, since nИXcannDotЈ repdQœtxtєNM.V= = FalDse#lbl#  EƒSub Private  btnHelp_Click()ЪGet! Me.Co€ntextID‚7i™%Cajl‡&€% ' ƒ buttq€jussž:eƒt Unload9™/OKŠ-' OK+Щˆ*XDim€ i As Ic(ger k De`stinaѓ€RangУYDataBA‹NoOf€Columns‘„ToInser>tЯШ LengthLong†11СStr iN2PFactor(0 To 1) GDumm y‰ 0“ iffeя€ЌРВ@KЬDС3Ÿ+N*GEдFiРЎthe output r†dSetb Щk= O‚Т(ЁРъNewB€э,СэРSheet, ­DеsAе,РмfТ , "TwoTtMР€"У€ЏIfJI@s Noth€, „Th@XExiti/‚1‚S 'ary‚Т@ ' Se lect m so`at subРsequen@BБ`s w€].х№CallD H ƒ#€ ЩQ= 2eWiHш.OffseРt(1, 0fР.Cells(2, 2) Sam€pleHead 4(103$`+Si€ze.Text……ч 4ЇMeanДТ5h tdevд€К32“"„2 џ ХЁеРІ СыЗ­Ё,‚E…Д@ '@œstac€Шr c(opyт@d Š tёс?e dH‚S(cJ8OneC}ЊJ Reсa“Varsz€@GItemsIn€Box(cbo;,  'PBy,G ЮС†UnS(sЁ…, (ˆ€g, цkC Až.VaќluРстй с&ƒРq§ƒsНU Щ˜М`^љпosB_А&ГPЙб^(ђ1tRŠ1р>iP3yЗД rows ofђvaria§sЕu;ЛЇYЯ0(‡ TIfЕu' qRisuffi4ciHcДl`Ifr€ B) for t1 хchkP`aired]{H1Ÿ%‰1пJ@ Б4Яз б^Д ft= .PЄKСа1), __AйOSN  +0O)№.Ent№ ѓ5м.Д|(xlShiftToRighюtЦ i}=Љd5Bˆ?@ A”хY0, z-) - uq–lиculЁfmV`ІJЈdf5'fir§ ˜2€)тŠ3D†kCur0~tReg i.R№+.Couюn^A р1 bє8 пІdёј„i,РˆъeР2OnsД`92ч@OK2)Fƒ 1.AddreоsЦ7г2нЯsЯs&џ0ёС‘2а6ft e€xeq`!ntaiЃa blРank, maФa^d–Ђf€ѓ'ёˆe# Dp:Exc0ЦtrXeatрЩq pЪzˆero€Ч caг!§1…!5C2(Бšц4яј, 3Ÿ ‚#S#1–Ѓ! .FormA€)Arrayа"=IF(" & Г1"="" а"",",в;лU2] -їЂј))"K‘ ”ЋР.аэѓ™&А Џ&‚FС ќ- 1Z‰€TƒR“яCOUNTёH & "- TR•_€AVERAGE#:r—SSCS№TDEV‹<]W?R:ПР#ВkŸlaљА"=Gh#rЋвЩџА #дš\В = "=SSCSTDEV(" & Column1H")" .Cells( 2, 3)рDataДs21, 2)f3f.Fo rmulaшCOЈUNTт2q4=€AVERAGE$?5?ђ@End If…gWith…'Hide tphe d„… ŠurrentRegion.Entire˜.€dena„True‚6I€f chkPa@d Then.eРstinat'ƒХU€И1Х"„tйE,lsƒ*€оDTw€o-SamplР1‡<' Set upУ9escriptive stats‚Call MakeTT able(ЩOf fset(@)0)@, NoOfŒ, txtCI, ž_Т™„У3:=B, UnequalVarianc|esCТд;.Select A utSavcn@trols BTtРI,_Copyr (optRa nge, @Ne wBookХShxeetŽ F<Р On€B SummaФry cboƒdР!w…РO€sBj@пРBCL @SMean‚UStdevCizР*џ‰XФ @ D  ?I /„+""2Т CIb(‚Unload„ MЦM aYSuba-dlgBoxPlotAџџџџџџџџрyzmodTtest56џџџџ"–5dlgOneTtest1џџџџџџџџ8Б=dlgQQPlotџџџџџџџџџџџџ\э6ўЪО€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ ,h€ џџџџ€˜€ џџџџ€ € џџџџ"Ј€ џџџџ€ А а (р'№€ џџџџt€ џџџџ B€ џџџџ )`€ @p А Р ар€ џџџџш€ џџџџ"№€ Xј€ џџџџ)P`€ џџџџx€ џџџџ"€€ џџџџ6ˆ€ џџџџ˜€ џџџџ"  € џџџџЈ€ BА ј   0@€ џџџџH€ џџџџ" P€ ,X€ џџџџ€ ,ˆ И Ш€ џџџџи€ џџџџ" р€ ,ш€ џџџџ€ , H X€ џџџџh€ џџџџ" p€ *x€ џџџџ€ PЈ ј € џџџџ€ џџџџ" € џџџџ(€ џџџџ8€ џџџџ" @€ &H p€€ џџџџ" ˆ€ "€ џџџџ€И€а€и€р€ш€№€ј€€€€ €(€0€ џџџџ€ 8(–X€€ џџџџ€ ,Р&и€ џџџџ€ >ш(@"0X €€ џџџџ€ 8€ 2ШG@ (€ (8`&xˆ   %Р р№€ 4ј0 H P PА%€ џџџџ€ <` B›  ш  ј  * € џџџџ€ $( "WP € џџџџ Bx € џџџџ Р € џџџџа € џџџџ"…<2 и € а#фД$и#_1НZƒџџˆЖџџџџџџџџџџџџК$o(ХиЖYv‹§њg$o(ХиЖYv‹§њ4$o(ХиЖYv‹§њЙ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ <џџ0<Єџџ<Јџџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџРјHџџ@”>˜Hџџ@”@иHџџ`„žџџџџ(џџџџџ`„B &џџџџџ`„D8 џџџџџ`„џџџџџ`„ІЈџџџџџ`„8`џџџџџ`„Zџџџџџџџџџ`„FАџџџџџ`„H˜ џџџ џџ`„–Pџџџ џџ`„Ьџџџџџ „ џџџ@% „Jxќўџџ`%`„Lјўџџџџ`„Nџџџџєўџџџџ`„P(№ўџџџџ`„R0ьўџџџџ`„T˜шўџџџџ`„VШрўџџџџ „Xрмўџџ %`„Zhдўџџџџ`„\€Ьўџџџџ`„^ Фўџџџџ`„`јМўџџџџ`„bјДўџџџџ`„FААўџџџџ`„dрЌўџџџџ€ўџ№ џџш џџР џџџџџџџџ%ўџџџџџџџџџ џџ№ џџџџџџџџ %b€жџџџџ4џџџџ@џџџџџџџџџџџџАџџџџ˜XџџџџXXџџџџи џџџџи˜Рџџџџџџџџџџџџџџџџј ƒўџџџџџџџџџџџџџџџџџџџџџ‚ Œџџџџўџџџј џџўџџџџџџџџџџџ%џџџџH џџџџ р џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ќўртф@ˆxџџџџџ @ўџtџџџ џџ @ўџpџџџ џџ @ўџ`џџџ џџ X \џџџ џџ А ьЬv@јXџџџ џџ @ўџTџџџ џџ @ўџPџџџ џџ @ўџLџџџ џџ @ўџHџџџ џџ @ўџDџџџ џџ @ўџ@џџџ џџ @ @8ўџ<џџџH ˜рє@№@ш,џџџ џџ @ўџџџџ џџ @ўџ џџџ џџ @ўџќўџџ џџ @ўџьўџџ џџ @ўџмўџџ џџ @ўџЬўџџ џџ @ўџМўџџ џџ @ўџЌўџџ џџ @ўџœўџџ џџ @ўџšўџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџ@@ж@(xџџџ џџ @ўџtџџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџрpрXxџџџ џџ P@ўџhџџџ џџ Мовр(dџџџ џџ рАџџџџИџџџџџџџџџџџџШHˆp№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€рp:р”жќ>Ш€,џџџ џџ pЃ `@ўџ(џџџ џџ x"Ш@ўџ$џџџ џџ  @ўџ џџџ џџ @ўџџџџ џџ @0 `@ўџџџџ џџ pЃ `@ўџ№ўџџ џџ аьўџџџџ €,@ўџмўџџ џџ иўџџџџ @ўџШўџџ џџ P0Фўџџрррvў J0o(Рўџџџџ L=Ш@ўџОўџџџџ L=ШЈШМўџџџ ИШр№Кўџџџџ Ф0'0џџ(Иўџџџ 'џџџџ* р(Дўџџџџ 5 ИЄўџџ џџ @ўџ”ўџџ џџ @ўџ„ўџџ џџ @ўџtўџџ џџ @ўџdўџџ џџ @ўџTўџџ џџ @ўџDўџџ џџ ЌFШ4ўџџ џџ №GШ8Ь(тPrр80ўџџ џџ @ўџ,ўџџ џџ @ўџ(ўџџ џџ @ўџ$ўџџ џџ @ўџ ўџџ џџ @ўџўџџ џџ €ўџўџџи рxрpўџџ џџ % @ўџј§џџ џџ @ўџш§џџ џџ @ўџи§џџ џџ @ўџШ§џџ џџ €˜` џџџџH џџџџH№џџџџH h0 Ш x џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp@„$џџџџlџџџ џџ€8@„&џџџџ\џџџ џџ€`@„*џџџџLџџџ џџ€ˆ@„,џџџџ<џџџ џџ€А@„.џџџџ,џџџ џџ€ ј?BaseLWhLB`UBXUWPMedianMeanOutlierExtremeџџџџ`œўџџ џџ h˜ўџџ џџ @ўџˆўџџ џџ р(„ўџџџџ @ўџ€ўџџџџ џџџџ:0ˆnx|Ppўџџ џџ @ўџ`ўџџ џџ иўџ\ўџџ`Ш1иЈLўџџ џџ @ўџ<ўџџ џџ @ўџ,ўџџ џџ @ўџўџџ џџ @ўџ ўџџ џџ @ўџќ§џџ џџ ўџј§џџР`и9(є§џџ џџ @ўџђ§џџџџ 0Q@№§џџџ `Qpь§џџX`pЈSИ0м§џџ џџ ўџи§џџ `И№h0Ш§џџ џџ @ўџИ§џџ џџ @ўџЈ§џџ џџ @ўџ˜§џџ џџ (И”§џџџџ @ўџ§џџџџ @ўџŒ§џџџџ @ўџˆ§џџџџ @ўџ„§џџџџ @ўџ€§џџџџ @ўџ|§џџџџ @ўџx§џџ џџ @ўџt§џџџџ (p§џџџ Xx(`§џџ џџ @ўџP§џџ џџ h›І L§џџ џџ`ИГШ<§џџ џџ рР№8§џџџџ`Р(§џџ џџ 0Т@$§џџџџ`XТh§џџ џџ €Ф§џџџџ`ЈФИ §џџџџ аЧр§џџџ јЧјќџџ џџ Щ0єќџџџџ`HЩXфќџџ џџ ˆژ(–@œž Є˜ЎЖИМЪЮАѕРдќџџ џџ ијшаќџџџџ`јРќџџ џџ (8Мќџџџџ`P`Ќќџџ џџ x џџџџЈќџџџџ`џџџџ џџџџА џџџџ Р џџџџџџџџРџџџџ № џџџџџџџџџџџџа Ј  ьџџџџџџџџџџџџџџџџџџџџџџ P ˜ 7Bпџџџџ€ € ( €8 €H €X €h €x €ˆ €  €А €Ш € џџџџ€р €ш €№ €ј € € € € € €( €0 € џџџџ€8 €@ € џџџџ€H €P €X €` €h €p €x € џџџџ€€ €ˆ € €˜ €  €Ј €А € џџџџ€ HИ (d € џџџџ€ 2(  ` @h @ˆ @  @Р @и =ј  @ @8@P@h@€@˜@А@Ш@р@ј$  8 B@ Xh p Bx  Ј€ џџџџ€ HАDј4( H€ :P 4f  Ш @„а <„ @„P  :f˜ 6fи :f P 4fX€ џџџџ€ . FР Fр F F  F@` h€ p 2n€ џџџџ€ >Ш€ 0 @i8 vŸx nŸ№ nŸ` vŸа @iH zŸˆ pŸ pŸx zŸш  h  p $Mx   А  И  Р*|Ш ј8h 8 @€ џџџџ€ H  h€ p "^ DИ Hи >ј B 8€ ,P4d€€ :И€ <ј4d88pˆ8Ј&\А$Kи € >(€ Fh [АQа № [јQ 8 @H P€ џџџџ€ 6`(a˜€ џџџџ€ Р>и>№€ џџџџ€ .$J8 `€ џџџџ p€ ,xЈ4АШ а"и ј :(!0@€ џџџџH X` px ˆ€ џџџџ =€ А а р ш€ 8№ (  8  H € <P € " *-И  ш  ј  !(%! 8!(%@! h!€ <p!€ <А!€ @№!€ (0"*-X" ˆ" ˜" Ј"А"#И" и"р"ш"№" # # #(#0# H#P#X#`#x# #€ џџџџ  ˜#  #€ џџџџ€ ,А# р# №# ј# $ $€ џџџџ$$€ < $ `$ p$ x$€ >€$€ Р$ Eр$ %€ "% 8% @% H% P% X% `% p% x% €% ˆ%€ џџџџ%€ џџџџ˜%€ џџџџџџџџ&р Form dlgBoxPlotрG Copyright 2002: Statistical Services Centre, The University of Readingр& Written by Howard Grubb, Colin GrayerџџЭџџ`]ђ –р Set up the list boxС мA! ќA@{ ўЗбA@ р т ф цA@о!І    ь т ц ф   Ь ќ ў vA@ш $š z!|œoџџр9 Workbook is shared - must create chart on a new workbookЗ ц( М!З т( О!З ф( Р!kџџoџџ–XрR Variable list has just changed, so check whether the OK button should be enabled. ќ$ 'ж жЌ  ( oџџ€–˜ v! ў(oџџ`–и œр; Disable the copy data box - always copy if outliers wanted$šЗ ь(oџџЗ ь(І dџџрЗ ь(d$šЗ ь($škџџИoџџА–р& Existing Range option has been chosen р% Make book name box and label visible$šЗ ($šЗ ($šoџџ –Xр% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџ–˜р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be rena     ўџџџ !+#$%&'()*,-./012345ўџџџ7E9:;<=>?@ABCD6FGHIJKLMNOPQRSTўџџџVWXYZ[f]^_`abcdeUghijklmnopўџџџЏstuvwx…§џџџ{|}~€medЗ (З (oџџр–и џџ!(A@joџџР–р Cancel button just been clicked џџA@roџџx–Xр OK button has been clicked]ђ˜ђАђШ]ђр]ђ]ђ ]ђX]ђp]ђˆ]ђ ]ЌЌђИ]ђ№]ђ]ђ0]ђHр Find the output rangeэ ц ф : рЖBoxplot$”.. .А›G|jр& Get the ids of the selected variablesЌ жт<x ќ <A>р7 Get the variable names to include in the boxplot titleЌ$<$О'$џ ІўЌ ж’ $Ж,  І$<$О'$џ ІўШр2 Unstack or copy the data to the destination sheetр+ Always copy data if outlier display wanted ь 'œ v›G ў$ '2j 2Ќ œр" Unstack the variables by a factorЌ 2с˜ ў A>џ ІўЌ 2’ &Ж›G &Ж,'&j & І$$О'&џ ІўШdџџр. Simply copy the visible rows of the variablesЌЌсИkџџА жЌ'"р6 Insert sufficient columns at front of sheet for tableІ эЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ.   B@э ..КэЌ ЬЌ К%Ц..р Set up the descriptive stats . К $ &   ЬA(І    ь т ц ф   Ь ќ ў vA@P џџA@roџџјІ $їЗЗЗЖЖ–Р]Дј?ђ]Ќђ0]ЖBaseђH]ЖLWђ`]ЖLBђx]ЖUBђ]ЖUWђЈ]ЖMedianђР]ЖMeanђи]ЖOutlierђ№]ЖExtremeђ]ђ ]ђ8]ђP]ђh]ђ€]ђ˜]ђА]ђШ]ђр]ђј]ђ]ђ(]ђH]ђh]ђ€]ђ˜]ђА]ђШ]ђр]ђј]ђ ]ђ0 ]ђH ]ђ` ]ђx ]ђ ]ђЈ рB Get overall minimum value for adjusting minimum y value of chart.ЖMIN( К!Ш!ЎЖ)$f'Vр+==================== label the output cells .ѕЖMinЌЌ7Ф(ЖQ1ЌЌ7Ф(ЖMedЌЌ7Ф(ЖQ3ЌЌ7Ф(ЖMaxЌЌ7Ф(эЌЌ7Ф.JqџџИ Jѕ 4ЌЌ7Ф( 6ЌЌ7Ф( :ЌЌ7Ф( 8ЌЌ7Ф( <ЌЌ7Ф( 4ЌЌ7Ф( 6ЌЌ7Ф( 8Ќ Ќ7Ф( :Ќ Ќ7Ф( <Ќ Ќ7Ф(Ќ 'FрStart of outlier rows ,œ T FЌ7Ф( FЌ 'Fkџџ` .œ > FЌ7Ф( FЌ 'Fkџџ(qџџ рB==================== loop over variables, put in calculation cells К!Ш!P!'Ьџ ZўЌ Ь’эЌ Z$К$„.  .ѕр 3 Insert max, min, Q1, Q3 and median for this columnЖ=MIN( !ЎЖ)ЌЌ Z 7Ф(L *œЖ QUARTILE( !ЎЖ,1)$fЌЌ Z 7Ф(ЖMEDIAN( !ЎЖ)$fЌЌ Z 7Ф(Ж QUARTILE( !ЎЖ,3)$fЌЌ Z 7Ф(dџџ8Ж =QUARTILE( !ЎЖ,1)ЌЌ Z 7Ф(Ж=MEDIAN( !ЎЖ)ЌЌ Z 7Ф(Ж =QUARTILE( !ЎЖ,3)ЌЌ Z 7Ф(kџџx Ж=MAX( !ЎЖ)ЌЌ Z 7Ф(Lр ' Remember the addresses of these valuesЌЌ Z 7Ф!Ў'RЌЌ Z 7Ф!Ў'LЌЌ Z 7Ф!Ў'NЌЌ Z 7Ф!Ў'PЌЌ Z 7Ф!Ў'Tqџџh  Jѕр  Point to the column namesЖ=Ќ Z$К!ЎЌЌ Z 7Ф(Lр 7 Calculate the differences between the 5 values so thatр * they can be displayed as stacked columns.Ж=IF( PЖ<0, PЖ,0)ЌЌ Z 7Ф(LЖ=IF( PЖ<0,IF( TЖ<0,( PЖ- TЖ)/100, PЖ/100),0)ЌЌ Z 7Ф(LЖ=IF( NЖ<0,IF( PЖ<0, NЖ- PЖ, NЖ),0)ЌЌ Z 7Ф(LЖ=IF( LЖ<0,IF( NЖ<0, LЖ- NЖ, LЖ),0)ЌЌ Z 7Ф(LЖ=IF( RЖ<0,IF( LЖ<0,( RЖ- LЖ)/100, RЖ/100),0)ЌЌ Z 7Ф(LЖ=IF( LЖ>=0, LЖ,0)ЌЌ Z 7Ф(LЖ=IF( LЖ>=0,IF( RЖ>=0,( LЖ- RЖ)/100, LЖ/100),0)ЌЌ Z 7Ф(LЖ=IF( NЖ>=0,IF( LЖ>=0, NЖ- LЖ, NЖ),0)Ќ Ќ Z 7Ф(LЖ=IF( PЖ>=0,IF( NЖ>=0, PЖ- NЖ, PЖ),0)Ќ Ќ Z 7Ф(LЖ=IF( TЖ>=0,IF( PЖ>=0,( TЖ- PЖ)/100, TЖ/100),0)Ќ Ќ Z 7Ф(LЌ 'd ,œЖ= N dЌ Z 7Ф(L dЌ 'dkџџ .œ *œ  :!h%j dЌ Z 7Ф(dџџаЖ =AVERAGE( !ЎЖ) dЌ Z 7Ф(kџџkџџˆр  Handle outliers here *œр  Calculate outlier limits P$0! L$0! 'Z L$0! 0 Z '\ P$0! 0 Z '^ L$0! 2 Z '` P$0! 2 Z 'bџ ІўЌ !’р% Look for outliers in the column dataІ  І$ ! \ І$ ! ^ œр3 We have an outlier. Remove it from the column dataр6 and insert it in the next free row of the chart data.І  І$ ! ` І$ ! b œ @ FЌ;Фdџџ@ > FЌ;Фkџџ  FЌ Z 7Ф І$ B@Ж* І$ ! І$ ( FЌ 'FkџџИџ ІўШр 7 adjust Min and Max in case they are now within the IQRр @ This may occur if all values below Q1 or above Q3 are outliers. R$0! L$0! œ L$0! R$0(kџџи T$0! P$0! œ P$0! T$0(kџџkџџˆqџџ€џ ZўШр0 Get range of cells to be displayed on the chartэ J FЌ Z J%Ф$0.Jр Hide the dataЗ .!Ш!Ъ(ЬЗ К!Ш!Ъ(Ьр'==================== now draw the chartЌШЌ2ЌњЌШ ˆ!l%BB@Hэ n.H Hѕр% set up the chart as stacked columns.З9p Jбt xбvC@r |9zЗ9~Ж Boxplot of $5€(d &Жœ5€!dЖ by  &5€(dkџџ Ќ5€!Š(‚З9„Ќ7†ѕqџџpЌ7†ѕqџџXЌ7†ѕqџџ@џ ІўЌ J!Ž!Ќ ’р  Adjust outlier series І7†ѕ5ъ 4KTр2 Make lowest stacked item (0 to minimum) invisible Œ5ˆ(Š Œ5Ž(Š 6KTр6 Set up whisker for the value (Q1 - Minimum), and makeр the stacked item invisibleІ  ”б’ –бlЌ'б˜C@ Œ5ˆ(Š Œ5Ž(Š 8KTЌџЌџЌЬ$@5Ž(šр413434879 :KTЌЬЌџЌџ$@5Ž(šр416777164 <KTр6 Set up whisker for the value (Maximum - Q3), and makeр6 the stacked item invisible. Stacked item is made 100р9 times smaller than actual value to avoid a gap appearingр! between the whisker and the box.І  œб’ –бlЌ'б˜C@ Œ5ˆ(Š Œ5Ž(Š TKT ž9zЌЌЌџ$@5ˆ(š >KT  9z Є9ЂЌџЌЌ$@9І Њ5ˆ(Ј @KT  9z Ќ9ЂЌџЌЌ$@9І >KT  9z Ў9ЂЌЌЌџ$@9АЌЌЌџ$@9Іnџџ8qџџ0џ ІўШр& Adjust plot area border and interior.5В!ˆѕЌ9Š Ж9Д И9ЈqџџР Њ5В!Ž(Šр5 Remove gridlines, and adjust minimum value of y axis М7КѕЗ9ОЗ9Рр 8 Adjust minimum y value so that it is sufficiently belowр  the minimum data value. V5Ф 5Ц5Ц9Т VЌ œр  Set X axis to cross at y=0Ќ9Шdџџˆ5Т9Шkџџxqџџp Ъ7КѕЗ9ОЗ9Р Ю9Ьqџџ@qџџ8oџџ0џџџџ(џџџџИ%І  <  И . œ "ЗбТЌ .!N Ќбм $J'Ьџџџџш%џџџџwЗAttribute VB_Name = "dlgBoxPlot"D „Bas„0{4D91840B-C5EE-11D8-B659-0004768@BFDFA}J3 B4J dGlob„alŒSpaco False ŠCr@eatablP€redeclaDIdеTru BE`xpose0TemplateDeriv–Cus tomiz‹D ‰' Form Ћ' Copyright 2002: Statistical Services Centre,€ The UnDrsity of Readingƒ%Written by Howard Grubb",2linayerOption }licit Dim NoOfVars As@ IntegC P€>€@ Sub UserС1_act$iv@()A  '€+t up t)l€0 box„ @CallРitAss(cmn:DmA€nРРPu€tColumnТoL€@ ls:tР#iUBZ By, F€%or:= УyР Т Initia%eOutputRange ref, opƒBNewShe„etBookB e{reCo!Рdols DЩSabv@hchkAt8,ќ _B A!ТMLL @,lier,B РJoinMмea K,ANСC ByK!BIf ApeWorkb8.MultiЁ;ЄEd`%ngaMn%' х is sBhсi - mР^ cApeРart €Ja new wф %`р*!.Va,luсug4 0.E~n=ЈqЃ'УТ2RE nd If‚ `UсRIWш#_ChЇ!@aWс ' ЅL W`has jbТd, soeckP wheр[r‚\OK €Іt`should be eу.уЂІj= NumberSelРected((#a btnOK(fx> 0CZєb=_:C zkТ€ ByР.VisibТЄТџƒ0ті%„O рGЧБLEDisa8B$c › d } Falways Тif out[s wa§Рdт2@ …hВ=L§JEХ  ‡KiOЉ џE DСр-=K S‰ъ$ю'ЎИ€Г ‚a\ЎЩKbe ДchрЮCl' Make%Аok n№! a[€label v#8ёBtxtraІЈ;јlbl]6?и6, 0<§Ђ@sR    1bч ѕ* okOP}Рџ 0ak сG ЗMPёRl ins4№Bin0‹PТc annotёArBќme“.?5ч'o?‡_TрDHelp'Т#GetQ Me.qqlextIDЇТПЗCa@ l џPS•PbSу-H”@‹pload џїOђKК' VG3X Eq‹i‹, kкj,un 6DP|inџА–р[рŽ":ЧKC;Ўy†()HfбZ“ŒsНяmЂžБ (l@|џІw“Ё-в jЖS№КAŸ /ёDummy„ 0 To 0я рЄ ToIn§Pœtaoј ЫС 3Я РЃ 3˜№ЏiЯРLбЁ`_@˜ r1xSet = g}uš(Ч;м’4ТH‘,ѕ("`™pСЫcsk фIsРЎthСY0Е‘А8it €BвB' Уp22lids Ж Bs”{ varRЉsВReQs(1сЁб^“АtemXsIn№ €,1ˆsУ Х2Gs toСFcludep ƒ€bЁ titlƒPЛаЃ=a 3(a ˜(1)s€М iPб>2I ТP(І& @", " &Os”(iDNРD iREB'Р?staА“oўrƒ‘2 ВЈ8ВtAШ‚ђƒ dizspйy‰ƒ%ƒ (} rOPhk”Œ’У‹Byr‹BЯu-šstB>yУP)0™|Unc! і!Биa fbЩяТу"3(ђ:ˆУџPП" ЮV%v'Є Е€€ C!<> ""ЃeЗЖmes = Fa@ctorNaа&€ ","  l ЄGetCol(umnt(R(i))|Next BiElse,' Simply copy the visible rows ofЁarias6 ReDimЋ(0 To 0iEnd If&Use А(NoOfVazrц1.ЖU€nStack(,„., Dummyƒ$estination, _ GC€_Data, ‹;, Sor`t:=Fa€z Max„=:=Int((256 - D1.ƒ) / 2Ѕ9' Insert suffРicient Оs at froC€sheeoиr tŸ‚S€;To#= Range(ŠellsР(1, 1)‹-; в ЩR+С+.EntИireТЬ.„(xlShift€ToRightƒfџС)TФ €ІHF2ШA`Ф .Offse@t(0, -I&-Ÿ@&B€Ÿ€CupB™descriptive statC›Call BoрxPlot HР‚G<, РŒЭХchkOutlierФ, РJoiР0MeanУ9Т!utSav@Jntro|ls…С‚ —‰œo$pt‚m, @Ne wBookХSA~Ыm@–"K lstРI"n, €ByЂByb‚Unload My oSub €Public  ёq' As#Nы KF‹I?ПO 6ona5œyV …1@B""w џЌЋ…Ц Ф*Aˆа|Љ,СAMedian lDisplШРEnd IfФƒ6FXFormulцa@„Р*AXZkШˆ' Remember the aAƒes ofs$e šesˆ Mi`nimumФ#2чЦ#D Q1Ч ЧБа ю2Ч ‡Ѕа 3Ч GYЯ xMax )M AYWith-С Ch€artRangЩž' Point toТJcBл naіmŠGE1iAщСчCъ=d5 г48пџСф HЁ#EЂ "Шї(Eт89Z‚2Hœ'ЇBШ(У7‚д71т0џ "=•6љџђтѓ‚ѓRџѕв„1ŸI=їШ5Iџ"HЃѓ1ђј €ŽisRow €\12˜BIf J№UMedianяф IThт_P ?3Hа”єр•+ .1(nv€D3RMeџŸё™o›5Џ њ›Application.WorksheetFuncAveragќe(чœь›?‘p/*"=AVERAGŸЂ—ЂŠ[ žh' Handle єou­h`jO &in limiЦtЉ‡аIQRЂyH(Q3%Б- 1x@LowerGзЕ - ДM ultip0 * cp;Upp?+‡??rExtr0—џpД@ $r>9–+ ?О Pi i!1 ToYУCo un‰ƒ#' Lo@ok forЗiУC‡4dataлг№,(iЅ<аиpOr _Ўsпe8 > z?гЃ' @We hav­nE .ЁЎo it №fromR“ T' 0- insert pdnexЁ1ee rpLoЂВш ch0Ѓ ЁY”цѓя0мe фя€BNР рW№S) str3Є_ ŸFпxtкЄ4па ЭЦ‹ Cрopy (ю 2№ЌPчQђ"*с`Пќфџ#T•[bSP`ё iћp#djuјst ˆ"$ q`$ ИƒеТИare nР#w‰Жithin the IQR ' This may occur if all values below Q1 or above Q3 are outliers. œIf Range(Mini@mum).V >Q1Thenn ;•;= ; 6E`nd If †aъx †<%3!C‹Co…C‹KW€УN`ext kˆ'@ Get rŸ of cells to€С displayed oAƒуchart‚Sm€C‚ …R ,R ‡.C(СRРu- 1, k))Т'Hide!Т‰data‚Destination.CurrentRegAEntireColumDn.den@TИrue@s+ '= n,0drawТ'Ч?ActiveSheet.:Objects.Add(2 00, 5Р2€00).Sel€у‚(NBoxB €.CяB‚Сl  B€ЉH' s@]up‡" as stack €hc‚DGЦ.PlotVisibleOnly€FalsƒI@€$tSouPrceDРL ƒ:&="u, AByа:=xl€ms…!У;Type€xlC[SC!ЦHasTi|tlAf3Т ".ЂTСQ= "Рp@O" & Var0NameЦ €jFactoЃ <> ќ"" ‡ЪxDХ N@& " by€& ш Ыf‰Fon t.SizA14Ё Lege €=р ш*%B8€,riesg`$С?рW(1С^ ! n js 2+ 5+EFРЊi€71 ToЩtЁ<.Cou8nt `tЅ@' РAdjustхЏQїС(”if @У`€ Case .С<‡HРтstrBр+€' Make У€ƒЦ^item( (0!–m„П i nvу^n.Border€lorI0ndexeXФNon&d`C.IntАerioџF c`LowerW нИkerpЁ@zwœ f@3!цс (@рD- …к, aРMm?€ №Eb"˜ Er ro`, юnclulde!|eIC`uТs‚шs, _ю с'!€)сPeр‰nt UAmС%:=10џNЯЯЯЯON?…&ТHП+€RG€B(255, C04) '134`34879ыХUpperЯ , IХ04Х55С6р77716&GГ%Ъso%C' o%Rcd%Mу3†P>Q3)o%CPŽ'Bo%1e. D_~ ѓ&сœp|Аоpi‘ ] sm@žerPШan @]ua$Ÿс;avoid a gap a aringЏ€‰tweP/e31ёboxKЌЁP .џ.xlќ.Pžlя. .O/peO/§Ÿ Џ/IЏ/@!ВuI?wЏ/Џ/Џ/БWpIMe8diaПАЄoе}Li§џP к д+аŽзgs )ѕ*MeЯ ЯeM\ar€RжЦ.ƒS$tyB…xlјDashŽ"Аnegr§`Gd@xРUЊ…h €€ Ш€ А 7а '№ €    :8 "BP [x '˜ Ј€ $А :и <]№ [0 'P `€ h€ €€ < € $р $*  $*0  ”ЗX  [№  ' €   :@  "BX  [€  '   X€ $А  :и  n“№  [`  '€  € ˜ € Ј  *KШ  'ј €   :(  ‚Ѕ@  [Ш  'ш € ј  :  "B0  [X  'x  x€ $ˆ  :А  @]Ш  [ '(8€ @:`x6W4B˜[Ш:ш4Bа[ € ( :@ "BX %€ '€ "  :Ш @Kр %  :8 @KP %ЈА€ џџџџ€ "Ир$№' N O8€ џџџџX€ џџџџџџџџ р Module modTtestelрG Copyright 2002: Statistical Services Centre, The University of Readingџџр Written by Colin GrayerЭџџpЭџџhІ $їДЗЗЗ–џџџџр- Sets up the table containing the t-test infoј]ЌђH]ђ]ђ`]ђx]ђ]ђЈ]ђР]ђи]ђ№]ђ]ђ ]ђ8]ђP]ђh]ђр]ђ˜]ђА]ђШ]ђрЖ of difference'єрSet up headersЌЌ .%ЦB@HЖNumber of observations і(ЌЌ і%ЦB@HЖMean і(ЌЌ і%ЦB@HЖStandard Deviation і(ЌЌ і%ЦB@HЖDegrees of freedom і(ЌЌ і%ЦB@H ЬЌœр One sample or paired test]ђ€р$ CJG 19/3/03'єjdџџшр Two sample (unpaired) test œЖPooled standard deviation і(ЌЌ і%ЦB@HkџџpkџџhЖDifference of means і(ЌЌ і%ЦB@HkџџЖStandard error є і(ЌЌ і%ЦB@H вЖ% CI є і( дœЌЌ і%ЦB@HЖ T statistic і(ЌЌ і%ЦB@HЖP-value (one-sided) і(ЌЌ і%ЦB@HЖP-value (two-sided) і(kџџр' Insert the calculations for the T-test .ѕр& Set up addresses for the basic valuesЌЌ7Ф!Ў'иЌЌ7Ф!Ў'кЌЌ7Ф!Ў'мЌЌ7Ф!Ў'оЌЌ7Ф!Ў'рЌЌ7Ф! ˜$”ЌЌ7Ф(žЌЌ7Ф!Ў'тЌЌ7Ф! ˜$”ЌЌ7Ф(žр' Now setup the values derived from themЌЌ7ФB@H ЬЌœ м'| р! CJG 19/3/03d testр  Degrees of freedomЖ= иЖ-1 і(L і!Ў'шр  Difference of means дœр! CJG 19/3/03ЌЌ і%ЦB@HЖ= мЖ- ж і(L і! ˜$” і(ž і!Ў'kџџ0р  Standard error of differenceЌЌ і%ЦB@HЖ=sqrt( рЖ* рЖ/ иЖ) і(L і! ˜$” і(ž і!Ў'и eр Not pooledр  Degrees of freedomр 6 Calculated as ((v1+v2)^2)/(v1^2/(n1-1) + v2^2/(n2-1))№$диџџџџ,Ф*1НaщџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP<џџ0<џџ<џџ<џџ< џџ<џџ<џџ<џџџџџџhР џџџџ`џџџџџџџџџџџџ §@@џџџџџџАА „)ƒ.џџџџ џџ`h€џџ%iƒЬџџџџџџџџˆ„xiƒвџџџџџџџџЈ„Iƒџџџџџџ џџа„ Iƒџџџџ(џџ џџј„ Iƒдџџџџ8џџ џџ „ џџIƒжџџџџHџџ џџџџџџ„`џџџџ@œ˜РBџџџџџџ`„І@6џџџџџџџџџ`„иџџџџ0џџџџџџџџџ`„кH,џџџџџџџџџ`„мџџџџ(џџџџџ`„о№$џџџџџ`„рџџџџ џџџџџtmO`„тџџџџџџџџџј`„фџџџџџ`„циџџџџџ`„шРџџџџџ`„ъ џџџџџ`„џџџџџ`„| Pџџџџџ`„ю€ќўџџџџ`„№˜јўџџџџ`„ђx№ўџџџџ`„єрьўџџџџџџџџџџџџџџџџџџџџјƒаџџџџџџ@џџџџџџџџџџџџџџ%`„вџџџџxџџџџџ€џџџџˆ@„hhџџџ џџ€џџџџАџџџџџџ@„џџџџXџџџ џџ€џџџџ(џџџџh`„вџџџџxџџџџџ€ `„и 8џџџџџp@„hhџџџ џџ€џџџџ@„џџџџXџџџ џџ€џџџџPџџџџџџ@„дџџџџHџџџ џџ€џџџџџџџџџџ@„жџџџџ8џџџ џџ€@„дџџџџHџџџ џџ€И@„жџџџџ8џџџ џџ€8˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`„вџџџџxџџџџџ€и@„hhџџџ џџ€h@„џџџџXџџџ џџ€џџџџ@„дџџџџHџџџ џџ€џџџџ@„жџџџџ8џџџ џџ€џџџџ`„вџџџџxџџџџџ€и@„hhџџџ џџ€h@„џџџџXџџџ џџ€џџџџ@„дџџџџHџџџ џџ€џџџџ@„жџџџџ8џџџ џџ€џџџџ`„вџџџџxџџџџџ€и@„hhџџџ џџ€h@„џџџџXџџџ џџ€џџџџ@„дџџџџHџџџ џџ€џџџџ@„жџџџџ8џџџ џџ€џџџџџџџџX`„вџџџџxџџџџџ€@„hhџџџ џџ€<@@„џџџџXџџџ џџ€PМт@„дџџџџHџџџ џџ€@„жџџџџ8џџџ џџ€џџџџH`„вџџџџxџџџџџ€ `@„hhџџџ џџ€№@„џџџџXџџџ џџ€@„дџџџџHџџџ џџ€@„жџџџџ8џџџ џџ€`„вџџџџxџџџџџ€@„hhџџџ џџ€@„џџџџXџџџ џџ€@„дџџџџHџџџ џџ€@„жџџџџ8џџџ џџ€@ јмўџџ џџ @ўџЬўџџ џџ @ўџМўџџ џџ lђт@ўџЌўџџ џџ  р(œўџџ џџ ј˜ўџџ џџ џџџџОˆ џџ @ Hˆўџџ џџ „ўџџџџ ўџ€ўџџ( `@ џџџџB@ №pўџџ џџ @ўџnўџџџџ @ Р\ўџџ џџ @ўџLўџџ џџ lђт@ўџ<ўџџ џџ Pёт@ўџ,ўџџ џџ  @ўџўџџ џџ @ўџ ўџџ џџ el0 ўџџ џџ ˜ўѕ@ўџј§џџ џџ ўќ@ ш§џџ џџ ўў@ шф§џџџџ ›)@ўџр§џџџџ @ўџм§џџџџ џ˜@ўџи§џџџџ џ@ўџд§џџџџ 0џ*1@ўџа§џџџџ #„ўl@ўџЬ§џџџџ 2„@ўџШ§џџџџ *#ф§@ўџФ§џџџџ @ўџР§џџџџ џџџџPџџџџpМ§џџџџ @ўџИ§џџџџ @ўџД§џџџџ @ўџА§џџџџ @ўџ §џџ џџ џџџџР џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ 7Bп 0ўЪЙ€ € џџџџ€ N€ џџџџ€ h€ џџџџ€ˆ€ € џџџџ"…<4 ˜€ 4а€ џџџџ€ € џџџџ€€ €(€0€8€@€H€P€X€`€h€№€p€x€€€ˆ€€˜€ џџџџ € џџџџ€ И3а"%ш:%(:8%P:p%ˆ:Ј Р€ а&ˆ€ "@ &%H :pˆ h %˜:И А@%*:ша -и:ј7 0:8%P:h %€:  %Ии€ џџџџ€ .р €р  Where V1=S1^2/N1, V2=S2^2/N2 рЖ* рЖ/ и'ф тЖ* тЖ/ к'цІ Ж=(( фЖ+ цЖ)^2)/( фЖ* фЖ/( иЖ-1)+ цЖ* цЖ/( кЖ-1)) і(L і! ˜$” і(ž і!Ў'шр  Difference of meansЌЌ і%ЦB@HЖ= мЖ- о і(L і! ˜$” і(ž і!Ў'р  Standard error of differenceЌЌ і%ЦB@HІЖ=sqrt( рЖ* рЖ/ иЖ+ тЖ* тЖ/ кЖ) і(L і! ˜$” і(ž і!Ў'и dџџHр  Pooledр  Degrees of freedomЖ= иЖ+ кЖ-2 і(L і!Ў'шр  Pooled standard deviationЌЌ і%ЦB@HІЖ=sqrt((( иЖ-1)* рЖ* рЖ+( кЖ-1)* тЖ* тЖ)/ шЖ) і(L і! ˜$” і(ž і!Ў'ър  Difference of meansЌЌ і%ЦB@HЖ= мЖ- о і(L і! ˜$” і(ž і!Ў'р  Standard error of differenceЌЌ і%ЦB@HЖ= ъЖ*SQRT(1/ иЖ+1/ кЖ) і(L і! ˜$” і(ž і!Ў'и kџџ р Confidence intervalЌЌ і%ЦB@HЌ вXЌd 'ђЖTINV( ђ$ОЖ, шЖ)* и '№ і! ˜$” і(žЌЌ і%ЦB@H і! ˜$” і(ž дœр T statisticЌЌ і%ЦB@HЖ=( Ж)/ и  і(LЖ0.00 і(ž і!Ў'юр  P-values, one and two sidedЌЌ і%ЦB@HЖ=ROUNDUP(TDIST(ABS( юЖ), шЖ,1),4) і(LЖ0.0000 і(žЌЌ і%ЦB@HЖ=ROUNDUP(TDIST(ABS( юЖ), шЖ,2),4) і(LЖ0.0000 і(žkџџрqџџир Finally, prettify the tableэ .!Ш.. .!ЪB@b ˆЗЗЗЗ .B@†ЗЌЌ .%Ф!Ъ!Š(ŒЗЌЌ .%Ф!Ъ!Š(Žoџџ0џџџџ( ЬЌœр) CJG 19/3/03 ›GЖ'єjр9 CJG 19/3/03 дeр? CJG 19/3/03р  One sample or pairedHЌЌ і%ЦB@Hр? CJG 19/3/03(Ж"Difference of mean from test value і(р? CJG 19/3/03 '| р! CJG 19/3/03 '| р! CJG 19/3/03Ж= | Ж- № і(LрC CJG 19/3/03Ж= | Ж+ № і(LрC CJG 19/3/03џџџџ џџџџЈЌЌ7Ф! ˜$”ЌЌ7Ф(žрN CJG 19/3/03ЌЌ7Ф! ˜$”ЌЌ7Ф(žрN CJG 19/3/03џџџџPџџџџдЕAttribute VB_Name = "modTtest" ' Module L PCopyright 2002: Statistical Services Centre, The University of Reading–Written by Colin GrayerOption Expli cit Pr8ivaГ›)Pub" Sub MakeTTablШe(DФinšD€As Rang_ ByV€al NoOfD umns In€teger, Confiden€ceLevelђS€­ng˜g€9ƒ<@Paired€РFalseЇUnequalVarija€?sЏ TJ@ T\ruЈ LuСŒ0#)BU'€ts Pup t@}tAa €contain|-С– info‚ @Ost SiPgFigС/4‡Dpim iHbBNV1Y2XQ XUQ SQ SQ VQ VIQ Df$SpMean‡ЬЈ'CJG 19/3/0"3†;DifRtd ErrorаTsРъаHalfWidthpProb)СDoРle†OfљСer^ЌbърŠ}Ad# ‹ 'шSetaFhр‚ „bhw.Offset(2, 0).S№elec`€C@„.хP"Numbebr! obs ‘‚sзc Ч 1 "a2пі Ѓndard pDevi‚Ÿ – DАegre Ћ@Јf˜domŸ ƒ Ifъšh= 1СВn"-)' One samіp@НРFp#‘uE"Lt d”`Кn э;"7 I.VEРšGTw"oE(unC) ?pю›Ёха@Poмol@Љ`]Ѓ/dЋ/ЃџAрEnd IfїЂ Hю)2т)у І я Јh ;m€€VЪџuV*РBИТ2 _# fromВ valueЁНЯ а`С::я t_ ЏЮШ/"f6eaOј" &Ъ)вWЏ70 qM}& "% ќCIџ€ 90>ч.LJVLT QZ•>9Пt(оKП "P- (one-ђs Šd)?%V?9уі 6two:Uа' In0Xtb ЁШculуX f0F‚цTВ€ТWi gH_B …Сaaddre ssрOеbasicѓ'sх@= .Cells(3,` 2).As2Л@3Р‚4 еГѓfFormмat€Œу(TƒѕВ,%Ž)‘ }0@‰џЩп 7АЯр“Ю€зЯЯ:€1Ї5Ÿ–џГЯЮƒЬ…P•І€P œЄГпп,. Џеu'ppw ‡а„$ЊВ1s de ХcccMhemѕD6џту<Ѕ?ЙТ=uouџОѕ/}шчCAа39№"=бG`.АH-1ї–<РpІ=WмтЅ|= .Р(П Т'ў _v6 ODяџеї /X#X•x ­р џЁQШ8g_#W#їW*f 2`зчЈiƒ0Ktaƒ‡ђh‹ЏљonџW$Ўзйрsqrt(qPЫ њ*Ї/Ё3"Ч^ w”ёДormat = 0SigF р(Selection€.Value,t s) StРdErrorv\€AddressLElseIf UnequalVariances Then”' Not poole‚d Degre/of fdom Calculated as ((v1+v2)^2)/ ^2/(n1-1) + 4v2 2 Т' Where V1=S1€N1, V2=SN25V1r1 & "T*"€S/Nъ1‰22‡ƒ;‰'‡ЏFИa"=м(((€53+qh" _4†Т &зd=#/)NW~я€*Ё"‚:V‚DТ P"H"‡2NumbЬer43”DfO•’:' Diffl…Р €„mean†šР‡"Offsetт(€s0).ƒ’,I_§\XJ‚гk>9@0œ9>M€5€С:5‡'CJG 19/3/03H3' Sta€ndard eТу@FdЦI’=БGsqrОt‚Ic_Я`№SхXS"GяCB$bU)ŸIс%П“юgП“А“ )P?*N— I#n‚xN"-2щ%_] c se;dexviaAВ?:^ *"ў=":cŽ„Ш:E†С:sуŠC1)cЂH)Т<`п<ŸаCдЫ‘RB2еЕ?06Al"0.00щeTPcтTCA2' P-А-ues, one „ twoќ sР/IИŸ Ÿ Ÿ = "=ROUNDUP(TDISрT(ABSЂѓ БСШ-,1),4@@џp+o o o •Зo ч3o ,2o Хв60–EЇFЁWi thтB' Finally, prettify the tabl‚eSet D0)`ACи.Curс@ntRegРdђйEntireColumn.AutxoFiу[Irр €xlRange€ClassicЕЬTrсYFa`о. Cells!И1).ъFont.Bјold aŸŸƒ ’ItalicА g ёSub € џџџџX h€ @x И ?а ш ј0€ џџџџ8€ џџџџt@€ џџџџX€ џџџџ" `€ џџџџ€h€p€x€€€ џџџџˆ ИШи ш ј  0(X `0p  Ј0Иш№€ џџџџј€ џџџџ"9 € џџџџ" (08@€ џџџџ" HPX`€ џџџџ" h@pА€ џџџџ" И@Р€ џџџџ" @P€ џџџџ"X€ џџџџ 6`€ џџџџ 6p 6€ 6 6  6А 6Р а р€фtУˆЄ1 1Н"ЮџџˆЖџџџџџџџџџџџџМ$o(ХиЖYv‹§њk$o(ХиЖYv‹§њ6$o(ХиЖYv‹§њЛ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџ0 џџh<џџџ џџ џџ@ўџ8џџџ џџ џџ@ўџ4џџџ џџ џџ@ўџ0џџџ џџ џџ@ўџ џџџ џџ џџ@ўџџџџ џџ 0@ўџџџџ џџ pќўџџџџ џџ@ўџьўџџ џџ џџ`шўџџџџ >ь@ўџиўџџ џџ `@ўџШўџџ џџ @ўџИўџџ џџ џџ@ўџЈўџџ џџ џџўџЄўџџ` џџHџџ џџX(”ўџџ џџ џџ@ўџ„ўџџ џџ X€ИЎ>ьJ0Xр€ўџџ`x@ўџ|ўџџџџ @ўџxўџџџџ Р @hўџџ џџ @ўџXўџџ џџ  Hўџџ џџ HњќXјтX ўџDўџџ@` џџXџџџџ-џџ џџˆ 4ўџџ џџ џџrўџўџџџџˆ№0ўџџ џџ @ўџ,ўџџ џџ P@ўџ(ўџџ џџ џџ@ўџ$ўџџ џџ џџ@ўџ ўџџ џџ џџ@ўџўџџ џџ џџ@ўџўџџ џџ џџ@ўџўџџ џџ џџ@ўџўџџ џџ џџ€ џџџџи `Ш ўџџ  џџџџ`Аќ§џџ џџ џџџџ@ўџь§џџ џџ џџџџ@ўџм§џџ џџ џџџџ@ўџЬ§џџ џџ џџџџ@ўџМ§џџ џџ џџџџ@ўџЌ§џџ џџ (@ўџœ§џџ џџ џџџџ џџџџАџџџџŒ§џџ џџ џџџџ@pџџџџpџџџџџџџџ€џџџџ@џџџџџџџџџџџџh@рH џџџџџџџџџџџџџџџџџџџџџџ,Ш˜ 7BпўЪр€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ h€ џџџџ€ˆ€ џџџџ€„˜€Ј€ џџџџ"А€ џџџџ€И€ џџџџ(RJР€ џџџџ€  8 (H S№€ џџџџ€ џџџџ" € ,(€ џџџџ€ ,X ˆ ˜€ џџџџЈ€ џџџџ" А€ ,И€ џџџџ€ ,ш  (€ џџџџ8€ џџџџ" @€ *H€ џџџџ€ Px Ш и€ џџџџш€ џџџџ" №€ џџџџј€ џџџџ€ џџџџ"€ & @P€ џџџџ"X€ "`€ џџџџ€ˆ€€˜€ €Ј€А€И€Р€Ш€а€ џџџџ€ р(– ( € џџџџ8 € F@  ˆ ˜ %   @И  Sа  Sш  S   € ( € .H x &  _  € џџџџ€ <Р  B› P  `  *p € џџџџ€ @ Cа 2–ш %  e8  ,QX  .Qˆ  .QИ ш € џџџџ€ № > € џџџџ "6( € џџџџ€ $P >Јx € џџџџ>И € џџџџ(RJа € џџџџ (€ џџџџ8€ џџџџ€ џџџџџџџџPр Form dlgOneTtestрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџp]ђp]ЌЌђ˜]ђ–p]ђАІ   ј ь т ц ф Њ Ќ Ў Ж И К њ ќ ЦA@шр Set up the list box мA ЎA@э $Ќ.Ђ ЂАœр9 Descriptive stats are displayed. Take these as defaultsџ ІўЌ Ђ!’ І$Ђ! ўB@^џ ІўШЌ ў(rјA@dџџшЖSample 1Ќ+ kџџШA@а р т ф цA@оoџџ –Ш]ђ]ђ ]ђ@]ђ` ў!rЌ 'І ў!dЌ+ э $Ќ.вэ <$Ќ.дэ B$Ќ.жЖ К(dЖ Ж(dЖ И(d вАœ І$в!Ќ ›G І$в! К(djkџџ  дАœ І$в!Ќ ›G І$д! Ж(djkџџX жАœ І$в!Ќ ›G І$ж! И(djkџџЗ'Ќoџџ–€ Ў!dЖ (oџџи–РA@аA@кoџџИ–A@аA@цoџџ˜–@І Ж!d$š И!d$š К!d$š (oџџH–€І Ж!d$š И!d$š К!d$š (oџџј–РІ Ж!d$š И!d$š К!d$š (oџџЈ– Њ Ў( Ќ ќ( Ќ ў( Ќ ( Ќ Ж( Ќ И( Ќ К(З ў( ЂАœ Ђ!Ќ ›G Ќ ў(jkџџшoџџр–@р& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџP–€р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџР–Рр$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџ– џџ!(A@joџџ№–@р Cancel button just been clicked џџA@roџџЈ–€р OK button has been clicked]ђР]ђи]ђ№]ђ]ђ0]ђH]ђh]ђˆ]ђ ]ЌЌђИр Find the output rangeэ ц ф : рЖOneTtest$”.. .А›G|j Ќœр? Select the output range so that subsequent selections work OK. .A>Ќ'ЬЌЌ .%ЦѕЌ$ ЌЌ;Ф К!dЌЌ;Ф Ж!dЌЌ;Ф И!dЌЌ;Фqџџрdџџир Single column specified.р' Copy the data to the destination sheetЌЌт< Ў <A> < И И . ь!ЗAJр6 Insert sufficient columns at front of sheet for tableЌ'ЬІэЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ.   B@э ..КэЌ ЬЌ К%Ц..р: Calculate the mean, stdev and df of the first data column К!Ш!Ž!'ЌЌ К%Ф Ќ К%Ф$0!Ў'ЌЌ .%ЦѕЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ =AVERAGE( Ж)ЌЌ7Ф(LЖ =SSCSTDEV( Ж)ЌЌ7Ф(Lqџџр Hide the dataЗ К!Ш!Ъ(ЬkџџиЖ One-Sample tЌЌ .,Фр Set up the descriptive statsІЌЌ .%Ц Ь Ц њбд ќ$XбжAЌЌ .%ФB@HІ   ј ь т ц ф Њ Ќ Ў Ж И К њ ќ ЦA@P џџA@roџџРџџџџИџџџџ@џџџџzЖAttribute VB_Name = "dlgOneTtestˆ" ˆBasˆ0{4D91840F-C5EE-11D8-B659-000476€8BFDFA}J3B6J dGlobalSpacAoFalse ŠC€reatablPredecla‰IdжTru BРExpose0Template Deriv–Cu@stomiz‹D  …' Form ˆЉ ' Copyright 2002: Statistical Services Centre, The Un€Brsity of Readingƒ%Written by+lin€ Grayer€Option €t licit Dim NoOfVars As In˜tegA Sa=eHC(1 Toш 2)A SŠС erRange7APJL S€ub UserA>@_activ@(Р) ŽiЦEutR€ oreCo€>olDs …ЂSav@BchkAND€~, _G€€optТ!, @NewBoo‚kХSheetŽ Column‚ Summary,0 cboA tx0tMeaР St dev, Aizw%Щ!(T@0BV˜alu€Р CIˆ+‚'@zt up tРwl@ box!BCallfitAAСs(cmnAќ 0тqх‘Х pB*ШTпDБ cŸP P-€eџ 8BŸ‘љіІчвEтŸheЦE?ёTџ0АB`2бXEПџД94Ф^S@5@‘l@)Ѓ* 5btnOАK.Enq„(vСЃ<> ""0"o:Їтq@іg_CАyk„:ПKCЭ_ T G пo%Hd)„ ПДkt ўIsNum ‘c(єџrА‚QPЙ"Ф™r’%§GA~АucoU† ПтПКП ё:П tП я\ уП П bYБ `ЗЏ Џ o /f/)Šџ Џ Ў F(СВ;з-№VisiSЗ9,BBјlblВ@z7cљryQ  П?9Бђ/'S?џC BД†7dТ ”Si•ПSЂ.їK_=ЌЙ јZ/;ч?bTЪ?'П`ПPЁёš3VСРh ˜фbe№ТchрЯЃV"(' Mqšb Г naРрЅap9labpel v“ЂWиorkЁЄ.7Uџ€ /ткOWН2 Ѕ, ѕ` as1НЁ  Ÿ   u. okOџРх№  QЩ  ?2 Дџ ѓ inA4, sin ѓnew0Хok cannot be reЁdS†ЕxtWorkbookName.Visible = False @ lblŒ End Sub Private btnHelp_Cli0ck()<ЄGeBt* Me.ContextIDoKCancel#MK '  button just been ctedU Un0loadr_OK!Š-' OK+has*-Dim i As Icge r k Dest`inatiU€RangƒГ#Data‚ NoOf€Columns+ ToInser>t-ˆ .LengthLong†11СStriHDummyFactor(0 `To 0)A ЩA !‚' Fiˆthe output„ rЦ=Set E= O‚B((op tNewBЈ, УSheet, tƒЎsAСЎ, refТ , "OnheTtZ"@œРˆIfJIs Not"h@2 ThР‰Ex|itЏР Т+ Sq€7ary ‚€' Select Э2 soРat subsequeŽn€‚ @zs w€й…@“.ХCall„:ˆ@-Щ|= 1ХWi@iШ .Of€fset(1,` €.Cells@(2, 2)€єSampleHeaВd@>(1F'3$`+Size.Textя 4ЇMea nД5h tdevяЪЁ…Ё‚ E%Р+ € cB] speРcified'Р}(opyТ/d e tqС.e dШjbBхRBekVarsCT1 OT ˆ 1ItemsInBox(cфboЃ%, !F%Ђ6`UnSta ™!, h`G, ch kCрЁp.ValИue,CЌF х'Рˆ"xsuffici“сHƒ!s  Kfr€Ѕ of ‚ fo№r ta@ЖХTFlхуxsF„= .O$FIр1), _… 3C/‰NƒK@I+@M).РEntireу eЌ.ф”(xlShiftToRigмhtЦ!I–=)xe ?‚?€@B$ Ѕb0,є -I-@хaШАlculСж{mрZH, sсV a—dЦfA.!firРЫ"OЃ2EЃDЈ Cur"rР8Reg@.Rows.CounћFkC1@t2ˆFx2"$5Љ, 1)).AddressџХ…“єЕBŸ2!U0"C.Formа "=COUN@T(" & u &p ")"ЏrDЊAРVERAGEЯЯтEЪSSCSTD|EVпеZG u'№HideEU*щ-.Аd0d= Tœruƒ|БIfЂ/O3ВСpj-ƒF t‡Aft up3 escriptidve)atЃ’HM akeTTс?(Iщ`, n†ƒRsCIŸ=ЫР"TР4:=АJL, QТJ:=`({`a)“:"g.ƒ“r4ŸutSav0A€ntrols zџAкQЫ Px21Х€ZJџр€s'"$|]iMї 1l‚Sс>“Рo{ч&9ВCI2B8ІкІ @€ џџџџ€ .P.€€ џџџџ€ $Аи€ џџџџ&№€ џџџџ € џџџџ(€ џџџџ" 0€ *H€ џџџџ€x€€€ˆ€€˜€ €Ј€А€И€Р€Ш€а€и€р€ џџџџ€ш€№€ј€ џџџџ€€€€€ џџџџ€ € џџџџ€ *( Xh€ џџџџ€€ џџџџ€ , а р №€ џџџџ< € џџџџ€ 0@ p .x .Ј .и . 8 P h € € џџџџ(˜ Р € џџџџи .ј P( 0x € ZЈ  € џџџџ€  ( € џџџџ€ @@ $€ $Ј € џџџџа 0Жи  € џџџџ€ >˜ и № € 4€ џџџџ€ (@h€Аа и шј    ( 0 8@H X h px€ ˜ € џџџџЈ€ џџџџџџџџРр Form dlgQQPlotџџрG Copyright 2002: Statistical Services Centre, The University of Readingџџр& Written by Howard Grubb, Colin GrayerЭџџ`]ђp–р Set up the list boxI M мAame bo ќA@l invi р т ф цA@оІ  ь т ц ф ќA@шM z!|œШ р9 Workbook is shared - must create chart on a new workbookЗ ц( З т(џџџџџџЗ ф(okџџHoџџ@–XрR Variable list has just changed, so check whether the OK button should be enabled. ќ$ 'ж жЌ  (oџџА–˜р& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџ –ир% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџ–р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ ( јЗ (oџџр–X џџ!(A@joџџР–˜р Cancel button just been clicked џџA@roџџx–ир OK button has been clicked]ђ]ђ0]ђP]ђp]ђˆ]ђ ]ЌЌђИр Find the output rangeэ ц ф : рЖNormProb$”.. .А›G|jр& Get the ids of the selected variablesЌ жт< ќ <A>р7 Get the variable names to include in the boxplot titleЌ$<$О'$џ ІўЌ ж’ $Ж,  І$<$О'$џ ІўШр' Copy the data to the destination sheetІ  < И И . ьЗЗбL$J'Ьр Set up the descriptive stats . Ь $AІ  ь т ц ф ќA@P џџA@roџџаІ –р$ Q-Q plot (data vs Normal quantiles)]ђИ]ђа]ђш]ђ]ђ]ђ8]ђX]ђx]ђ˜]ђИ]ђа]ђш]ђ]ђ]ђ0]ђH]ђ`]ђx]ђ˜]ђИ]ђи]ђјр# Calculated columns follow the dat фtуЈp)1НШџџˆЖџџџџџџџџџџџџО$o(ХиЖYv‹§њo$o(ХиЖYv‹§њ8$o(ХиЖYv‹§њН$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ <џџ0<@џџЈш" aэ ..КэЌЌ К%Ц..эЌЌ К%Ц$„. р&==================== where is the data !Ž!'ž !Ў'ЖRC1'І  :!h%  :!h% ­ †'р*==================== quantile calculations .ѕэЌЌ7Ф žЌ Ќ7Ф$0. эЌЌ7Ф žЌ Ќ7Ф$0. эЌЌ7Ф žЌ Ќ7Ф$0.эЌЌ7Ф žЌ Ќ7Ф$0.šэЌЌ7Ф. .б, %Ў' .б, %Ў'ЌЌ7Ф!Ў'иЖ= Ж+RAND()*  (œ .б, %Ў'ЖCOUNT( Ж)'Ж =PERCENTRANK( Ж,RC[-1]) (LІ!Ж=NORMSINV(MIN(MAX(RC[-1],1/ Ж),1-1/ Ж)) (LЖ=TREND( Ж, Ж) š(œрS Range(.Cells(2, 5), .Cells(nrows + 1, 5)).Formula = "=" & DataRow & "-RC[-1]"qџџ№р Hide the dataЗ К!Ш!Ъ(Ьр:==================== create X-Y scatter chart of quantilesЌШЌ2ЌњЌШ ˆ!l%BB@H і!'р pick up its name nѕІ&* бt hб ЌбЌ "бvЌб$Ќб&Зб„ЖNormal probability plot of К!б(ЖNormal quantilesб*Ж Data valuesб,Жб.C@ З9pр7==================== add Normal quantiles as X-variable Ќ7†(0 šбt5†B@Bр. .SeriesCollection(2).XValues = TrendLineр"==================== tidy up chart  ˆ%lB@2Ќ 5€!Š(‚Ќ Ъ7К!4!Š(‚Ќ М7К!4!Š(‚5Вѕ Њ5ˆ(Ј Њ5Ž(ŠqџџЌ7†ѕ Њ5ˆ(ЈЌ96Ќ98 Ў9ЂЗ9:qџџИЌ7†ѕ d5ˆ(Ј Њ9ЂЗ9:qџџ€ Ъ7Кѕ5Т9Шqџџ`qџџXoџџPџџџџHџџџџАџџџџjЗAttribute VB_Name = "dlgQQPlot" " €Bas€0{4D918413-C5EE-11D8-B659-0004768B FDFA}J3B8J dGlobaBl‹SpacoFalse ŠCre atablPr@edeclaI"dдTru BEx0pose0TemplateDeriv–Customiz‹D €' Form †­' Copyright 2002: Statistical Services Centre, @The Un€Frsity of €Readingƒ%Written by Howard Grubb,2linayerOption‚ €licitDim NoOfVars As  IntegC PР?РA Sub User1_activ@()A '€+t up t)l€0 box B @CallРitts(cmnD@nAРoРРPutРColumnТ oL€@ lst-Р#iСVB BInitia€eOutputRang e ref, opƒBNewSheetBoo.kBeРore„Co@Xols УНˆSav€[chkgёA+, _ €+ƒ С N/BIf AСPeWorkb@%.MultiXЄEd8ng{nE' Х is sBhСЕ - m€Ÿ "cТe ct Рua new wФE@,CС).ValuСЭУФ .Enс-Јbцe)REndШ If‚ РEЧACЉG("_ChС6СG)с ' = bGhas jbТd, soeck whe@LrтLOK `—t`shoul@d be eу.уЂ[= NumberSelec0ted((ƒQbt(nOK(f> ž0C Pє…B_CрjКkd'рlрY t #U' ЁoAbeРuch =Ђ' MakТeРgok n!ВAaaР+label Рvisibl`™р&˜txtХBg.VcуЦ@lbl]і5 яe>LРRsak!n?ї?…? ?:4@`Я!qџ;4ind4 Vin иСq can(notЁTrРTmeўd>wфвк8gі8€Z0HelpGТGeТtЁ Me.q!PрextIDТП ‚г`АCa@ l р_?Sѕ8Т;у-Б0”UnploadячOђKЊ' W>73Hђ ]ёkiŠk@AD^iўn@u@Bpm"8Ё]C9зЎq?cisomr{буБр$lea=1„zс)d P criРІve staЎtѓbs–(X&,ђЇЯ$7ђB4Иutq™ЏšџЏš‘ds р0>Х01^ІЯЂ˜J;Kub HA0?$ЃЉ !=TlЃЕ Bўy@˜h@_eS&@KѓEC' Q-Q* В-(Т#vq;rmal quant8ile!3ђ !8nrфowТMLo)Ja'–ѓЦЂRowa 3–Ёцc`ЬЏ Q%Rв]аk‚kAHq jTРrdЬe+CountoQQрЅr‚Ь Addrќes’ь#џ%!ЪJжrDo S˜ЦEŸiржjwa™_qkM6”1TXoIn@иO #l€д?!р€!GЖDim ChartRange As @  €LambdapStringt' Calculated columns follow the dataZSet DCF= Destinatilon! !/.Offset(0№, 1).3Q[‘2All In(  sB1, $0)C'= w€here is aрnrows€1ƒ',.R€.CountG Addr8ess†"RC1"‚ Jitter€ (Applic‚‰.WorksheetFunc’.Max(q>) _‚д- œin‰) /˜ 10Ш “Cquantile cФz€lƒ4Witnhr@#A{QDCТ“(.Cells(2™Сo, DCT+ €dn1„d kСZ 2 )2 Norm*qQ3R3KTr€endlinedѕ44 Тƒ9§72ƒ›Р6Т…€‚B.Ф(RefРnceStyle:Р=xlR1C„ЛРпƒ5УeФ№=Х^Т\Я…@хb7.Fр(@{ Array€"=" &‚xР"+RРAND()*aXу…a~copAуџ? Ф сF#aCO0UNT( Ц & œ")Ѓg€ 4ks%‚PERCENTРKю,RC[-<1]Чd($тNORMSINV(M€IN(MAX(cј,1/Ё‡ЉoRёA,1-MСgNБ.TRE€,­,o#ЅA! `"'ЃЭV5ёвV5)) 'Ё Сa” р -у#-End }b<‚'Hide‡ Єc#bР.CurрhtReg€….Eр‡rec—.dena`-True creЫ X-Y s ЂЄcaе of …’‘A ЄveSСЅ.ТйObjecDts\(20РЦ5`2‚00).SЬelР‚QQрƒсName ' pick upР its n@„€,ŸƒЂ"рƒWizard SoXurcрxЂ`,ЩЕG@alleryA|X$YSC, ЁPat:=@sPlotBтƒ&s,эtegoryLabels:=рHPSerieshHasLeg@™:=FalDseъTitŒ"Hal probability pёе є.VaєluKCА Ь†ž"*ђЅ‘" v‚sPExtraЅѓ&Ё1VisibрleOnlсD‚ Dƒ#| add D v as $varќia –р ‘ @р(1).XR ЁcAўqГ%БЭq%і<tУРџon(2ЩL fС_w"‰ ti|dyС'/U .s.(љT,).)ва>nt.SizЁm10Axes(Œxlѕ0xis_вя Т2.сA=eaBorder.Ё2o@8xlNœoncAAIn€?ior€–lorI№ndex~њI@#//†xп пMarkerBackДgr€žd#G1Щ Ћ“@р7 Get the variable names to include in the boxplot titleЌ$<$О'$џ ІўЌ ж’ $Ж,  І$<$О'$џ ІўШр' Copy the data to the destination sheetІ  < И И . ьЗ$J'Ьр Set up the descriptive stats . Ь $A>І < ь т ц ф ќA@P џџA@roџџ І –р, 1-D density estimate, with bandwidth sliderр5 Select column of data - large area of calculation isр placed to the right of this]ђИ]ђа]ђш]ђ]ђ]ђ0]ђP]ђp]ђ]ђА]ђар6 Insert sufficient columns at front of sheet for tableЌ'ЬІ эЌЌ .%ФЌ Ь .%Ф$0!Ъ.   B@э ..КэЌ Ь К%Ц..эЌЌ К%Ц$„. р&==================== where is the data !Ž!'ž !Ў' .ѕэЌЌ7Ф žЌ Ќ7Ф$0.šЖ=  š(œр) can add transformation hereЖR5C1:R žЌ ЖC1'ЖbinsЌЌ7Ф(ЖdensЌЌ7Ф(ЖnormЌЌ7Ф(ЖhistЌЌ7Ф(ЖcountЌЌ7Ф(ЖMinЌЌ7Ф(ЖMaxЌЌ7Ф(ЖnbinsЌЌ7Ф(ЖbinwidЌ Ќ7Ф(LЖmeanЌ Ќ7Ф(LЖstdevЌ Ќ7Ф(LЖbandwidЌ Ќ7Ф(LЖ=COUNT( Ж)ЌЌ7Ф(LЖ=MIN( Ж)ЌЌ7Ф(LЖ=MAX( Ж)ЌЌ7Ф(LЌЌЌ7Ф(р number of binsЖ=(R[-2]C-R[-3]C)/R[-1]CЌ Ќ7Ф(Lр7 binwidthЖ =AVERAGE( Ж)Ќ Ќ7Ф(LЖ =SSCSTDEV( Ж)Ќ Ќ7Ф(LІЖ=5*Ќ Ќ7Ф!ЎЖ/Ќ Ќ7Ф!ЎЌ Ќ7Ф(Lр< bandwidthЌ(Ќ Ќ7Ф(ЌЌ7Ф!'@Ж=R6C3-0.5*R9C3ЌЌ7Ф(Lр. bin0Ж =RC[-1]+R9C3ЌЌ7ФЌЌ @ 7Ф$0(LЖ=SUM(R[+3]C:R[+ žЌ Ж]C)/R5C3ЌЌ7ФЌЌ @ 7Ф$0(LІЖJ=(NORMDIST(R[-2]C,R10C3,R11C3,TRUE)-NORMDIST(R[-2]C[-1],R10C3,R11C3,TRUE))ЌЌ7ФЌЌ @ 7Ф$0(LІ2 Ж =(COUNTIF( Ж,Ќ"$F‚ƒ„r†‡ˆ‰Š‹ŒŽўџџџ‘Ÿ“”•–—˜™š›œž ЁЂЃЄЅІЇЈЉўџџџЋЌ­Ў  БВГДЕЖЗХЙКЛМНОПРСТУФАЦЧШЩЪЫўџџџЭоЯабвгдежзийклмнЬпрстуфхцчшщъыьэюя№ёђўџџџєѕіїј§џџџћќ§ўџP ф„“ X X)1НˆЁџџˆЖџџџџџџџџџџџџР$o(ХиЖYv‹§њs$o(ХиЖYv‹§њ:$o(ХиЖYv‹§њП$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ<џџ0<џџ<џџ<џџџџџџš0{4D918417-C5EE-11D8-B659-0004768BFDFA}{4D9183BA-C5EE-11D8-B659-0004768BFDFA}@%%џџџџ иX`џџџџџџџџџџџџџџџџџџџџиџџ” ˜`џџџџџџџџџџџџџџџџџџџџмџџ” и`џџџџџџџџџџџџџџџџџџџџрџџ ” "`џџџџџџџџџџџџџџџџџџџџфџџ ” $X`џџџџџџџџџџџџџџџџџџџџшџџ ” &˜`џџџџџџџџџџџџџџџџџџџџьџџ” *и`џџџџџџџџџџџџџџџџџџџџ№џџ” ,`џџџџџџџџџџџџџџџџџџџџєџџ%%”`„Іџџџџџџџџџџ „.џџџџџџџџH% „џџџџџџџџh%`„Ьџџџџџџџџџџ`„œџџџџџџџџ џџ`„$џџџџџџџџџџ „Иџџџџџџџџша№ >џџџџ`џџџџџџџџџџџџPџџџџдџџuu”)ƒ.џџџџџџџџpx€%iƒЬџџџџџџџџџџ˜„iƒ$џџџџџџџџџџџџџџ„`„žџџџџџџџџџџ`„@џџџџџџџџџџ`„џџџџџџџџџџ`„Bџџџџџџџџџџk ca`„џџџџџџџџџџ( „ џџџџџџџџH% „Кџџџџџџџџh% „ џџџџџџџџˆl bu% „JџџџџџџџџЈA@r% „šџџџџџџџџШ O%`„Dџџџџџџџџџџ€ўџџџџџшџџџџџџџџ%ўџџџџџџџџџ@џџџџџџџџџџ %b€жџџџџ4џџџџ@џџџџџџџџџџџџˆиHџџџџџџџџ˜XџџџџџџџџиXџџџџ˜џџџџџџџџ0ƒўџџџџџџџџџџџџџџџџџџџџџ‚ ”џџџџўџџџџџўџџџџџџџџџџџџџџџhџџџџџџџџџџџџ џџџџ(џџџџ0 џџџџHшџџџџџџџџџџџџHџџџџџџџџџџџџшРˆјдџџџџџџџџџџџџџџџџџџџџџџ x˜ 7BпўЪэ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ ,h€ џџџџ€˜€ џџџџ€ € џџџџ"Ј€ џџџџ€ А а р€ џџџџ№0€ џџџџ&8€ џџџџ `€ @p А Р ар€ џџџџш€ џџџџ"№€ Xј€ џџџџP`€ џџџџx€ џџџџ"€€ ,ˆ€ џџџџ€ ,И ш ј€ џџџџ€ џџџџ"€ ,€ џџџџ€ ,H x ˆ€ џџџџ˜€ џџџџ" € *Ј€ џџџџ€ Pи ( 8€ џџџџH€ џџџџ"P€ џџџџX€ џџџџh€ џџџџ"p€ &x  А€ џџџџ"И€ "Р€ џџџџ€ш€№€ј€€€€€ џџџџ€ (*Hx€ џџџџ€ ,ˆИа€ џџџџ€ >р 8"P x€ џџџџ€ .ˆ(И€ џџџџ€ $р€ џџџџ& € џџџџ H€ џџџџX€ џџџџ"`€ 2x€ <А€ "№€ џџџџ€€ €(€0€8€ џџџџ€@€H€P€X€`€ џџџџ€h€ џџџџ€ <pА<Иј   € џџџџ8 € џџџџ€ ,X ˆ  ˜ € џџџџЈ .А 6р " € џџџџ@ ` €   Р р   @ ` €   € џџџџ,Р *№ * ,P >€ .Р .№ b ˆ € џџџџ  0И <ш Z(‚ˆєЈА€ џџџџ€ Иа€ џџџџ$ш.8hpx€˜€ џџџџ€ 6 $и € џџџџ € џџџџ Ж € џџџџ>и€ џџџџ"0"X€ џџџџ€ (€ЈРи №   8HPX`x€€ џџџџˆ€ џџџџ€ џџџџџџџџ˜р Form dlgDenestрG Copyright 2002: Statistical Services Centre, The University of Readingр& Written by Howard Grubb, Colin GrayeriЭџџ`]ђH–р Set up the list boxџџџџ мAџџџџЃ ќA@Ї % р т ф цA@оЗ т(р Force output onto new sheet/bookІ Ж<=Ќ"$FЌ&$FЖR[-3]CЖ)-ЖCOUNTIF( Ж,Ќ"$FЖ<=Ќ"$FЌ&$FЖR[-3]C[-1]))/R5C3ЌЌ7ФЌЌ @ 7Ф$0(LјІЖd=IF(RC1="","",NORMDIST(R1C,RC1,MAX(R12C3,0.0001),TRUE)-NORMDIST(R1C[-1],RC1,MAX(R12C3,0.0001),TRUE))ЌЌ7ФЌ ž Ќ Ќ @ 7Ф$0(LqџџHр Hide the dataЗ К!Ш!Ъ(ЬЌЏЌ2ЌЌ( ˆ!H%BB@H іѕЌ Ќ .%Ф!'DЌ9р note that these are hard-codedЌ9Ќd9Ќ9JЖ$C$139LЗ9Nqџџ`р0==================== create X-Y chart of densityЌШЌ2ЌњЌШ ˆ!l%BB@H n!'BЗ n(pІ *:ЌЌ$ФЌЌ @ $Ф .%0бt hб ЌбЌ xбvЌб$Ќб&Зб„ЖDensity estimateб(ЖValueб*ЖDensityб,Жб. nB@ ЌЌ$ФЌЌ @ $Ф .%0бt n!†B@BЌ n!€!Š(‚Ќ Ъ P n%К!4!Š(‚Ќ М P n%К!4!Š(‚р"==================== tidy up chart Њ n!В!ˆ(Ј Њ n!В!Ž(ŠЌ n%†ѕЌ5ˆ(ЈЌ5ˆ(Š Њ9Ђqџџр Ќ n%†ѕ d5ˆ(Ј Њ9ЂЗ9:qџџ   Ъ n%Кѕ5Т9Шqџџx oџџp џџџџh џџџџ›ЗAttribute VB_Name = "dlgDenest" " €Bas€0{4D918417-C5EE-11D8-B659-0004768B FDFA}J3BAJ dGlobaBl‹SpacoFalse ŠCre atablPr@edeclaI"dдTru BEx0pose0TemplateDeriv–Customiz‹D ‰€' Form †Њ ' Copyright 2002: Statistical Services Centre, @The Un€Crsity of €Readingƒ%Written by Howard Grubb,2linayerOption‚ €|licit Dim NoOfVars As  IntegC P@>@@ Sub User1_activ@()A '€+t up t)l€0 box B @CallРitss(cmnDРlA@nРРPutРColumnТ oL€@ lstР#iAUBInitia@eOutputRange ref, opƒBNewSheetBookуBE .En†Р#'8œoB onto new syС/bB@РЧoreC€ rols" CЬSav€kchЦkwA;, _ €ƒM)&L,M?ЦBIf AС`eWorkA%.MultiIhEd@Hng‹n‰E' Х isР2!AФ - mЎ cбe chartщр aтwф % ƒ )с.Valu!n?Ѓi  *Ы‚1REnd IfЂ РMAKЉO("_Chс>SСOс' E bOh0as jbТd, soeck (whe@TrтTOK  žt`ashou€ld be eB.Ђc= NumberSele`cted((ƒYbPtnOK(f>4 0C і…B_Cuрrkd'рtрa | OC] ЁwAbeР}chр—=Ђ' Ma„keРook naЙAiaР+label€ visibl  1р&txtХBo.VЧcЅ@lbl]љџpLРR‚jAv??ћ? ?:4@`g!qџ;4ind4 Vin@‘С cannotЁTrРTmedџ>w$кк8gQ_a@-Help'bG„etQ Me.qС!PextIDТПщЗCa@ l рcS?ѕ8Т;у-Б0”аoloœad џїOKК|' g>G3X pi—šoPAD^inPyџPB€q28Б]S9Ў?ѕsmsom‚бБ№$јlea#2I Т (І& @", " &Os”(iDNp7 iRwBcЅ’d –с 1 do˜,2Тy*=6ЈcтkB , Dз&ЭЗџО )jвF*Б(dЃ criРЉve pstatЃs•(}%,ђЊ6Ђ23Иuўtq˜Џ™Џ™‘c# А/ђ‡B!=nrowS„LohOnbinoTџ0Ы%Ts VФH@Ђ ­fћцA cзA—цD%аToIn№ЮtQтџQDЯƒ… ‹ У"Thisв№ “W6SD!Do€$У›’'е2 suffРмтФs at8 fr€Щђ> fopЏцд—?§Жs = 23 Set ColumnsTo@InsertрRange(Destination.Cells(1€, 1), _t‡zNNoOfА)).Entir^exs.z(xlShiftT€oRight)+сЃData3Ÿq!­!/.Offset(0, -? •‚.3€AlвlInƒ (&s…&…0)ƒO '= where is the dH6nrow'Рƒ',.R€.C№ount‚ B€Address‚СWith ‚€Цс•This6!ƒуо5о„ƒ!+ 4AУ1РХ.FormulaArray"=" & &' can add transіf ‚ˆ A;'РСcop‚R5C1:RСЦР"C1"E Х„&€V2). ValuebiŒns† „2, ‰дde3‹nР)MwР>IРMtM‰c‹iЭ6KMinMR7LaxM8Kn=9ТDfDFwid1КР,Ш mea Ž$1Ѓ,ЈstdevŽ #-ШbandgЉŒ7&3)ХG=РCOUNT(с?ІBp& ")-  ( MœINп@+ЭAXпр-РeL20 ' number o+,ёChr(34К)б<ђf’8Ђcѓ6ё")-a ќ "Ph№FБї С)`=?T#NЭ5Ђ}- ё4џƒЭ`RC1="F,Bз1C, ,"MLR12р0.и000 —m1т)ЯУЧдEnd Aƒд%Сb'HideЫ‰~s‡s.Curre`ntReg œ.‡€ w TrueВBActiveSheet.Spi@nners.`E(417Р5qiA0)Р.SelecгŽЂŒЯѓpr€DSDаŽџ•:ЁДЅ–‚P\$HР\$otЁ atё se a˜hard-рcodedІАzpR1їaxё0VC.€SmallChБšLinkedaБ`"$C$13mDisplay3DShading –—ЃRЄ creaа X-Y c0 t!iŽity‚ ƒi rtObjаЙЃ20`Ѓё0Ы~D€’`R@ “в.NamЎ“PlotVisibleOnl1Fals‹ЯБ ."WizА Source:ў=y3DцФ4УЋSGЦG№ery:=xlXYScatter, 1Zat:6=№ с BђqД, CРgoryLa0bels"%BSe0ries…№HasLegend:=2 , TitlU "” QХm"џ‡%2lpеђќрќEx€Вe3"h#ƒ џ7a1с6P3яpищDaу;a^В’šni0:izЖ1г.Щ AxesАиЅ, xlPrimaryР).AxisOOП€Bbqo O1C1tidy up1ž 1 A`3.Bo rder.а9eStylс xlNoNnг*)&In%iorиlorIn|de1@XJЉн(ц1д= чEд pC‡ЩGrkero OЪ[пB-З#(2пinшAАutomatic .MarkerStyle = xlNonepSmooth!\FalsXEnРd WithF ActiveChart.Axes(xlCate gory)’Cr€ossesAtL.MinimumScalT b Sub € N€ џџџџ€ h€ џџџџ€ˆ€ € џџџџ€˜€ €Ј€А€И€Р€Ш€а€и€р€ш€№€ј€€€€ џџџџ"… € 0 € џџџџ€P€X€`€ џџџџ€ hˆB  шј  8 HPX hx˜ АРШ а ир ш€ џџџџ№€ џџџџ"…ј€ џџџџ€€€ €(€0€8€ џџџџ @+P%` x€ & И "Р и%ш!( 0"@P x €'˜B"А.јЬєHџџџџІ–+1Н‡GџџЖџџџџџџ@Dџџџџџџџџ(џџџџxџџџџџџџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 8”џџV ”џџ€> џџџџ<0џџ< џџ<џџџџџџš џџџџ*LџџџџPџџџџџџџџLџџџџ<4џџ<8џџ<<џџ<џџџџџџpј%%@ўџџџџџTџџџџџ џџџџ%@ўџ`Pџџџџџ џџџџ% @ џџx%@ўџрLџџџџ %@€ џџИ %%џџџџnp†џџи%@ўџџџџџHџџџџџ %@ўџџџџџ8џџџ џџ %@ўџџџџџ4џџџ џџ %€ џџX %%@ўџ 0џџџџџ %Р`џџ˜а%@ўџџџџџ,џџџџџ %h  џџиШ %@ўџџџџџ(џџoџџ % P№`џџџџџџџџј џk@џџџџџџ„?)ƒeџџџџ џџ`h€%)ƒfџџџџџџ џџџџ€ ˆ `„hџџџџlџџџ џџ`„jџџџџ\џџџ џџ`„ІџџџџZџџџџџ r8`џџџџџџџџ@Фўk0џџџџџџ$$9„iƒtџџџџ џџ џџP€)ƒwџџџџџџpx€%IƒFџџџџџџ џџџџџџ„ „yџџџџhџџџИ%`„zџџџџdџџџџџ`„|џџџџ`џџџџџ`„Іџџџџ^џџџџџј`„ Xџџџџџ`„~PVџџџџџ ш@`џџџџџџџџX џkxџџџџџџ]„‚?)ƒeџџџџ џџ˜ €%)ƒfџџџџџџиџџџџ€ Р `„hџџџџlџџџ џџ`„jџџџџ\џџџ џџ`„ІџџџџZџџџџџр„„јџџџџ †џџџџ`џџџџџџџџ8аўk€џџџџџџ++z„iƒtџџџџ џџ џџ €)ƒwџџџџџџРШ€%IƒFџџџџџџ џџџџџџ„ „yџџџџhџџџ%`„zџџџџdџџџџџ`„|џџџџ`џџџџџ`„Іџџџџ^џџџџџ`„№Xџџџџџ`„ЊџџџџTџџџџџ`„nXRџџџџџ`„~ PџџџџџЊ Uрџџ@џџџџџџџџЊ ыџџ8@џџџџџџџџЊ Y0џџX@џџџџџџџџЊ 1X џџx@џџџџџџџџЊ [€џџ˜@џџџџџџџџЊ uЈџџИ@џџџџџџџџЊ ]аџџи@џџџџџџџџЊ јџџј@џџџџџџџџЊ   џџ@џџџџџџџџЊ =H$џџ8 @џџџџџџџџЊ Уp(џџX @џџџџџџџџЊ _˜,џџx @џџџџџџџџЊ љР0џџ˜ @џџџџџџџџЊ Їш4џџИ @џџџџџџџџЊ a 8џџи@џџџџџџџџЊ cџџџџ<џџј@џџџџџџџџџџџџР˜8Иpџџџџџџџџџџџџ џџџџ џџџџЈаџџџџџџџџџџџџџџџџр№0XџџџџР€џџџџш@јHƒRџџџџџџџџџџџџџџџџџџџџ˜8Иpџџџџџџџџџџџџ џџџџ џџџџЈаџџџџџџџџџџџџџџџџр№0XџџџџР€џџџџш@јHџџџџ рџџџџџџ@ўџџџџџџџџ џџ @  рџџџџ€@ўџџџџџTџџџџџ ШџџџџЈ˜8Иpџџџџџџџџџџџџ џџџџ џџџџЈаџџџџџџџџџџџџџџџџр№0XџџџџР€џџџџш@јHџџџџ˜8Иpџџџџџџџџџџџџ џџџџ џџџџЈаџџџџџџџџџџџџџџџџр№0XџџџџР€џџџџш@јHџџџџ˜8Иpџџџџџџџџџџџџ џџџџ џџџџЈаџџџџџџџџџџџџџџџџр№0XџџџџР€џџџџш@јHџџџџ џџџџџџџџxџџџџ(џџџџџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџx џџџџџџџџ џџџџџџџџџџџџџџџџ џџџџ€џџџџџџџџ@џџџџџџџџџџџџџџџџР`иhџџџџџџџџ@џџџџРџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџ0џџџџА џџџџџџџџџџџџџџџџ(џџџџ˜џџџџ˜ pџџџџџџџџџџџџџџџџјА @ўџР Rџџџџџ и ˜ @ўџџџџџPџџџџ `Р џџџџ@„Fџџџџlџџџ џџ€0@„Fџџџџlџџџ џџ€@„Fџџџџlџџџ џџ€ @ўџџџџџ@џџџ џџ @@ўџџџџџ0џџџ џџ (ˆР @ўџP,џџџџџ шp @ўџ(џџџџ џџџџ@„Fџџџџlџџџ џџ€џџџџ€@„Fџџџџlџџџ џџ€ @˜ 0џџџџnprџџџџ @ўџџџџџ$џџџџџ @ўџџџџџ џџџ џџ Р(@ўџ№џџџџџ џџџџ@„Fџџџџlџџџ џџ€џџџџа@„Fџџџџlџџџ џџ€@„Fџџџџlџџџ џџ€џџџџ№Pџџ џџј@„Fџџџџlџџџ џџ€џџџџ@ўџџџџџџџџџџ 0№џџ џџ@ўџџџџџџџoџџ џџ@P џџџџџџ˜@„Fџџџџlџџџ џџ€@„Fџџџџlџџџ џџ€џџџџHxџџ џџ@ўџ№Dџџџ џџ Аџџџџpрџџ@„Fџџџџlџџџ џџ€џџџџ@ўџџџџџ@џџџ џџ X@ўџџџџџ<џџџџџ @@ўџ0,џџџ џџ (@ўџ0џџџ џџ ˆpp@„Fџџџџlџџџ џџ€PўџџџџџџџџА`xрАџџ џџ@„Fџџџџlџџџ џџ€ џџ@ўџџџџџџ (@„Fџџџџlџџџ џџ€@„Fџџџџlџџџ џџ€џџџџx @ўџџџџџџџџџ @„Fџџџџlџџџ џџ€џџџџа№xи0џџџџџџџџРџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџ џџџџџџџџџџџџџџџџџџџџџџџџpџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџИHџџ џџ@ўџџџџ џџ џџџџџџџџџџh@ўџ`єўџџ џџ @ўџxфўџџ џџ џџџџџџџџа@ўџџџџџдўџџ џџ @ўџџџџџФўџџ џџ @„Fџџџџlџџџ џџ€@шџџ џџ@ўџ @џџџ џџ PџџџџpjXўџџџџџџ№PџџџџР@ўџџџџџ<џџџ џџ @ўџџџџџ8џџџџџ џџџџШ@(€ˆџџџџџџџџџџџџ џџџџџџџџpџџџџџџџџџџџџџџџџиџџџџИџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџаЈ@ўџ(џџџ џџ 8hџџџџh@ўџџџџџџџџ џџ @ўџ˜џџџ џџ р€џџџџРўџџџџџџџџP`@ўџ€џџџџџ @ўџџџџџџџџџ @ўџА№ўџџ џџ @ўџШрўџџ џџ @ўџџџџџаўџџ џџ џџџџ€џџџџЈџџџџИџџџџџџџџџџџџ@џџџџ џџџџџџџџџџџџџџџџџџџџР Hџџџџџџџџџџџџџџџџџџџџџџџџџџџџи ˜ 7B*\R0*#1c$*\Rffff*1342384913*\R3*#2b*\R0*#10$*\Rffff*1042384913*\R3*#26*\R3*#26*\R0*#13*\R0*#1bп0ўЪЅ€ € џџџџ0.@X€ џџџџ`€ џџџџ"… h€jp€ џџџџ€р€ш€№ˆј€ џџџџ ( 8X hpx ˆ˜И арш № ј € џџџџ€ џџџџ"…€ џџџџ€0€8€@€H€P€X€`€h€ џџџџ p+€% Ј#Ри€ >№0@H P "h ˆ    "Ј#Р и"*ш    0 8 ,@ #p 0ˆ #И а € џџџџи € џџџџ€ џџџџџџџџш р Module modSaveelрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџpЭџџh] ђИ] ђр] ђ] ђ0] ђX] ђ€] ђЈ] ђа] ђј] ђ ] ђH] ђp] ђ˜] ђР] ђш] ђ –р) Saves the contents of a set of controls.]ђЈ]ђР]ђирClear the collectionџ ІўЌ d!’Ќ dB@lр.Removes the item currently first in collectionџ ІўШџ hў f“ h$nœ h$pЖObjectœ h dA@rdџџАЌ'Іџ jў h“ j$nœ j$pЖObjectœ j d ІX A@r ІЌ 'Іkџџ8kџџ0џЧ(kџџ kџџџЧoџџІ їЖ–№]ђ ]ђР]ђи]ђ№]ђ]ђ э t.x x$p'| x! F'z |ЖListBoxœр Remember all the selected items xѕџ ІўЌ5„Ќ ’ І7€œ ІЌ7‚$рœЌ'~dџџ№ ІЌ7‚'~%kџџа Ж›G Ж,'j  І7‚Ж, ~'џџxkџџ€џ ІўШZџџџџqџџh  z vB@Btџџџџ |ЖTextBox |ЖComboBox |ЖRefEditeџџј x!d z vB@Bџџ |ЖCheckBox |Ж OptionButtone x! z vB@Bkџџ oџџ˜–8Ідџр[ Restores the contents of a set of controls, ' unless the current worksheet has changed.]ђр]ђј]ђ]€ђ( d!Ќ›G|jџ hў f“ h$nœџџџџ h$pЖObjectœџџ` h dA@†dџџЌ'Іџ jў h“џџ j$nœ j$pЖObjectœhџџџџ j d ІX A@†џџџџ ІЌ 'ІkџџkџџџЧkџџkџџјџЧ№oџџшІ їЖ–@]ђ№]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ э t.x% x$p'|џџ x! F'z |ЖTextBoxœ z$v x(dџџџџ |ЖListBoxeџџр8 Reselect the saved values if they are still in the list z$v'Ќ'n_џџА  nЖ,$j'Њ  nЖ,$j$X'~ ЊЖ›Gxj xѕџ ІўЌ5„Ќ ’ І7‚ ЊœЗ І;€ ~Ќ›G ~ ІЌ;‚jyџџшkџџрџ ІўШqџџШЙџџР |ЖComboBox |ЖRefEdite z$v x(d |ЖCheckBox |Ж OptionButtone z$v x(kџџ(oџџ џџџџџџџџњЕAttribute VB_Name = "modSave" ' Module H LCopyright 2002: Statistical Services Centre, The University of Reading–Written by Colin GrayerOption Explicit PrivaБš)Pub" DataAreaМ As NDewTlecH  &Unstack#%TwoWayœ€ž'Lookup$XYPlot#€“umn Box QQ Denes&Descri@mveœ0Sum marisн OnxeTtiЁ @Pрroporƒ\(€ƒп †”Sub u‚G„Co€Нols(СdAЁ€kD , Pa ramAr€И a rrObj€Іs( ) VРCant)H ' СsД t@Яc€гsСЮ`a setr Р.СПA Dim €objElem OH€ayмiС!Integp AClearфlƒFjFor iр†1 ToТd.CxounvЁab!.Remove 1 Ѓ'УCitem curr@ly€ first €ФcoK Nexр#!СEachЉInш*УЁ If IsеЃ-(ч)a“nЇ$Not TypeяЁЁЊ Ѓc"Сф?ˆ,c"ы Elsюe+Ё(0Я& 8џРЧяA IЬёAџe@j!Ю"Љ ‰#, $$, CStr(iD`‰i$i + 1AEnd ќIfѓuAK+-щљЃ a€‚аФвРы">$A({ €бф{€ї`Zщ‚_saƒо ыByV Inde:xє"Р$Ђ!{Ctrlc ЂцKey§СS€ќюр Ѕ!\Pgю?ёpueЯА~lмNoqљBВS@J2 М= p"сB=з5Ї1г = ё.Rˆм& ‚’p((‘дЌ"LА† m"ћ+'p…member a$ll‚JseqJed сEsВWitОh’06q%0!Lf.L -]&А.~Sd*@Р 'рFNull(Ђ(i,ј 1)п6Ё1№`ќ= Ÿ?_B3шШ ?3й*R у<>ь "ƒL l№Ёq№& ", Ÿ8ЁCѓ7Є) тP2 [ѓ.Q3 iEсСѕ!1.Addѓ, п0!ЂQ` : T€`3 Or šComboЏ!3RefEdќitŒ#fв'Џщ'рCheckГ:@Button_lџТ RвhјJ;Eƒ­!EˆutR€oretE_†РВ††7 ё2sNt№O†N†, J'Р unles$ѓz workshe ?has cha№nged‰‰q%ёEџь`EдRЃ!1‰@З Ч PreviouмsWVРVO 3$/hЄ‰Р >hpЧExјit №S–vgu€HЏ?… ?…t_> с@{?…в)B#R ?…б ž Ko…s Г Cџ‘’M‹aЦ§o…сџ:йь/л o…їџ?Б;зќМŸ…џqŸ….MиПУћГ‚ˆ љгŸ…я`*ќ Я…Я…Е; Ж9В Optio€nal ByVPIndex = €"") €Dim Ctrl As Contˆrol\Key,@String ZT(ype4i&In`teger^wuA,FieldDPosFSelNo# dSetТ= œVawбЃ= рName( €z€yk=. & c‚‹&If ‚„"TextBox"Р) Then€ %. €ЅColl†()ƒ-Else!Lis!' Reselect the saved values „if y ar €till in‚ўl%BЌd @€N Ш= 1…DoEРБC]= NР5Т(‚„, , ",†Я€ ƒУ\Ul( >'C €>E""‚L Exit Ъ With‚_Ш%€For iT0 To .MCount -‡2@РB(i)п@ ƒ h .€1@Y„ed True Ч €У;<> € @{С!(i, 1ABQB8@/ЮEnd ЬIf‹СQ iШ УAD…LoopТ‘’ ComboУЃOrKЊRefEditСzЊCheckг #‰РButtonq ГQ‰) ЁSubA qˆЉnЁˆйˆ1k pX єZџTџH $lTџфўcPџ:(0џH (50џ ZџdPџ€lџўv(џ  lџ јlџ #$џћ0У/$џ†:@џ%l lџ ієpZџlџ\џў‰џі \џ щ\џ #$џћ0У/$џчkZџћ§F0џ%l \џ 50џ kZџєЉpZџ \џўŒџ lџўw(џ JŒ h 8 (џџ џ\џlџ$џ0џ @ў’lџ§ Dџ§ѓhџ+lhџќј@џ@џMDџ @ 1<џl@џ=hџ><џ1`џ@џ%<џhџ t><џF,џlџћяџ`1dџ6,џџ l`џћ0І lhџќјџ"є^џџW,џ (DџћœџU5,џўcџt^џ§“@џўš,џ џ5,џh%^џ§“@(џ%џўš,џ  5,џъєpVџ !^џ§“@(џ%џўš,џ UpVџ5,џ lXџћ=( lXџ *1Xџ@lXџFџ^џ§“@џўš,џ ћяџ:єў ћяфўkVџDдўћяФў`1Xџ6,џџфўФў ^џdџŸќcќјџ''џ',џdџMџ@XџMDџ@H 6,џџ:l`џћ0l`џћ0Хl`џћ0Хі.hџW,џќ‹'фў'џdџMDџ@,џH 6,џџфў:l`џћ0l`џћ0Х:.hџW,џќ‹'фў'џdџMDџ@,џH 6,џџфўџИ@<$џlџ`џXџhџdџ$<џ@џ,џџфўФў<№TџH $lTџѕЧ€lџўvLџ ы lџ мlџ #Hџћ0У/Hџj:8џ%l lџ кєpZџlџ\џў‰(џк \џ Э\џ #Hџћ0У/HџЫkZџћ§Fџ%l \џ 5џ kZџєЉpZџ \џўŒ(џ lџўwLџ . d№8 Lџ(џ4џ\џlџHџџ Dў’lџ§ @џ§ѓhџ+lhџќј<џ<џM@џ @ 18џl<џ=hџ>8џ1`џ<џ%8џhџ t>8џF(џlџћяџ`1dџ6(џџ l`џћ0š#(џdџM@џ@H ќэ(џhџў›5(џ= l`џћ0Ш(џdџM@џ@H (џ`1Xџ5(џєpRџ:@џ %RџlXџ 1Tџ":@џ %RџlXџ #8џ хpPџ/8џ lTџћ0Х lhџќјџ"є^џџW(џ (@џћœџU5(џўcџИ#^џ§“@џўš(џ lTџFџ]ћ35(џЌ^џ§“@cџ%џўœ  kPџєЫЇ^џ§“@(џ%kPџDрў%џўœ И ^џdџDќcќјџЯ=l`џћ0l`џћ0Х#(џdџM@џ@H ќэ(џhџў›5(џ=l`џћ0l`џћ0Х=#(џdџM@џ@H ќэ(џhџў›5(џЌD@(џlџ`џXџhџdџTџ8џ<џ(џџ\rU€€€ џџџџџџџџH4`ќ§џџџџџџџџџџџ™Б=yo8Љ` ќџџџџџџџџџџџбсљ/=y4б`ќ§џџџџџџџџџџџ™Б=yo8љ` ќџџџџџџџџџџџбсљ/=yndlgLookup џџџџИg6dlgOneProp'џџџџЮЦM__SRP_6BGџџџџњЎ*__SRP_7џџџџџџџџџџџџ рЎ р(dj  oџџP– рA Check that the number of selected items in the lstLookup and theр6 lstData boxes is non-zero, if so enable the OK button –$ 'Š ˆЌ  ŠЌ  (oџџ€рPrivate Sub lstLookup_Click()ррE ' Check that the number of selected items in the lstLookup and theр= ' lstColumns boxes is non-zero, if so enable the OK buttonр* NoOfLookups = NumberSelected(lstLookup)р8 btnOK.Enabled = (NoOfLookups > 0) And (NoOfDatas > 0)рр SetupColumnsListррEnd Sub–` œ!dЖœЌ'ˆdџџрЌ'ˆkџџа ˆЌ  ŠЌ  ( œ!dA@’oџџ– р% Dim LookupIndex(0 To 1) As Integer]ђ]ђ ]ђ8р5 Put column names or numbers into the list of columns šB@˜ ˆЌ œэ І$0.Јэ Ј$Ќ.Ј Ј Œ ŽAЎ ŒЌœр . There are no column names in the lookup tableр  Use column numbers insteadџ ІўЌ Ј!P!’ЖColumn І šB@^џ ІўШdџџрр ) Insert lookup column names into the listџ ІўЌ Ј!P!’ Œ І Ј%Ф!'Њ ЊЖœр( Column name is blank, use column numberЖColumn І šB@^dџџ Њ šB@^kџџ№џ ІўШkџџиkџџаoџџШ–Pр& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџ8–р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџЈ–ар$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџј– џџ!(A@joџџи–Pр Cancel button has been clicked џџA@roџџ–р OK button has been clicked]ЌЌђа]ЌЌђ]ђ@]ђx]ђ]ђЈр Set up the array of columns š$ 'Ь ЬЌœЖ+You must select at least one column to copyA@в|џџ˜kџџЌ ЬсPи šѕЌ'Zџ ІўЌ5„Ќ ’ І7€œ ZЌ 'Z ІЌ Z+Pkџџџ ІўШqџџјр& Get the ids of the selected variables – АA>р* Call ItemsInBox(lstLookup, LookupIndex)Ќ$А œ!d PAДІ Z т ц ф – š œA@P џџA@roџџ І –р]ђ ]ђИ]ђи]ђј]ђ]ђ0]ђH]ђ`]ђxр Remember where the data areэ ˆ.–р( keep a track, as we'll be moving sheetsэ А$@$0. р!dЖœр; Default range should be immediately to right of data blockЌЌ О !Ш%%Ц!Ў р(dkџџИр Find the output rangeэ ц ф : рЖLookup$”.. .А›G|jр Set up the new Vlookup columnsэ І$0.Јэ Ј$Ќ.Ј Ј Œ ŽAЎЗбJ Ј%Ў'Ж !Ў'И !'К .ѕџ ІўЌ P‘’р  Insert lookup column name Œ І Ј%Ф!Ќ І7Ф(І Ж =VLOOKUP( ИЖ, ЖЖ, І$PЖ,False)'МЌ І7Ф КЌ І7Ф$0ѕ Рœ М9œdџџШ М9LkџџИqџџАџ ІўШqџџ˜oџџ–рA Expand the given range to include non-blank columns to the right]ђ(]ђH]ђ`э і!Ш.Т Т!N Т!P! Ќ 'Ф і!N і!P! Ќ 'Ц Ц Ф œІ эЌЌ і%Ф і!Ž!Ќ О і%%Ф$0.іkџџpэ і.ЌiџџXџџџџPџџџџњЖAttribute VB_Name = "dlgLookup" " €Bas€0{4D91841B-C5EE-11D8-B659-0004768B FDFA}J3BCJ dGlobaBl‹SpacoFalse ŠCre atablPr@edeclaI"dдTru BEx0pose0TemplateDeriv–Customiz‹D ‰€' Form †Њ ' Copyright 8 ф„{ @ )1НvюџџˆЖџџџџџџџџџџџџТ$o(ХиЖYv‹§њw$o(ХиЖYv‹§њ<$o(ХиЖYv‹§њС$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ<џџ0<џџ<џџ<џџџџџџš0{4D91841B-C5EE-11D8-B659-0004768BFDFA}{4D9183BC-C5EE-11D8-B659-0004768BFDFA}џџџџ( b€Œ(8џџџџ@џџџџџџџџƒўџџџџџџџPџџџџџџџџџџџџџџ%%  `џџџџџџџџџџџџџџџџџџџџ№џџ” ”р`џџџџџџџџџџџџџџџџџџџџєџџ” и `џџџџџџџџџџџџџџџџџџџџјџџ” Ђ``џџџџџџџџџџџџџџџџџџџџќџџ” Є `џџџџџџџџџџџџџџџџџџџџџџ ” ’P`џџџџџџџџџџџџрџџџџџџ##”iƒІџџџџџџџџџџџџџџ„x. „Јџџџџџџџџooku%`„Њџџџџџџџџџџtati`„Іџџџџџџџџџџre, `џџџџџџџџџџџџџџџџџџџџџџ ” "а`џџџџџџџџџџџџџџџџџџџџ џџ ” $`џџџџџџџџџџџџџџџџџџџџџџ ” &P `џџџџџџџџџџџџџџџџџџџџџџ” Œ `џџџџџџџџџџџџџџџџџџџџџџ” ,р `џџџџџџџџџџџџџџџџџџџџџџ''” „Аџџџџџџџџ iteш „Вџџџџџџџџ8  „PџџџџџџџџpX`„Ьџџџџџџџџџџ`„Іџџџџџџџџџџ`„ZџџџџџџџџџџР Д `џџџџџџџџџџџџ џџџџ џџ00”iƒАџџџџџџџџџџ@€iƒІџџџџџџџџџџ`€)ƒPџџџџџџџџ˜џџџџ€€ €`„–џџџџџџџџ џџ „.џџџџџџџџа% „Јџџџџџџџџ№% „џџџџџџџџ%`„Жџџџџџџџџџџ`„Иџџџџџџџџџџ`„Кџџџџџџџџџџ`„Іџџџџџџџџџџ`„Мџџџџџџџџџџ,Ќџџџџ `џџџџџџџџџџџџај$џџД)ƒіџџџџџџџџ№€%%)ƒўџџџџџџџџџ џџџџ % „Тџџџџџџџџ@%`„Фџџџџџџџџџџ`„Цџџџџџџџџџџ€ўџЈџџ џџxџџџџџџџџ%ўџџџџџџџџџаџџЈџџџџџџџџ %b€ˆ4џџџџ@џџџџџџџџb€Š6џџџџ@џџџџџџџџb€Žџџџџ<џџџџ@џџџџџџџџџџџџЈџџџџ аџџџџрPџџџџ(џџџџџџџџ џџџџџџџџ`џџџџPри џџџџџџџџ`џџџџр‚ ~џџџџўџџџXџџўџџџџџџџџџџџџџџџ џџџџјџџџџ џџџџ џџџџ џџџџ `џџџџиxџџџџџџџџџџџџ(Јџџџџџџџџџџџџа(Ќ(№џџџџџџџџџџџџџџџџџџџџџџX˜ 7BпўЪ§€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ h€ џџџџ€ˆ€ џџџџ€€˜€ €Ј€ џџџџ"АИР€ џџџџ"Ш€ џџџџа€ џџџџ"и€ џџџџ€ р   € џџџџ*0€ џџџџ`$€€ џџџџЈ€ џџџџ"А€ џџџџ€ HИ€ <@"P€ џџџџx€ џџџџ€ $€€ Ј€ LА€ D€ 0H€ >x€ И€ Р€ р€ ш€ џџџџ"ј€ џџџџ ("0€ џџџџX€ џџџџh€ џџџџ" p€ џџџџ€ ,x€Ј€А€И€ џџџџ€ <Р   0@X€ 4h€ "  Ш ш € 0  P p € . а №ј   (€ џџџџ0€ џџџџ"8€ ,@€ џџџџ€ ,p   А€ џџџџР€ џџџџ"Ш€ ,а€ џџџџ€ , 0 @€ џџџџP€ џџџџ"X€ *`€ џџџџ€ P р №€ џџџџ € џџџџ" € џџџџ € џџџџ € џџџџ"( € &0 € џџџџ X € џџџџh € џџџџ"p € "x € џџџџ€  €А €Р €Ш €а €и € џџџџ€ "р    6( ` h p ˆ  ˜  А  Р  а  ш  №  € џџџџ€ , 8 € 0H € џџџџx € џџџџ*˜ € џџџџ Ш € џџџџи € џџџџ"…р € џџџџ€ј € € € € € €( €0 €8 € џџџџ€ "@ 8h   € џџџџИ € BШ , @ € H &h  € џџџџ€ &  Ш и ш   (8@€ X (x P  ,№  ( 08 @ H P`€ џџџџh€ џџџџB p€ Hx€ џџџџ€Р€Ш€а€ џџџџи ш  (J8ˆ € џџџџ џџџџАр Form dlgLookupelрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџp]ђи]ђ]ђ]ђ(–`A@’oџџ8– oџџ(–рр Initialise the listsАVK мA –A@џџџџџџ ˜A@џџІ Z т ц ф – š œA@ш@ р т ф цЌA@о т›GЌб $ž!2002: Statistical Services Centre, @The Un€Crsity of €Readingƒ%Written by+lin G rayerOp tion €ulicit Dim NoOfƒёs A€s Integ -ХDWOHerШRowС Lo `FirstA J P@N@P Sub lstColu mns_C@"k( ) @:tu pL€? En~d *ЬAV User\_act\ivР'Р9i tiali€Бt€T ts‚CallƒBСs(cmnAцA™У)Pu„/Т€KтoA+box6 BZ ƒ[Т utRe!reCoyolDs CSav@|o@ptRangCNШewBф, @РSheet, __‚Q€€WA!,ШY,8 reФx Inс@Outp€ a _‡ ЪD уc0 fbЁSnf.TextnNРFre Ё>(Gap:=0).AddreЖsƒ.Ÿ=hСDE тgheck that€e numberAbselect@uitems& Р`b 0) ўA ЂУ a" @Ш`'ь`У'a' 'ѓ@@?#d =#у DrП# hЈ#сЉ= N$У@$$r$DSe­‡4ˆ@ Dis1`Кy_c%Ђ-IfgWУЅW""ЂZЃ1 щЪЅ= #`E‚в/@Эk1ТСIfBПчВbm (Цz‚)іhm(ByVal-фŒTТ[Р_S €ngr!]УIndex(0 To 1џР*hb gC@€‚B ПС $СRЁb–i1O&gАЅ=№S cRb ТnАˆs orє=с<ќto?A[с>ƒ“D+р.CleaoPp?yа5:Р” = §r(Гв0б bjМуu№DToR!|4ђУ6"eFindVsiф, f, tір Г&F-1к p 'јre 0ŽРK‹ХObœЮ ‚’ту ' @rs:st№}hPt жi oщ.дAp|un …CS˜ ^I X "у " &ќ iшbщ4 Бz1€|t l# j!inЛИ   Ѓ‡ “b*=ells(ё(i). 31ЄsS0Р є t"o€py"…Ex@it Sub‚E nd IfReЊ„BƒЈAKWith ‡U‚Gk = 0For i#Щ.Lilunрt - 1pТ.†~i) Tˆnу*k +Š Ptk)РiЬˆ3€ Nрext i/c' GlAkidsСjƒQed variablesТ Call IРtemsInР]AkРData, AB н€G'' ƒЉ,‰ЋУRЄ ЧDoƒ ((1), refЩУ.T€2, Ф>УButSaveC€ontrols, optRangeBNewBРЫХSheet,| _ТР-€@u,ˆw  Unloрad Me„AVB“ Privatњe— O4ˆЭKУC ƒ;T^С Striќng— …A‰{ #BЁYЧ!b Obj€mgestinatiќonЁb%†уbЁ TуAddre|ss!#‡РFЛLeng€l ™LongR‘Comma x€ш уJ' RemeŒ wherњe“dР “c7–$= ActiveУ%' keep a track,€ as we' `@be mov€2 žsaHуc% ƒ"= то(рkу3‡[)(XOР\"Ђ\ z""Ъ' Default rсYould immedi @NlyСœrightAyТblockт'@KM F8.Cur€rentRegA. Y(xlToRA ).Offseаt(0,€Ы.ФB УЁ^фІ' Fi`0С‡рoutpuФТ#ёшL= OB$ tѓr€txtWork",Nam@xх, "-CL"C( 'Dш IsйРЦthС3Њ jН"ъдnew VlтшџЄХч9У @2cЂsЧУс Exp R((h"Љс%Hea@derRowi,Š Ц, *rstт4ќowƒЃ Ф0@ иХ(pRernal:р=TruesAWп"$ QЄ7=b]ј.Co k‚ЂoИBK%хn1сnUB№d^(dIг0 '€‰sЬer№yщ nа•P.Cells(1, i).VaјluelѓXuHUA= "=VLOOKUP(" &УR e& ",1+пљ`а u (z!РFalse)&…€—тS"D 2A , д?ј }Ёй,ch\kA’“Я€.mшula#=РpТOˆ§@Ep ˜АДLџр;Ф<а б= e„вhЂ ‘SБ”зo8Fun€T@eЋ0ThќisђQa‚Bk’ТЎ'а:Б3‚ZgXnєNœinclude non-blaќnkх:aO‘GЂO4 сБoFullвђџЅ CсMГС TЕїb‘?=[ф UВГqз= vр5lРЙћ@œ-s“7FЃ ъ"Ж !ђT-&[<‚‡ Y'с p#‚(џD-p:ašl3WАйdџУ;чаOD ёeѓ0 Й1:$pЦ‚ѓ'' 91cо*\G{0CE13740-64A7-11D5-B656-0004768BFDFA}#1.0#0#..\..\..\WINDOWS\MSApps\MSForms\RefEdit.exd#Ref Edit Control*#0о*\G{0CE13740-64A7-11D5-B656-0004768BFDFA}#1.0#0#..\..\..\WINDOWS\MSApps\MSForms\RefEdit.exd#Ref Edit Control*#2ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#55ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#42*\R0*#13ђ*\G{AC2DE821-36A2-11CF-8053-№фt:(*єA 1НЊџџˆЖџџџџџџџџ№џџS„‘MюХиЖYv‹§њ„‘MюХиЖYv‹§њОƒ‘MюХиЖYv‹§њR„‘MюХиЖYv‹§њџџџџџџџџџџџџxR„‘MюХиЖYv‹§њS„‘MюХиЖYv‹§њџџMEџџџџџџџџџџпџџtџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ (џџ0>"џџџџ џџџџ”џџџџš џџџџџџџџџџџџџџџџLџџџџ”џџџџš џџџџџџџџ”џџџџџџџџLџџџџџџџџLџџџџLџџџџџџџџLџџџџš џџџџš џџџџš џџџџLџџџџš џџџџ @ўџ€0џџџ џџ @ўџ˜,џџџ џџ @ўџА(џџџ џџ @ўџ`$џџџ џџ @ўџрџџџ џџ @ўџјџџџ џџ @ўџ(єўџџ џџ @ўџ@№ўџџџџ @ўџШрўџџ џџ @ўџџџџџмўџџџџ @ўџЈЬўџџ џџ PўџШўџџ`% x@ўџРИўџџ џџ р@ўџиЈўџџ џџ @ўџ№˜ўџџ џџ @ўџˆўџџ џџ @ўџ˜xўџџ џџ @PкиЎ>ьJ0 < tўџџp€@ўџ€pўџџџџ @ўџџџџџlўџџџџ @ўџА\ўџџ џџ @ўџ0Lўџџ џџ @ўџЈ<ўџџ џџ  ЮавмджвЦ@ ўџџџџџ8ўџџ`%џџџџAўџ@ўџџџџџ(ўџџ џџ рШЪЬњќXђ`@ўџx$ўџџ џџ Ш@ўџ ўџџ џџ @ўџ№ўџџ џџ @ўџР ўџџ џџ @ўџpќ§џџ џџ HтЊPr@ўџ@ўџј§џџ џџ @ўџ є§џџ џџ @ўџ8№§џџ џџ @ўџPь§џџ џџ @ўџhш§џџ џџ @ўџ€ф§џџ џџ @ўџ˜р§џџ џџ @ўџАм§џџ џџ @ўџШи§џџ џџ @ўџрд§џџ џџ @ўџја§џџ џџ H@ўџЬ§џџ џџ @ўџ(Ш§џџ џџ @ўџџџџџФ§џџ џџ €ўџџџџџР§џџј @ўџˆА§џџ џџ @ўџ  §џџ џџ @ўџИ§џџ џџ @ўџа€§џџ џџ @ўџшp§џџ џџ @ўџ`§џџ џџ @ўџP§џџ џџ @ўџH@§џџ џџ и џџџџи@ўџ`0§џџ џџ џџџџ@ўџx §џџ џџ џџџџ@ўџ§џџ џџ џџџџ@ўџЈ§џџ џџ џџџџ@ўџР№ќџџ џџ џџџџ@ўџџџџџрќџџ џџ џџџџџџџџшџџџџџџџџ(џџџџxџџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџџџџџ(џџџџxџџџ џџ џџџџ PџџџџАџџџџџџџџаџџџџ8рџџџџџџџџџџџџ№єl$џџџџџџџџџџџџџџџџџџџџџџ(H˜ 7B$*\Rffff*2342384bc3*\R1*#175*\R0*#1d*\R0*#1e$*\Rffff*2442384bd8*\R0*#10*\R0*#14*\R1*#3a*\R1*#c4*\R1*#229$*\Rffff*154238400AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#47ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#5eђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#26$*\Rffff*1242384913$*\Rffff*1142384913$*\Rffff*3442370a09$*\Rffff*1342384913п&џџџџTdXM\0`cd?hhlipIt_x`|8€C„DˆqŒEF”5˜7œG :ЄHЈBЌaАfДnИoМlР2Ф4Ш1Ь3аmдkиpмgрjфNшўЪе€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N € џџџџ€ p€ џџџџ€€ џџџџ€˜„ € џџџџ"А€ џџџџ€И€Р€ џџџџ8zњШ€ џџџџ€ H h (x€ џџџџˆ€ џџџџ € џџџџtЈ€ џџџџР€ џџџџ" Шаш€ џџџџ" №ј€ џџџџ" (€ џџџџ"0(b8`€ џџџџ"h(bp˜€ џџџџ" € џџџџ 6Ј:И 6Ш 6и 6ш 6ј€ џџџџ€ џџџџ"  (€ џџџџ" 0 8H€ џџџџ" P Xh€ џџџџ" p xˆ€ џџџџ"  ˜Ј€ џџџџ" А€ ,И€ џџџџ€ ,ш  (€ џџџџ8€ џџџџ" @€ ,H€ џџџџ€ ,x Ј И€ џџџџШ€ џџџџ" а€ *и€ џџџџ€ P X h€ џџџџx€ џџџџ" €€ џџџџˆ€ џџџџ˜€ џџџџ"  € &Ј ар€ џџџџ"ш€ "№€ џџџџ€€ €(€0€8€@€H€P€X€`€h€p€€€ џџџџ€ ˆ(–Ја€ џџџџр€ Fш 0@ H @P Sh S€˜ € Ј€ .Шј& _ € џџџџ€ <@€B›ˆа р *№€ џџџџC 2–( € &` ˆ   А  И Vи  &№ V  & V8  &P h  :+p  А И € џџџџ0ŠР  № (-  (  e0  ,QP  *Q€ А € џџџџ€ И >а € џџџџш F@№ ,68 € џџџџ€ $h Zс € џџџџ>№ € џџџџ8zњ € џџџџ ˆ € џџџџ˜ € џџџџџџџџЈ р Form dlgOneProportionрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџh]ђ]ЌЌђ8–P]ђ]ђАІ   ! % ` ь т ц ф Њ Ќ Ў Ш Ъ Ь Ю а в д ж и к њ ќ м ЦA@ш* р Set up the list boxted(ls мA8 ЎA@bled =ЖSample 1Ќ+  (A@а р т ф цA@о oџџ8–а Ў!dЖ (oџџ–A@аA@кoџџ№–PA@аA@оoџџа– и!d$š к!d$š (oџџ˜–а и!d$š к!d$š (oџџ`– Њ Ў( new Ќ т(e Ќ ќ(( Ќ ( ( Ќ и(ј Ќ к(!(oџџ№–PЗ м( Coџџа–З м(kedoџџА–аЗ м(oџџ–З м(clickeoџџp–PЗ м(ЌЌoџџP–р& Existing Range option has been chosenray р% Make book name box and label visibleЗ (st selЗ (st oneoџџР–ар% New Worksheet option has been chosenр% Make book name box and label visible7€З (ZЌЗ (ІЌoџџ0–р$ New Workbook option has been chosen the iрI Make book name box and label invisible, since new book cannot be renamedЗ (Index)З ( œ!oџџ€–P џџ!(A@jтoџџ`–р Cancel button just been clicked џџA@r–рoџџ–ар OK button has been clickedђ0]ђ]ђ(]ђ@]ђ`]ђ€]ђ˜]ђИ]ђи]ђ№]ђ]ђ ]ЌЌђ@]ђxр Find the output rangeэ ц ф : рЖOneProp$”.. .А›G|j Ќœр? Select the output range so that subsequent selections work OK. .A> FЌ'Ь .ѕЌ$ ЌЌ;Ф к!dЌЌ;Ф и!dЌЌ;Ф Sqџџ`dџџXр Single column specified.р' Copy the data to the destination sheet ЌЌт<Ј Ў <A> < И И . ь!ЗAJр6 Insert sufficient columns at front of sheet for tableЌ'ЬІэЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ.   B@э ..КэЌ ЬЌ К%Ц.. К!Ш!Ž!'ЌЌ К%Ф Ќ К%Ф$0!Ў'р Determine the success condition ЮœЖ=MAX( Ж)'№ аeЖ=MIN( Ж)'№ в м!dЖeЖ= м!d'№ д м!dЖeЖ> м!d'№ ж м!dЖeЖ< м!d'№dџџЖ0Please specify a value for the success conditionA@в|џџHkџџ@эЌЌ К%Ф Ќ К%Ф$0.ю ю!Ў' Ж=IF(  №Ж,1,0) ю(œ .ѕЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ=SUM( Ж)ЌЌ7Ф(LqџџHр Hide the dataЗ К!Ш!Ъ(ЬkџџЖ=R[-1]C/R[-2]CЌЌ .%Ф(Lр;Proportion of successesЖOne-Sample ProportionЌЌ .,Фр Set up the descriptive statsІЌЌ .%Ц Ь Ц Шбє Ъбі Ьбј њбд ќ$XбжAђЌЌ .%ФB@HІ   ! % ` ь т ц ф Њ Ќ Ў Ш Ъ Ь Ю а в д ж и к њ ќ м ЦA@P џџA@roџџ`џџџџXџџџџЦЖAttribute VB_Name = "dlgOneProp"D „Bas„0{4D91841F-C5EE-11D8-B659-0004768@BFDFA}J3 BEJ dGlob„alŒSpaco False ŠCr@eatablP€redeclaDIdеTru BE`xpose0TemplateDeriv–Cus tomiz‹D ' Form Їortion Copyright 2002: Statistical Services Centre, The UnCrsity of Readingƒ%Written by Colin GrayerOp9‚ ulicit Dim NoOfVars As `IntegA Sa@=eHC(1  To 2)A SŠ УPРCРE Sub User9_activ@() p СAeРrRangeAaCellK‚utRe@UreCoa€?ols „ЃУOSDav€DchkPDq, _Т Р€o$ptB, @Ne wBookХSh8eetŽ @€Mumn‚ SummarРy, cboCC Ex€;hkNЩxal‚SiANHMax‚MiƒE,qu Р&GAАer!BLess‹txptSucРРT\riС‹@"TJ,† СValu@Fg@DCIHH‚'@™t up t`KBl O box"CBa 2InitApsа(cmn,A c;8PutУ%т GoLПР '&т‚ьI)с‹9c 1р5Уhoё5xesЂЅР€iseOutpРBёТHrefСЂ EndЁU_c‰W<_Ch! dWb€tnOK.EnAzƒ(ц.TextР <> ""@!Д S J_C nkф SџjЖр DRИ g>dж .ЕIsNumљ`Ÿc(G Рр)ЪџЃSЃ7#рќ-???С”F/‚Bg:VisiУШ)7‚fraХ$i.ЇNot!‹d2тlblMean‡ˆ‡6SizeџH,ъЉ Ц'з™H‘ HџGbBHдpџ-"_  АLџЏВJЏ’{ЏЅтPЯџЯ&|ПЕUпппќ ЉA@!YЏЏЏwЎBJК'y@S| Т%  has фbe |ch ‰ ‚ЅP@' Make0ZoXk nqšёVap8lРabel vC,Т&С€WorkbpoZџˆ3 +/Ђ”&Џ$@ЂБ4 PuЂV, ` §asQv    б„ч %; okO€ŸrџЏ#Ѕ#  q‚  Ёџ 'џ џ ї in4, ˆsin`­newуcann0Ebe дreЁd_mЉCф9?o/<_BšR`nHeŒlp'bGetQp Me.q˜0oIžDТ?!4!АCa@ Ђl  ' S Црton jРВф-qq†e“­load џїOKК' OОKeG3X ЈiІ6ЎAkOm Dљ0”in`И  pБ‚9fџ1Ѓ:ЎСД‘ћДДЄаToInаВt‘ЏјЫƒLengtbhЁLonPПЊ1эqSєЙš2ŸТ Ў.2RсыDаЏyFЁр­or(0бП0вПч§dqр!diЦ@[ѓП№ЯiJІoђ› Fra–"Setњ=њ (ž(3FŸЛ‘ЎFq>і,03е "`—BыˆP$If Is@ЯthчWадбitq0вBpw!зуW БВlectВВЉ so0at subsˆequрк seЁБР\s w`Xp*.тлp’ЕSђR('C #@й$= 1ЕWi/№јu.qдs(d3,Ёк= -ЗŸ4”txџДtTrials.€Text .Cells(5, 2) = txtSucces  End WitBhpElse‚' Single column specified.BCopy the data to estinatio4hee“ReDim Vars(0 To 1) As I@ntegerTCall ItemsInBox(cboSample ,9) 'UnStack(), DummyFact or I, ch k[DY.Valju€,FŸe-1'€Msert sufficient†s at frBoof sr for tablA NoOfC‚s…П1…*Set  ToIn0= RРange(D‡S„оФ1,“, _…†ю ‰+€}).EnptireУХL.!(xlShiftToRightџ†C,K„ Р2ШХ G/ РW„ .Offset(0, -}‰(-€(6…C L ength CuDrr€aReg@—.Rows.Couіn†˜ƒ1@ T!ƒУ>2T4DZIС).0Addr€Ы…%' DetermineТЙsC㈄ndiAЛ If optMax ThengE8ФпCo €)"=MAX(" &ХФ„1@")" фI„inЃINп ptEqual A€ч‚‚aЂˆ <> Ф""џ "=AQс/Greaр'Ÿ~&в>ŸseУ&L8?>I™DkkkџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџмA?‰œpppџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџр =б‰?gggџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџф)™Б?jjjџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџш =бiœNNNџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚W—зW—зW—з_Ÿп_ЖФѕѕџўŽ€pџ! Qpџ§o џќџlџ! Qlџ§oќўќџhџ! Qhџ§oьўќџdџ! Qdџ§oмўќџ`џ! ˜Q`џ§oЬўќџ\џ!  Q\џ§oМўќџXџ! œQXџ§oЌўќџTџ! рQTџ§oœўќџPџ! фQPџ§oŒўќџLџ! шQLџ§o|ўќџ Hџ! МQHџ§olўќџ Dџ! РQDџ§o\ўќџ @џ! ФQ@џ§oLўќџ <џ! ШQ<џ§o<ўќџ 8џ! ЬQ8џ§o,ўќџ4џ! ЄQ4џ§oўќџ0џ! ЈQ0џ§o ўќџ,џ! Q,џ§oќ§ќџ(џ! Q(џ§oь§ќџ$џ! аQ$џ§oм§ќџ џ! мQ џ§oЬ§ќџџ§ѕ џZv 1Ш§/Ш§(ќfИ§%pџ! œlpџ=lџlџ )pџlџѕ<;< tpџ! єlџ! hџ! dџ! (И§%ldџ=TџTџlhџ=XџXџllџ=\џ\џlpџ=`џ`џ )pџ`џlџ\џhџXџdџTџџФФ,юbxџtџТ,Ш§pџlџhџdџ`џ\џXџTџPџLџHџDџ@џ<џ8џ4џ0џ,џ(џ$џ џ џќўьўмўЬўМўЌўœўŒў|ўlў\ўLў<ў,ўў ўќ§ь§м§Ь§џ%њ0 ќЦа  0 ќЦ  D< 4 $b Дhbtџxџ! Єxџ l >tџFdџ \џ`џ! Ј`џ l >\џFLџ ФHџ! ”Hџ 8)xџ`џHџ6dџLџ4h$b (tџ\џxџ`џHџdџLџДhbtџxџ! Єxџ l >tџFdџ \џ`џ! Ј`џ l >\џFLџ ФHџ! ”Hџ 8)xџ`џHџ6dџLџ4h$b (tџ\џxџ`џHџdџLџP6dџxџ! ˜xџ є dџќVtџ! œtџ р)xџtџ5dџ:dџxџ!  xџ є dџћФTџќVtџ! Иtџ р)xџtџ5dџ6dџxџ!  xџ є dџќVtџ! Ќtџ р)xџtџ5dџ6dџxџ!  xџ є dџќVtџ! Аtџ р)xџtџ5dџ6dџxџ!  xџ є dџќVtџ! Єtџ р)xџtџ5dџ6dџxџ!  xџ є dџќVtџ! Јtџ р)xџtџ5dџџџџ(P$b xџtџdџTџ0 ќЦP  0 ќЦ  0 ќЦа  0 ќЦ  0 ќЦP  0 ќЦ  0 ќЦа ѓ ўџџџ Ё  !"#$%&'()*+,-./012345678ўџџџ:a<=>?@ABCDEFGHIJKLўџџџNOPQRSTUVWXYZ[\]^_`9bcdefghijklmnopqrstuvwxyz{|}~ўџџџџrU€€ H=0С$А<бdбШ; ^9Йža%бЩn)o9Zn9 !сSБQo!; сqЩСl)ШС Ё`i`1`YќБhсt1§)ŸQt9ў ќi  p1uypйoБo&щ$%9%a%џџџџС$T9™aџџџџџџџџџџџџ0€` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX =бй?dddџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ\)™AœMMMџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ `љЙ‰@000Ј§џџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџda>IЉ@cccџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ hљЙAB???Ј§џџ`бџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџl)™aŠhhhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp)™yŠiiiџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџta>I‰>IIIџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxA?‰a ___џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ|A?‰ ```џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)™‘›888џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„Й>i!їCCCž§џџ`ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆЙ>iIлDDDž§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŒA?‰ DqqqџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЙ>i9їEEEž§џџ `Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”Й>iYїFFFž§џџ `‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ =бyї555` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџœ =б™ї777`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Й>iЙїGGGž§џџ `ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЄ)™Щ›:::џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ =ббїHHHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЌa>IСѓBBBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАA?‰Ё aaaџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџД =)Љ=fffџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИЙ>i!?nnnž§џџ`‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџМ =б™œoooџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРЙ>iс>lllž§џџ `џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџФЙ>iс›222ž§џџ`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШЙ>iщs444ž§џџ`Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ЬљЙЁ>111Ј§џџ`QџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаС@Щб—333`IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџдЙ>i?m 0 ќЦ  0 ќЦP  0 ќЦ  V  –џ0џ! 0џ є џ,џ! ,џ є єў(џ! №(џ „ $џ! є$џaрўќ‹:Ьў%рў`#мўєў`#№ўџќVџќV  tџ2№ўмў)0џ,џ(џ$џ6џџєўрў ltџќcћвЇ0џ!  Q0џ§oџџ5џЬ tџ єpnџ ltџќјШў@(Ьў%(Јў%ѕ<žFˆў%Шўaџю§ѓ0џ0џўЄ0џ5џS(Ьў%(Јў%№ў0џ! Ј0џ l >№ўFџ%Шўaџю§ѓ,џ,џўЄ)0џ,џ6џџS(Ьў%(Јў%№ў0џ! Є0џ l >№ўFџ%Шўaџю§ѓ,џ,џўЄ)0џ,џ6џџќcќјШў\ѕѕtўўŽ€&0џ! œtўl0џ=,џ,џ )0џ,џ_џ0џ! 0џ є 'џ(xў%:ˆў%'˜ў%cЈў%ќfИў%ќfЬў%єџќVtџ<џYlў<џYpўtў |0џ6џџєpnџ›(Ьў%(Јў%tџaџю§ѓ0џ0џўЂєўќ‹(ˆў%knџєЉD\ў%tџaџю§ѓ,џ,џўЂрўќ‹(џќэрўќэєў$  (џa<ўі§ѓhџ)0џ,џ(џ6 џџєўрў<ўўСЬўПяџџ%hџў ќ ltџќјdџ*(Ьў%knџЗє­DЈў%dџўЂџў§ѓtџ5џCdџaџѓ§ѓ0џ0џaџ§ѓ,џ,џaєўvќ"q`џ)0џ,џ6џџєў–(Ьў%(Јў%dџaџю§ѓ0џ0џўЂєўќ‹l`џ§iˆў%(\ў%dџaџю§ѓ,џ,џўЂрўќ‹(џќэрўќэєў$  (џa<ўь`1\џ)0џ,џ(џ6 џџєўрў<ў0џ! МQ0џ§oџџ5џcl\џ*#№ў*14џ/№ў:0џ! РQ0џ§oџџ5џ–l\џ*#№ў*14џ/№ў:Sџ0џ! Ф0џ є џ№ў,џ! а,џ l l№ўћ=§јЬўћ'џџ/№ў),џ0џ6џЬў&№ў0џ! а0џ l l№ў*14џ/№ў0џ:Sџ0џ! Ш0џ є џ№ў,џ! а,џ l l№ўћ=§јЬўћ'џџ/№ў),џ0џ6џЬўŽ&№ў0џ! а0џ l l№ў*14џ/№ў0џ:Sџ0џ! Ь0џ є џ№ў,џ! а,џ l l№ўћ=§јЬўћ'џџ/№ў),џ0џ6џЬў &№ў0џ! а0џ l l№ў*14џ/№ў0џ:+'рў'єў'џѕ:Ьў Nџџ !6џџєўрўŠ(Ьў%(Јў%dџaџю§ѓ0џ0џўЂєўќ‹l`џ§iˆў%(\ў%dџaџю§ѓ,џ,џўЂрўќ‹(џќэрўќэєў$  Q(џTџ)0џ,џ6џџєўрўTџaџь`1Xџ5џ-"l\џ*#№ўl4џ*#мў#*Fџ%Tџ,J2№ўмў5џ ltџќј8ўe(ˆў%(\ў%(Ьў%(Јў%dџaџю§ѓ0џ0џўЂєў%8ўaџю§ѓ,џ,џўЄ)0џ,џ6џџєўQ$l\џ*#№ў*Fџ%(Ьў%(Јў%8ўaџю§ѓ0џ0џўЂєўџC%/№ў0џ6џџєўQ&lXџ*#№ў*Fџ%(Ьў%(Јў%8ўaџю§ѓ0џ0џўЂєўџC%/№ў0џ6џџєўќcќј8ў>cЬў%dџaџѓ§ѓ0џ0џaџі§ѓ,џ,џ, )0џ,џ6џџ@:ˆў'%(Ьў%(Јў%tџaџю§ѓ0џ0џўЂџџC%0џ6џџ6(Ьў%(Јў%:ˆў(%tџaџю§ѓ0џ0џўЄ0џ5џс(Ьў%(Јў%tџўЂџўќ‹єў0џ! м0џ „ ,џ! р(џ! ф$џ! ш$ў! џ ў!  ў „ џ`#№ў )§kˆў%Q$ў§oќ§%ќf\ў%ќfxў%Q$џ§o ў%Q(џ§o<ў%Q,џ§oрў%єў`#мўknџџ§ѓўў *|2№ўмў) ўў0џ6џџєўрў<ў ўќ§>(Ьў%(Јў%tџaџю§ѓ0џ0џўЂєў§Ÿў˜+0џ6џєўѕѕР§ўŽ€0џ! Q0џ§oџќР§,џ! Q,џ§oџќР§(џ! Q(џ§oєўќР§$џ! Q$џ§oрўќР§$ў! ˜Q$ў§o<ўќР§ ў!  Q ў§o ўќР§ў! œQў§oќ§ќР§ј§! рQј§§oА§ќР§є§! фQє§§o §ќР§№§! шQ№§§o§ќР§ ь§! МQь§§o€§ќР§ ш§! РQш§§op§ќР§ ф§! ФQф§§o`§ќР§ р§! ШQр§§oP§ќР§ м§! ЬQ짧o@§ќР§и§! ЄQ觧o0§ќР§д§! ЈQ䧧o §ќР§а§! Q১o§ќР§Ь§! QЬ§§o§ќР§Ш§! аQШ§§o№ќќР§Ф§! мQФ§§oрќќР§Р§§ѕ ,Р§Zl§œ0џ-$. /0џœ „Jbj Шў8ўdџtџ<џ’tўTџ4џhџpџ\џXџЦ-№ўмў0џ,џ(џ$џ$ў ўўј§є§№§ь§ш§ф§р§м§и§д§а§Ь§Ш§Ф§џџєўрў<ў ўќ§А§ §§€§p§`§P§@§0§ §§§№ќрќР§њTаФШ˜œ„ˆ  ”   Р дИh`ЬOrU€€ џџџџџџџџє$`$џџџџџџџџ$A`(џџџџџџџџ$`,џџџџџџџџ$С`0џџџџџџџџ$`4џџџџџџџџ$A`8џџџџџџџџ$`<џџџџџџџџџџ$С`@џџџџџџџџ$`Dџџџџџџџџ$A `Hџџџџџџџџ$ `Lџџџџџџџџ$С `Pџџџџџџџџ$  `Tџџџџџџџџ$I `Xџџџџџџџџ$‰`\џџџџџџџџ$Щ``џџџџџџџџ$ `dџџџџџџџџ$I`hџџџџџџџџюrU€€€ џџџџџџџџ\`(§џџџџџџџџџџџIщ  !91Iy‘" џџ џџ џџ џџ=I nmodProportion/>џџџџuV__SRP_1cџџџџџџџџџџџџ;#__SRP_1d-)џџџџ,ыdlgTwoPropџџџџџџџџџџџџMыgџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџˆ˜ 7B*\R1*#175$*\Rffff*2442384bd8*\R1*#81*\R0*#10*\R1*#174*\R1*#b3$*\Rffff*1042384913*\R1*#c4*\R1*#229п 0ўЪ§€ € џџџџ€ N € џџџџ€ p€ џџџџ€€ ˜€ џџџџ"…TF2 € (ш€ џџџџ€ € џџџџ€ €(€0€8€@€H€P€X€`€h€p€x€€€ˆ€€€˜€ €Ј€А€И€Р€Ш€а€и€ џџџџ р№ј€ џџџџ€  38%P:p %ˆ:Ј$%Рш  №Dд(џџџџ$ G1НљЋџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ$џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 8џџ06 џџџџџџџџџџџџџџџџLџџџџš џџџџLџџџџ”џџџџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<џџџџџџ ђџџџџ`џџџџџџџџш§k@џџџџџџєє „ )ƒ.џџџџ џџ`h€(%iƒЬџџџџџџџџˆ„xiƒвџџџџџџџџЈ„џџџџIƒєџџџџџџ џџа„ џџboџџіIƒіџџџџ(џџ џџј„ џџџџџџџџIƒјџџџџ8џџ џџ „ џџІ„aOIƒџџџџHџџ џџH„ џџIƒџџџџXџџ џџp„ NIƒдџџџџhџџ џџ˜„ џџˆЁIƒжџџџџxџџ џџџџџџ„h@œ˜Bџџџџџџ`„І@џџџџџ`„и0џџџџџј`„кРќўџџџџ`„ќијўџџџџ`„ўџџџџєўџџџџ`„ џџџџ№ўџџџџ`„ џџџџьўџџџџ`„Иџџџџшўџџџџ`„ Рфўџџџџ`„рўџџџџ`„ џџџџмўџџџџ`„ ˜иўџџџџ`„ 8дўџџџџ`„ђ№Ьўџџџџ`„єШўџџџџ`„№ЈРўџџџџ`„ џџџџМўџџџџ`„€Иўџџџџ`„ hДўџџџџ`„ШАўџџџџ`„LxЌўџџџџ`„NЈўџџџџ`„ pЄўџџџџ`„ р ўџџџџџџџџрџџџџџџџџџџџџƒњџџџџџџ`џџџџџџџџџџџџџџ%`„вџџџџxџџџџџ€џџџџџџџџџџџџ@„єџџџџhџџџ џџ€џџџџ`џџџџџџ@„іџџџџXџџџ џџ€џџџџ%џџџџˆџџџџрџџџџшџџџџ№`„и (Фўџџџџ `„вџџџџxџџџџџ€И@„єџџџџhџџџ џџ€џџџџ@„іџџџџXџџџ џџ€џџџџˆ0џџџџџџ@„јџџџџHџџџ џџ€џџџџШHџџџџџџ@„h8џџџ џџ€@„јџџџџHџџџ џџ€№`@„h8џџџ џџ€x@„Р(џџџ џџ€@@„дџџџџџџџ џџ€иЈ@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€(@„˜(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€``„вџџџџxџџџџџ€Р @„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€h@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„X(џџџ џџ€џџџџ@„дџџџџџџџ џџ€џџџџ@„жџџџџџџџ џџ€ џџ јџџџџ`@ PˆXшИаАџџџџџџџџЈ`HџџџџшџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxА@„H(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„ (џџџ џџ€џџџџ@„дџџџџџџџ џџ€(@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„Р (џџџ џџ€џџџџ@„дџџџџџџџ џџ€h@„жџџџџџџџ џџ€P`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„€ (џџџ џџ€џџџџ@„дџџџџџџџ џџ€Ј@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„@ (џџџ џџ€џџџџX@„дџџџџџџџ џџ€Ш@„жџџџџџџџ џџ€h`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„ (џџџ џџ€џџџџ@„дџџџџџџџ џџ€а @„жџџџџџџџ џџ€џџџџА `„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„а (џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„ (џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„P(џџџ џџ€џџџџ@„дџџџџџџџ џџ€x @„жџџџџџџџ џџ€`„вџџџџxџџџџџ€Ш@„єџџџџhџџџ џџ€h@„іџџџџXџџџ џџ€џџџџ@„јџџџџHџџџ џџ€џџџџ@„h8џџџ џџ€џџџџ@„(џџџ џџ€џџџџ@„дџџџџџџџ џџ€И @„жџџџџџџџ џџ€џџџџ˜ `„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„и(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€џџџџр`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„ (џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„`(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€(@„ (џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€X`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€(@„р(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€X`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€(@„ (џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€X`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€0@„`(џџџ џџ€@„дџџџџџџџ џџ€џџџџ џџџџиџџџџрџџџџш@„жџџџџџџџ џџ€џџџџи`„вџџџџxџџџџџ€@„єџџџџhџџџ џџ€@„іџџџџXџџџ џџ€@„јџџџџHџџџ џџ€@„h8џџџ џџ€@„H(џџџ џџ€@„дџџџџџџџ џџ€@„жџџџџџџџ џџ€№Р@ўџўџџ џџ @ўџ€ўџџ џџ @ўџ0pўџџ џџ @ўџH`ўџџ џџ @ўџPўџџ џџ @ўџ0Lўџџ џџ џџџџі0”:Оˆ@ўџ<ўџџ џџ @ўџР8ўџџџџ @ўџx4ўџџџџ ўџџџџџ0ўџџи`џџџџи]@ўџ  ўџџ џџ @ўџџџџџўџџџџ @ўџџџџџўџџ џџ @ўџ`ўџџ џџ @ўџАј§џџ џџ @ўџє§џџџџ @ўџЈ№§џџџџ @ўџРь§џџџџ @ўџиш§џџџџ @ўџ№ф§џџџџ @ўџр§џџџџ @ўџ(м§џџџџ @ўџ8Ь§џџ џџ @ўџPМ§џџ џџ @ўџhЌ§џџ џџ @ўџ€œ§џџ џџ @ўџ˜Œ§џџ џџ @ўџШ|§џџ џџ @ўџрl§џџ џџ @ўџј\§џџ џџ @ўџL§џџ џџ @ўџџџџџ<§џџ џџ @ўџp,§џџ џџ @ўџ@(§џџџџ @ўџX$§џџџџ @ўџџџџџ §џџџџ @ўџџџџџ§џџ џџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ: "% H:P&%h€ 4x А:Р(%и€  ˜: *BИ:ш € 48   :Ш ,-8А€ ˜:2B(:`x €€ 4И:p,-h€ №:ˆ2B :и№ ј:%:8 %P:p %ˆЈ€ џџџџ€ А а€ ,иBB B8BPBh&j€BЈ&jР€ џџџџ€ .ш>0&UH p€ 0€€ 8  А€ И :№ "B [ 0  X€ ` :и Иѓ€ [8  :X  Мѓp  [0  P   X € .`  .3  23Р   ј  NN € 4H  :р -0 [€    (*X  :€  "B˜  [Р  :р  "Bј  [  @   H € .P € 4€ :<0 :И -а [ш ј€ €  :Р  "Bи  [  :  "B8  [`  € € ˆ €Њ€ H   t‘ˆ€    @€ 0H :x € ˜ :И "Bа [ј '  (€ <0€ :p BА€ :Ш B &*  v{H€ 4И !€ № NNР € @€ X x ˜€ 4@ lr  ш€  DN0 x b`˜ € 4 :x - [Ј€ Ш : "B  [H :h "B€ [ЈШ а€ и :№ <] %H 'X€ h :ˆ€ Z(€ &ш  *7  %а€ ш :€ |ˆ€ & ,7  %Php€ џџџџ€ "x $А'Р Nи Oј€ џџџџ€ џџџџџџџџРр Module modProportionros\рG Copyright 2002: Statistical Services Centre, The University of Readingџџр Written by Colin GrayerџџЭџџhЭџџ`І$ $*06їДЗЗЗЗЗЗ–р" Sets up the table for proportions]ЌђР new]ђи]ђ№]ђ]ђ ]ђ8]ђP]ђh]ђ€]ђ˜]ђА]ђШ]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]ђа]ђш]ђ ЬЌœickeЖ'єdџџЖ of difference'єkџџррSet up headersиЌЌ .%ЦB@HЖNumber of trials і( FЌЌ і%ЦB@HЖNumber of successes і(ЌЌ і%ЦB@HЖProportion of successes і(ge s ЬЌ дœselect œЌЌ і%ЦB@HЖNumber of differences і(;ФkџџАЌЌ і%ЦB@HЖDifference of proportions і( Skџџh єœЌЌ і%ЦB@H вЖ% CI єЖ(Exact) і( <@ЌЌ і%ЦB@Hkџџј іœЌЌ і%ЦB@H вЖ% CI єЖ(Normal approx.) і(ЌЌ і%ЦB@Hkџџ€ јœЌЌ і%ЦB@H вЖ% CI єЖ(Simple approx.) і(ЌЌ і%ЦB@Hkџџ дœЌЌ і%ЦB@HЖTest statistic і(ЌЌ і%ЦB@HЖP-value (one-sided) і(ЌЌ і%ЦB@HЖP-value (two-sided) і(kџџPр Insert calculated values .ѕр& Set up addresses for the basic valuesЌЌ7Ф!Ў'иЌЌ7Ф!Ў'кЌЌ7Ф!Ў'ќЌЌ7Ф!Ў'ўЌЌ7Ф!Ў' $0! ˜$” $0(žЌЌ7Ф!Ў'  $0! ˜$”  $0(žр' Now setup the values derived from themЌЌ7ФB@HЌ вXЌd 'ђ ђЌЌЌ :!h% ' ЬЌœр * One sample (see Armitage & Berry p.120-1) дœр  Difference of proportionsЌЌ і%ЦB@HЌЌ і%ЦB@HЖ= Ж- ж і(L і(kџџр  Confidence intervals єœр  Use the F distributionІ$Ж=IF( Ж=0,0, ќЖ/( ќЖ+( иЖ- ќЖ +1)*FINV( ђЌ$ОЖ,2* иЖ-2* ќЖ+2,2* ќЖ))) і(L і! ˜$” і(žЌЌ і%ЦB@HІ$Ж=IF( Ж=1,1,( ќЖ+1)/( ќЖ+1+( иЖ- ќЖ)/FINV( ђЌ$ОЖ,2* ќЖ+2,2* иЖ-2* ќЖ))) і(L і! ˜$” і(žkџџˆ іœр ' Use method 2 of Armitage & Berry p.121 иЖ*( иЖ+ Ж^2)' иЖ*(-2* ќЖ- Ж^2)' ќЖ^2' ЖSQRT(( Ж)^2-4* Ж*  Ж)/(2* Ж)'№Ж- Ж/(2* Ж)'ЌЌ і%ЦB@HЖ= Ж- № і(L і! ˜$” і(žЌЌ і%ЦB@HЖ= Ж+ № і(L і! ˜$” і(žkџџ˜ јœр ' Use method 3 of Armitage & Berry p.121р  End of changes 23/6/04р  End of changes 23/6/04№ЌЌ і%ЦB@HЖ= Ж- № і(L і! ˜$” і(žЌЌ і%ЦB@HЖ= Ж+ № і(L і! ˜$” і(žkџџXр Z statisticр B the following gets rid of the continuity correction - CJG 23/6/04р Corrected formula - CJG 23/6/04]ђdџџИр  Two-sample proportions œр ) Skip over counts of differences in row 6ЌЌ і%ЦB@Hkџџ@р  Difference of meansЌЌ і%ЦB@HЖ= Ж-   і(L і! ˜$” і(ž і!Ў' œр 5 Paired 2 sample proportions (Armitage & Berry p.126)р 4No of successes in Sample 1 and failures in Sample 2ЌЌ7Ф!Ў'Ир 4No of failures in Sample 1 and successes in Sample 2ЌЌ7Ф!Ў' Ж( иЖ+ кЖ)'І Ж/ Ж*SQRT( ИЖ+  Ж-(( ИЖ-  Ж)^2)/ Ж)'№Ж(ABS( ИЖ-  Ж )-1)/SQRT( ИЖ+  Ж)' dџџРр 9 Two sample unpaired proportions (Armitage & Berry p.129)р  Difference of meansЖ(1- Ж)'LЖ(1-  Ж)'Nр . Added by CJG 23/6/04 to output standard error р  End of changes 23/6/04Nр  End of changes 23/6/04Ж( ќЖ+ ўЖ)/( иЖ+ кЖ)' Ж(1-  Ж)' І 'Ж( Ж)/SQRT(  Ж*  Ж*(1/ иЖ+1/ кЖ))' kџџа ЌЌ і%ЦB@HЖ= Ж- № і(L і! ˜$” і(žЌЌ і%ЦB@HЖ= Ж+ № і(L і! ˜$” і(žkџџ дœр  Test statisticЌЌ і%ЦB@HЖ=IF( Ж=  Ж,0,  Ж) і(LЖ0.00 і(ž і!Ў' р  P-value, one sidedЌЌ і%ЦB@HЖ=NORMSDIST(-ABS(  Ж)) і(Le),4)Ж0.0000 і(žр  P-value, two sidedЌЌ і%ЦB@HЖ=NORMSDIST(-ABS(  Ж))*2 і(Le))*Ж0.0000 і(žkџџ( qџџ р Finally, prettify the tableэ .!Ш.. .!ЪB@b ˆЗЗЗЗ .B@†ЗЌЌ .%Ф!Ъ!Š(ŒЗЌЌ .%Ф!Ъ!Š(Žoџџx џџџџp рT Selection.Formula = "=ROUNDUP(1-NORMDIST(" & ZstatAddress & ",0,1,true),4)"рu Selection.Formula = "=ROUNDUP((1-NORMDIST(" & ZstatAddress & ",0,1,true))*2,4)" '2-sided = twice 1-sidedџџџџшр Corrected formula - CJG 23/6/04Жр. Added by CJG 24/6/04 to output standard errorжЌЌ і%ЦB@HІЖ( ќЖ- иЖ* жЖ)Ж/SQRT( иЖ* жЖ*(1- жЖ))' " & №Ж/ 'и orІЛџр› Zstat = "(ABS(" & R1 & "-" & N1 & "*" & TestValue & ")-0.5)"' & "/SQRT(" & N1 & "*" & TestValue & "*(1-" & TestValue & "))"ЌЌ і%ЦB@HЌЌ і%ЦB@H Ж* и '№№ і! ˜$” і(žЖ= и  і(Lр . Added by CJG 23/6/04 to output standard errorр . Added by CJG 23/6/04 to output standard errorЌЌ і%ЦB@HЖ= и  і(L і! ˜$” і(žр . Added by CJG 23/6/04 to output standard errorр . Added by CJG 23/6/04 to output standard error'ЌЌ і%ЦB@HЖ= и  і(L і! ˜$” і(žр  End of changes 23/6/04 Ж* и '№Ж( №Ж)/ 'и І !ЖSQRT(( Ж* LЖ/ иЖ)+(  Ж* NЖ/ кЖ))'и џџџџр End of changes 24/6/04 oр. Added by CJG 24/6/04 to output standard errorf chр End of changes 24/6/04( і! ˜$” і(žЖSQRT( Ж*(1- Ж)/ иЖ)'и џџџџ˜р. Added by CJG 24/6/04 to output standard error ЬЌœЌЌ і%ЦB@HЖStandard error of difference і(kџџˆр End of changes 24/6/04џџџџ џџџџЖ Std. errorЖ(Normal approx.) і(*(1-Ж Std. errorЖ(Simple approx.) і(˜џџџџP ЬЌœStd.kџџˆџџџџ€џџџџŽЕAttribute VB_Name = "modProportion" ' M@odule `  dCopyright 2002: Statistical Services Centre, The University of ReadingKWritten by Colin Grayer Op‹ Exp€licit рPrivaН )Pub" Sub MakeШTa@ble(DeœnЃon As RangL_ ByVal NoOf€HumnsInteger, ConfidenceLev”elSЗng˜ƒk€9ƒA')P2X џ2?џ2џ2ї2Ф€p•režsi ?A 3' фf2…№x (ПЊё6™п`'NP›f succ€P‹in SSѕ1 Pœ faјilu@ ё„Щ r˜Д = .Cells(6, 2).Address  'No o€f failut in Sample 1 and succhesU22 „S а3аn%"(" & NR1"+ 2 )" PHalfWidth2ZvalTue%/0n *аSQRTJrI8S _ D фƒ& Ј"-(-'S 0)^2)‡.F' œed by CJG 23/6/04 t€›utp ut st”ar€d error‹B№StdE ~‡mGЧƒ:q‹' EОЬрchang€О;‹ŠZ=t-ABS’lp-1)/RKA‰]Else Two sƒunpair@Aproportions (Ar mitaggB?y p.129)ЭDifferencešmeanЉ ЁQ111‚dP‚‡љMaQ2‰’?j€oAїL‚SУ"*AŠР(РL‚‰яА›€œX+ƒТ+ƒї‚ƒ‚)M:SПE“ XсŠPooledЖPЂ(сRТ,bgRю/bОs Q $6D џLy'TaAngRХ_`BЅ ,ƒz с *ь(13р+„а+%IfШ'F•{Selecс`.Offset(1, 0).У( чFormшula'=Ё!А9‡@NumberAaa!|SigF@ a”t(ЇVЃ, Ѓіs oˆ Ч?#-Пх9тvцV’џ@Š.їџŸуAч•B^ŸŸ/”kLIf Test  Then#'ЃСсЗisticr&п2ЙЯ2IF#ŽЂ{b&Pr0ј,0,1'ѓ8@2ZGGСl"0.00)=ђŸ„„€,‡4*P-Т{, one siHdedoonџ3cpt 'х=h*ROUNDUP(1-NORMDISњ ``1,tr ue),4*' АCorr<0mf„9О- ~Џ   qS‚ž-еwнЛ]_rmТ=гR{' ЦtQxЯ'ЯGЧGЯn.ЯP(1пtatек)*Ц2B'2-Т№шtwi@}1ѓпќa п#gпaпџ№ЈRd@ Й)џџ":aЁWithВ B' Finally, prettify the tabl’Set >D0=`ё_`и.C‚u`%ntRegM#йEnt`”Column.AutјoFiР.P IrЂ^0 xlRёŸCl assicРfTP-ф, YFaEœй#Р1).ъFonРt.Bold aЮ Ÿ„ ’ItalLicАg ёSub *2442384bd8*\R0*#14*\R1*#3a*\R1*#c4*\R1*#229$*\Rffff*154238491cо*\G{0CE13740-64A7-11D5-B656-0004768BFDFA}#1.0#0#..\..\..\WINDOWS\MSApps\MSForms\RefEdit.exd#Ref Edit Control*#0о*\G{0CE13740-64A7-11D5-B656-0004768BFDFA}#1.0#0#..\..\..\WINDOWS\MSApps\MSForms\RefEdit.exd#Ref Edit Control*#2ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#55ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft rU€€€€~| SС q сSaџ!; с1k1Ё1u iйAб сЂЙ‘ЂщA™IЃЉЃщi! 1Ё`ёŸQtI†сtщЙЄЉЅ9vIi‰БбЙџсџСћ qЄ)Iq‘С9ЄёСlYŽYqЩЅЉlёЏA!A™iЉљ9i!І‘ЉІ aЇй a…Ё…С…с…& ќ2lCxџў’hџў’(Xџў’8Hџў’H8џў’X(џў’hџў’xџ kєЦHCШўRCШў3(ў%(pў%H ўЂPўў§ѓLўLўў ыLў5Pў%:ў%Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў %Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў %Lўѕ $ АLўў›LўkєЦ§јўџћPўџ5ўO 8џџю:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў %Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў %Lўѕ $ АLўў›Lў kєЦЛ:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў%Lўѕ $ АLўў›Lў hџџ}:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBlxџ*#8ўlШў*#4ў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў XџџГ kєЦћ:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў-R*FPў%Lўѕ $ АLўў›Lў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBlxџ*#8ўlШў*#4ў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў Hџџм:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў-R*FPў%Lўѕ $ АLўў›Lў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBlxџ*#8ўlШў*#4ў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў џџ:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў%Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў%Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў%:ў%Lўѕ $ АLўў›Lў € ќј0ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1џLў6Pў<ў ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1ќўLў6Pў<ў ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1јўLў6Pў<ў ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1єўLў6Pў<ў ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1№ўLў6Pў<ў ўjLў'€ў%l№ўFў%$  LўaPўќ‹є+ўPў<ў  ќэ<ўў'`ў%l№ўFpў%$  ў,С)Lўў6Pў<ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1ьўLў6Pў<ў ўjLў'€ў%lьўFў%$  LўaPўќ‹є+ўPў<ў  ќэ<ўў'`ў%lьўFpў%$  ў,С)Lўў6Pў<ў>(ў%(pў%0ўaPўю§ѓLўLўўЂ ў§Ÿў˜ Lў6Pў ўєыlxџќ3єdыЖЏtЬўUoЬўєыЖ§kў%єы§kpў%єы§kў%ўLў$ Lў дўўЂPў'ABНќ1дў)Lўў5Pў kєЦ§ џџ :(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў*FPўџћя<ў%Lўѕ $ АLўў›/8ўLў6Pў<ў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў hџџ:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўѓl№ў*#8ў*#4ўlјў*#є§ *#№§lјў*#ь§!*#ш§lџ*#ф§*#р§lјў*#м§"*F ўoЬўєыЖ§kPў<ў #<ўћяЬ§:€ў$ћяМ§lџFpўћяЌ§:`ў%ћяœ§lјўFўћяŒ§:ј§&ћя|§lјўFl§ћя\§:L§'ћя<§%Lўѕ $ АLўў›28ў4ўє§№§ь§ш§ф§р§м§Lў6Pў ў<ўЬ§М§Ќ§œ§Œ§|§\§<§[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўѓl№ў*#8ў(*#4ўlјў*#є§)*#№§lјў*#ь§**#ш§lџ*#ф§*#р§lјў*#м§+*F ўoЬўєыЖ§kPў<ў #<ўћяЬ§:€ў$ћяМ§lјўFpўћяЌ§:`ў&ћяœ§lџFўћяŒ§:ј§%ћя|§lјўFl§ћя\§:L§'ћя<§%Lўѕ $ АLўў›28ў4ўє§№§ь§ш§ф§р§м§Lў6Pў ў<ўЬ§М§Ќ§œ§Œ§|§\§<§[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў Xџџ™3lџ,*#8ўlџ*#4ў-*#є§lдў*#№§.*1Мў28ў4ўє§№§3lџ/*#8ўlјў*#4ў*#є§lдў*#№§.*1Иў28ў4ўє§№§ lјў0*1ДўN1lИў*#8ў2*#4ўlМў*#є§3*#№§lДў*#ь§4*#ш§lМў*#ф§5*1Рў28ў4ўє§№§ь§ш§ф§lРў6*#8ўlдў*1Фў/8ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў-lФў*FPў%Lўѕ $ АLўў›Lў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў*lИў*#8ў7*#4ўlМў*#є§5*1рў28ў4ўє§:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў-*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў Hџџg<8l№ў*#8ў9*#4ўl№ў*#є§:*#№§lџ*#ь§5*1Фў2 8ў4ўє§№§ь§:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў-lФў*FPў%Lўѕ $ АLўў›Lў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ўlдў3*#8ўlФў*1Рў/8ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў-*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў‘;lјў*#8ў*#4ўlџ*#є§3*FPўџћя<ў:ў5ћя ў:€ў<ћяЬ§lџFpўћяМ§:`ў3ћяЌ§џћяœ§:ў9ћяŒ§џћя|§:ј§=ћя\§`1мў28ў4ўє§6Pў<ў ўЬ§М§Ќ§œ§Œ§|§\§д 8џџC:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBl№ў*#8ў*#4ўlьў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў'Lўѕ $ АLўWPў`1рўLў5Pў 8џџшB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1шўLў6Pў<ў ўB(ў%(pў%0ўaPўю§ѓLўLўўЂ<ўџA ў`1фўLў6Pў<ў ў*;lџ*#8ў-*#4ўlќў*#є§5*1Аў28ў4ўє§{lдў6*#8ўlАў*#4ў>*#є§lшў*#№§-*#ь§lфў*#ш§?*#ф§lшў*#р§*#м§lфў*#(§@*#$§lАў*# §5*1Рў28ў4ўє§№§ь§ш§ф§р§м§(§$§ §!;lРў*#8ў:*#4ўlдў*1Фў28ў4ўNAlшў*#8ў*#4ўlфў*#є§B*#№§lшў*#ь§-*#ш§lфў*#ф§5*1мў28ў4ўє§№§ь§ш§ф§bCl№ў*#8ў5*1Ќў/8ўClьў*#8ў5*1Јў/8ўr1l№ў*#8ў3*#4ўlЌў*#є§6*#№§lџ*#ь§D*#ш§lьў*#ф§3*#р§lЈў*#м§6*#(§lќў*#$§=*1Фў28ў4ўє§№§ь§ш§ф§р§м§(§$§lдў3*#8ўlФў*1Рў/8ўN;lјў*#8ў-*#4ўlєў*#є§E*#№§lџ*#ь§-*#ш§lќў*#ф§5*1Єў28ў4ўє§№§ь§ш§ф§ClЄў*#8ў5*1 ў/8ў`;lрў*#8ўF*#4ўlЄў*#є§3*#№§l ў*#ь§G*#ш§lџ*#ф§H*#р§lќў*#м§=*1мў28ў4ўє§№§ь§ш§ф§р§м§:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў-lФў*FPў%Lўѕ $ АLўў›Lў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBlрў*#8ў*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ўBlрў*#8ў-*#4ўlРў*FPў%Lўѕ $ АLўў›28ў4ўLў5Pў[Lўѕ $ АLўWPўќ‹є+ўPў<ў  ќэ<ўўѕ $ Аўў›)Lўў6Pў<ў џџя:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў]l№ў*#8ў*#4ўlьў*#є§I*#№§lмў*#ь§5*FPў%Lўѕ $ АLўў›2 8ў4ўє§№§ь§Lў5Pў%:ўJ%Lўѕ $ АLўў›Lў'Lўѕ $ АLўWPў`1иўLў5Pў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў7Klиў*#8ў=*FPў%Lўѕ $ АLўў›/8ўLў5Pў%:ўL%Lўѕ $ АLўў›Lў:(ў%(pў%Lўѕ $ АLўўš<ў§Ÿў˜ Lў5<ў7Klиў*#8ўM*FPў%Lўѕ $ АLўў›/8ўLў5Pў%:ўL%Lўѕ $ АLўў›Lўќcќј0ўH aPўѓ§ѓ§/ 5Pў$H aPўі§ѓLўLўў эLў5Pў'ўСў%cpў%cў%cl§%ќf,§%H ў rNcў%(ў%(pў%H aPўю§ѓLўLўўЂ<ўџ= ўNџ=Ь§OџCPLў6Pў<ў ўЬ§Oќfў%(ў%(pў%H aPўю§ѓLўLўўЂ<ўџ= ўNџ=Ь§OџCQLў6Pў<ў ўЬ§€lќЄŒ 0ўјўдўєўHџРўџАўмў№ўДўьўМўЄўИўшў ўиўфўџЌў8џЈўџhџрўќўxџФўШў(џXџp8ў4ўє§№§ь§ш§ф§р§м§(§$§ §LўўPў<ў ўЬ§М§Ќ§œ§Œ§|§\§<§kˆ'фtП0 3щW1Н§ЋџџˆЖџџџџџџџџџџg„‘MюХиЖYv‹§њ#„‘MюХиЖYv‹§њРƒ‘MюХиЖYv‹§њf„‘MюХиЖYv‹§њџџџџџџџџџџџџxf„‘MюХиЖYv‹§њg„‘MюХиЖYv‹§њџџMEџџџџџџџџџџпџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ (џџ0>"џџџџ џџџџ”џџџџš џџџџџџџџџџџџLџџџџ”џџџџš џџџџџџџџ”џџџџџџџџLџџџџџџџџLџџџџLџџџџџџџџLџџџџš џџџџš џџџџš џџџџLџџџџš џџџџк@ўџ˜єўџџ џџ @ўџА№ўџџ џџ @ўџШьўџџ џџ @ўџРшўџџ џџ @ўџјиўџџ џџ @ўџШўџџ џџ @ўџ@Иўџџ џџ @ўџXДўџџџџ @ўџјЄўџџ џџ @ўџ( ўџџџџ @ўџˆўџџ џџ @ўџ €ўџџ џџ @ўџИpўџџ џџ @ўџ`ўџџ џџ hўџH\ўџџ№`%hи"А@ўџ Lўџџ џџ @@ўџШ<ўџџ џџ hи  ЊЎ>Дь <џџџџ8ўџџа€@ўџА4ўџџџџ 8JЈАВ0Юа@ўџџџџџ0ўџџџџ @ўџр ўџџ џџ @ўџxўџџ џџ @ўџИ!ўџџ џџ ˜вмджвФЦђ@ўџџџџџќ§џџџџ ˆ! ўџџџџџј§џџ``%џџџџHhўџ@ўџш§џџ џџ @ўџџџџџи§џџ џџ bтPr@ўџ@ўџид§џџ џџ @ўџ№а§џџ џџ @ўџ Ь§џџ џџ @ўџ Ш§џџ џџ @ўџ8 Ф§џџ џџ @ўџP Р§џџ џџ @ўџh М§џџ џџ @ўџ€ И§џџ џџ @ўџ˜ Д§џџ џџ @ўџА А§џџ џџ @ўџШ Ќ§џџ џџ @ўџр Ј§џџ џџ @ўџј Є§џџ џџ @ўџ! §џџ џџ Ј@ўџ(!œ§џџ џџ @ўџ@!˜§џџ џџ @ўџX!”§џџ џџ @ўџp!§џџ џџ @ўџџџџџŒ§џџ џџ €ўџџџџџˆ§џџ@ @ўџа!x§џџ џџ @ўџш!h§џџ џџ @ўџ"X§џџ џџ @ўџ"H§џџ џџ @ўџ0"8§џџ џџ @ўџH"(§џџ џџ @ўџ`"§џџ џџ @ўџx"§џџ џџ @ўџ"јќџџ џџ @ўџР"шќџџ џџ џџџџ џџџџР @ўџи"иќџџ џџ @ўџ№"Шќџџ џџ @ўџ#Иќџџ џџ @ўџ #Јќџџ џџ @ўџ8#˜ќџџ џџ @ўџP#ˆќџџ џџ @ўџh#xќџџ џџ @ўџџџџџhќџџ џџ џџџџј!Pџџџџ@ р џџџџџџџџаџџџџh  џџџџџџџџџџџџP ИPџџџџџџџџџџџџџџџџџџџџџџ(+  ˜ 7B$*\Rffff*3342384d78*\R1*#175*\R0*#1d*\R0*#1e$*\RffffForms 2.0 Object Library*#42*\R0*#13ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#47ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#5eђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINDOWS\SYSTEM\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#26$*\Rffff*1242384913$*\Rffff*1142384913$*\Rffff*3442370a09$*\Rffff*1342384913п1hTiX/\0`4d<hAl>p?t@xp|l€m„nˆoŒWX”Y˜Zœ+ 6Є8Ј[Ќ\А*ДLИ^МbРeФIШџџџџЬfа,д1и5м2р-ф.ш3ь_№DєBј9ќ;cdj agўЪ<€ џџџџ€ џџџџ€ џџџџ€ € џџџџ€ N € џџџџ€ p€ џџџџ€€ џџџџ€˜„ € џџџџ" А€ џџџџИ€ џџџџ"Р€ џџџџ€Ш€а€ џџџџ8‚&и€ џџџџ€ ` € ('  (А (Р€ џџџџа€ џџџџtи€ џџџџ№€ џџџџ" ј€ џџџџ" ( H€ џџџџ" P(X€€ џџџџ" ˆ˜ € џџџџ" Ј(Аи€ џџџџ" р(ш€ џџџџ" (0€ џџџџ"8 XЊ@˜€ џџџџ"  XЊЈ€ џџџџ" XЊh€ џџџџ"p XЊxа€ џџџџ" и€ џџџџр шј€ џџџџ € џџџџ"(€ џџџџ 60 6@ 6P 6`€ џџџџ 6p 6€ 6€ џџџџ:  6А 6Р 6а 6р 6№ 6 6 6 € џџџџ 60€ џџџџ@€ џџџџ" H P`€ џџџџ" h p€€ џџџџ" ˆ  € џџџџ" Ј АР€ џџџџ" Ш ар€ џџџџ" ш€ ,№€ џџџџ€ ,  P `€ џџџџp€ џџџџ" x€ ,€€ џџџџ€ ,А р №€ џџџџ€ џџџџ" € *€ џџџџ€ P@   € џџџџА€ џџџџ" И€ џџџџР€ џџџџа€ џџџџ" и€ &р   € џџџџ" € "( € џџџџ€P €X €` €h €p €x €€ €ˆ € €˜ €  €Ј €А €И €Р €Ш €а €и €р €№ € € € џџџџ€  (–0 X € џџџџh € Fp  И Ш %а  6ш  S  S  68  6X  Sx  S  6Ј Ш а € 8и     &0  )@  _P p  x  &  )   А € 4Ш  _  € џџџџ€ <( h B›p И  Ш  *и € џџџџCј 2–€ &Hp x˜  VР &иV№ &V  &8P :+X ˜ 0ŠЈ и(-ш2–H Pp x˜0Š  а(-р 0Š @ 86P 0Šˆ И 86Ш% e  ,Q@ *Qp $@  eШ ,Qш *Q $@H p *Qx *QЈ ир€ ш> (6(P,6Xˆ€ џџџџ€ $B•И€ џџџџ>€ џџџџ8‚&€ џџџџ  € џџџџА€ џџџџџџџџРр Form dlgTwoProportionџџџџрG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerЭџџh]ђ@ ]ЌЌђh –Poџџ@–]ђа]ђ№І   # + b ь т ц ф Ј Њ Ќ Ў А В Д Ю а в д ж и к   Ф м ЦA@шр Set up the list box мA ЎA@ ДЗбA@ АA@ ВA@A@а р т ф цA@оoџџ–A@аA@кoџџш–P Ў!dЖ Д!dЖ (oџџА– Ў!dЖ Д!dЖ (oџџx–аA@аA@рoџџX– А!dЖ В!dЖ (oџџ –P А!dЖ В!dЖ (oџџш–A@аA@оoџџШ–аІ  и!d$š к!d$š  !d$š  !d$š (oџџ`–І  и!d$š к!d$š  !d$š  !d$š (oџџј–PІ  и!d$š к!d$š  !d$š  !d$š (oџџ–І  и!d$š к!d$š  !d$š  !d$š (oџџ(–а ФœЗ Ј(kџџ Ф Ќ( Ф Њ(oџџи– Ј і( Ј ј( Ј А( Ј В( Њ њ( Њ Ў( Њ Д( Ќ т( Ќ ( Ќ ( Ќ ќ( Ќ ( Ќ и( Ќ к( Ќ  ( Ќ  ( Ј Ф(oџџИ–PЗ м(oџџ˜–З м(oџџx–аЗ м(oџџX–З м(oџџ8–PЗ м(oџџ–р& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџˆ–ар% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџј–р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџH–P џџ!(A@joџџ(–р Cancel button just been clicked џџA@roџџр–ар OK button has been clicked]ђ]ђ(]ђ@]ђ`]ђ€]ђ˜]ђИ]ђи]ђ№]ђ]ђ ]ђ8]ђP]ђh]ђ€]ђ ]ђР]ђр]ЌЌђ ]ЌЌђ8 ]ђp ]ђˆ р Find the output rangeэ ц ф : рЖTwoProp$”.. .А›G|j Ќœр? Select the output range so that subsequent selections work OK. .A>Ќ'ЬЌЌ .%ЦѕЖSample 1ЌЌ;Ф к!dЌЌ;Ф и!dЌЌ;ФЖ=R[-1]C/R[-2]CЌЌ;ФЖSample 2ЌЌ;Ф  !dЌЌ;Ф  !dЌЌ;ФЖ=R[-1]C/R[-2]CЌЌ;Фqџџ0dџџ(р2 Unstack or copy the data to the destination sheet ЊœЌЌт<И Ў <A> Д A> <  И . ь!ЗAJ ЈeЌЌт<и А <A> В A>Ќ$Ќ+<р . Simply copy the visible rows of the variables < И И . ь!ЗAJkџџир6 Insert sufficient columns at front of sheet for tableЌ'ЬІэЌЌ .%ФЌ ЬЌ .%Ф$0!Ъ.   B@э ..КэЌ ЬЌ К%Ц.. К!Ш!Ž!'ЌЌ К%Ф Ќ К%Ф$0!Ў'р Determine the success condition ЮœЖ=MAX( Ж)'№ аeЖ=MIN( Ж)'№ в м!dЖeЖ= м!d'№ д м!dЖeЖ> м!d'№ ж м!dЖeЖ< м!d'№dџџЈЖ0Please specify a value for the success conditionA@в|џџ`kџџXэЌЌ К%Ф Ќ К%Ф$0.( ( !Ў' Ж=IF(  №Ж,1,0) ( (œЌЌ К%Ф Ќ К%Ф$0!Ў'  ЮœЖ=MAX( Ж)'№ аeЖ=MIN( Ж)'№kџџ`эЌЌ К%Ф Ќ К%Ф$0.* * !Ў'" Ж=IF(  №Ж,1,0) * (œ ФœэЌЌ К%Ф Ќ К%Ф$0., , !Ў'$ Ж=IF( Ж=0,0,if( " Ж=0,1,0)) , (œэЌЌ К%Ф Ќ К%Ф$0.. . !Ў'& Ж=IF( Ж=0,if( " Ж =1,1,0),0) . (œkџџј ЌЌ .%ЦѕЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ=SUM( Ж)ЌЌ7Ф(LЖ=R[-1]C/R[-2]CЌЌ7Ф(LЌЌ К%ФЌЌ;ФЖ=COUNT( Ж)ЌЌ7Ф(LЖ=SUM( " Ж)ЌЌ7Ф(LЖ=R[-1]C/R[-2]CЌЌ7Ф(L ФœЖ=SUM( $ Ж)ЌЌ7Ф(LЖ=SUM( & Ж)ЌЌ7Ф(Lkџџ qџџ р Hide the dataЗ К!Ш!Ъ(Ьkџџр ФœЖPaired ProportionsЌЌ .,ФdџџЈ ЖTwo-Sample ProportionsЌЌ .,Фkџџp р Set up the descriptive statsІ ЌЌ .%Ц Ь ЦЗбіЗбєЗбј ФбAђЌЌ .%ФB@HІ   # + b ь т ц ф Ј Њ Ќ Ў А В Д Ю а в д ж и к   Ф м ЦA@P џџA@roџџH џџџџ@ џџџџЕAttribute VB_Name = "dlgTwoProp"D „Bas„0{4D918423-C5EE-11D8-B659-0004768@BFDFA}J3 C0J dGlob„alŒSpaco False ŠCr@eatablP€redeclaDIdеTru BE`xpose0TemplateDeriv–Cus tomiz‹D ' Form Їortion Copyright 2002: Statistical Services Centre, The UnCrsity of Readingƒ%Written by Colin GrayerOp9‚ ulicit Dim NoOfVars As `IntegA Sa@=eHC(1  To 2)A SŠ УPРCРE Sub€ txtSuc€*sValue_C€hange()С8EndС‰ UserСE_activA Ч erRУCellK‚utRebreCТo@Lols DАƒ\ˆSav@QchkA]тDР, _Т €€HoptB, @N@ewBookХSpheetŽ @@ZuHmnsТ Onl€BSummar"y cboУV, U†1Тs‚\2ТB#L Р#MaxBMi‚nТEqualBGРerТLes€" 5‡f,iTriџ@б‚Dl@Ру`iё %Pai@gщ"<,CIˆ'B'`Vt Pup t UlрX Hbox"Ca6Initzs(cm:nс/A@€D`/PuЮt#)т`QoLР /Ч$тњС&FрIorм:=}? с\1_ Є3#‚ShoDxe>sЂр т!,is`eOutpРQТWr|efKJLФJчMЂ N ”fрfL_C@ykЄfЋ&Kqі Є b€tnOK.EnЁ™сЂ(ц.Text <> "" Aѓ{Byˆ€9T"џƒ &п п ЭŠ $‡r_$xle1$$v%ž$1ПА$фG_% Љ@%c„2џ%?!6—3 &дJ/oч5.—D/ я`с` Az%IsNum€ucі(Ч")ŠYА")'?šУK|+/ssц2ЏЏd ?•ŸŸ˜qг ŸŸŸxtŸџЈ Ÿт]я я ь Х`ЏџЏŸ e4Ÿ˜EПџПППЊ ППН ђџŽП?2П€ Ÿ 2S!>‹Wп*ss/џэ o Џ=ђŽЏЯ?Џ b 6†—G}“tfЇЏ№Вƒ^.ЯвˆvНсgIf"WMёИlNot‡eFuџ‚otгсЏжwЁaЂlbl•YVisiчѓЩš k2.oЄг…ѕa1oojefпgџ•“’†BvObE € [RfraџД$ИБGrsГ;фi<lLMeanЧ_ ЙVizeџ(iк Y0ƒgь+фнрcdiFH !1' Fi@Дthe output r!СbSet Б N= OBЂ(€Л ЉA’,Љ`Ў,Aэ+FЌЁЛ,€†fb, "TwoProp"ЃђIf Is NothAЮTh@pёаt Sё}D" …pSаary Abр' Seleˆct ­ so0at subsepquen Ђ@4s„ wph OK.u№CallЄsC #Рщ4= 2ЕWi0ј.OffseРt(1, 0Жр.Cells(2, 2)РŒ"Sadmp`1"…73#4sTriP.Tшext4wtB5„"=R[-1]C/`2]CЋЏс 3щ 2?(р ћ2ц 2ob№ …є џŸS ’ P 1Ÿ[2Eb ƒ'PZstack or PcopyЂ d@Q тt! e dиS€uqc%OneгJŠ%РRТeQZVars?;[В#ItemsInBox(cbo9Ѓ, С) ЏoBy,p­‘AŽUnSЭ (QE, HBРeЗ , ™kCa.џЂГA †qC9Cўs_[А*@F™J_Zя`/oа5sТ/А0уNлЙб("2ЄP1й?ip3yЗф‹ ro ws ofђvaћ`3@УsЕ@ Т;ЛŸзWŠРTIfЕ u'а}‚usuffhici1HcфxIf.r0Œ cЉf№+ta0 хяF’ёYД–{=УК(YHs5а1),ќ _E"AЏ )+`J).Enti.r25м.фƒ(xlShiftToрRightF 1)?d OИ5Bˆ:= C(U0, -) -? uSd‰[CuBrPstReg0`.‚Rр".CounvUНЃ1 4`@D3sЗ[_бЉ ccS,а})`.Addr€кe ' otermineэ*scщP,nsz…ѓ98Max9T‡}= "=MAX(" ”& ѓ1")[Ÿч>pёя"іьINяч• чВё A„ іajР <> ""џџ>=Ё @dЄ уў’nTД ElseIf optGreater And txtSuccessValue.Text <> "" Then №‚LCondition = р">" &„nш6Lb@qiщs555ž§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрС@Щб—222`ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџфС@ЩЋ---`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшС@Щ1Ћ...`ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџьС@ЩQЋ333` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№ =бй?___џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџєA?‰ЩЋDDDž§џџ `Qџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј =бiœBBBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџќ =бaј999 `Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ =бј;;; `џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ)™‘cccџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ)™‘dddџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ a>I™Djjjџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ =)Љ=aaaџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЙ>iс>gggž§џџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџW—зW—зW—з_Ÿп_Ÿп_Ÿп_0 ќЦP  ZXѕѕџўŽ€pџ! LQpџ§oџќџlџ! ,Qlџ§oєўќџhџ! 4Qhџ§oфўќџdџ! 0Qdџ§oдўќџ`џ! ˜Q`џ§oФўќџ\џ! ЌQ\џ§oДўќџXџ! МQXџ§oЄўќџTџ! АQTџ§o”ўќџPџ! œQPџ§o„ўќџLџ!  QLџ§otўќџ Hџ! ДQHџ§odўќџ Dџ! єQDџ§oTўќџ @џ! јQ@џ§oDўќџ <џ! ќQ<џ§o4ўќџ 8џ! Q8џ§o$ўќџ4џ! Q4џ§oўќџ0џ! РQ0џ§oўќџ,џ! ФQ,џ§oє§ќџ(џ! ШQ(џ§oф§ќџ$џ! ЬQ$џ§oд§ќџ џ! шQ џ§oФ§ќџџ! Qџ§oД§ќџџ! фQџ§oЄ§ќџџ§ѕ џZv 1 §/ §(ќf§%pџ! Аlpџ=lџlџ )pџlџ'pџ! Дc§%lpџ=lџlџ )pџlџ(ќf§%pџ! œlpџ=lџlџ )pџlџ(ќf§%pџ!  lpџ=lџlџ )pџlџˆtpџ! lџ! ,hџ! 0dџ! 4(§%ldџ=TџTџlhџ=XџXџllџ=\џ\џlpџ=`џ`џ )pџ`џlџ\џhџXџdџTџьX,ўbxџtџв0 §pџlџhџdџ`џ\џXџTџPџLџHџDџ@џ<џ8џ4џ0џ,џ(џ$џ џџrU€€  =5С&И<бdбШ; ^9a'бЩn)o9Zn‘ћ!сSЙž ќ™ЎБQo!; сqЩСl)ШС Ё`i`1`YќБhсt1§Y§‘§Щ§љ§)ŸQt9ўaўСў1uypйoБo1щ&'9'a'џџџџС&TЙ>i?hhhž§џџ`QџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXЙ>i!?iiiž§џџ`‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ\)™qЉ///џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`)™‘Љ000џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџd)™БЉ444џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh)™‘›<<<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџl)™AœAAAџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp)™Щ›>>>џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџt)™бЉ???џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx)™ёЉ@@@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ|A?‰ Dpppџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€a>IБіlllџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„A?‰Щіmmmџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆ)™щіnnnџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŒ =бїoooџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЙ>i!їWWWž§џџ`бџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”Й>iIлXXXž§џџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜Й>i9їYYYž§џџ`QџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџœЙ>iYїZZZž§џџ`‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  љЙЁ>+++Ј§џџ`QџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЄ =бyї666 `IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ =б™ї888 `‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЌЙ>iЙї[[[ž§џџ`бџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџА =ббї\\\` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ДљЙ‰@***Ј§џџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИa>IСѓLLLџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџМa>IЉ@^^^џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџР =б‰?bbbџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџФ)™Б?eeeџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ШљЙABIIIЈ§џџ`бџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЬ9Йaџџџџџџџџџџџџ0€`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаa>I‰>fffџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџдЙ>iщЊ,,,ž§џџ`IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиЙ>iс›111ž§џџџџєўфўдўФўДўЄў”ў„ўtўdўTўDў4ў$ўўўє§ф§д§Ф§Д§Є§џ&0 ќЦ  0 ќЦP  0 ќЦ  0 ќЦа  0 ќЦ  0 ќЦP  Dˆt$b АЊtџxџ! Рxџ l >tџFdџ \џ`џ! Ф`џ l >\џFLџ ФDџHџ! ШHџ l >DџF4џ Ф,џ0џ! Ь0џ l >,џFџ Фџ! ”џ 8 ) xџ`џHџ0џџ6dџLџ4џџdА$b @ tџ\џDџ,џxџ`џHџ0џџdџLџ4џџАЊtџxџ! Рxџ l >tџFdџ \џ`џ! Ф`џ l >\џFLџ ФDџHџ! ШHџ l >DџF4џ Ф,џ0џ! Ь0џ l >,џFџ Фџ! ”џ 8 ) xџ`џHџ0џџ6dџLџ4џџdА$b @ tџ\џDџ,џxџ`џHџ0џџdџLџ4џџАЊtџxџ! Рxџ l >tџFdџ \џ`џ! Ф`џ l >\џFLџ ФDџHџ! ШHџ l >DџF4џ Ф,џ0џ! Ь0џ l >,џFџ Фџ! ”џ 8 ) xџ`џHџ0џџ6dџLџ4џџodА$b @ tџ\џDџ,џxџ`џHџ0џџdџLџ4џџАЊtџxџ! Рxџ l >tџFdџ \џ`џ! Ф`џ l >\џFLџ ФDџHџ! ШHџ l >DџF4џ Ф,џ0џ! Ь0џ l >,џFџ Фџ! ”џ 8 ) xџ`џHџ0џџ6dџLџ4џџdА$b @ tџ\џDџ,џxџ`џHџ0џџdџLџ4џџ0 ќЦа  р 6dџxџ! ˜xџ є dџќVtџ! Єtџ р)xџtџ5dџ6dџxџ! ˜xџ є dџќVtџ! Јtџ р)xџtџ5dџ6dџxџ! ˜xџ є dџќVtџ! œtџ р)xџtџ5dџ6dџxџ! ˜xџ є dџќVtџ!  tџ р)xџtџ5dџ6dџxџ! Ќxџ є dџќVtџ! Иtџ р)xџtџ5dџ6dџxџ! Ќxџ є dџќVtџ! Аtџ р)xџtџ5dџ6dџxџ! Ќxџ є dџќVtџ! Дtџ р)xџtџ5dџ:dџxџ! Мxџ є dџћФTџќVtџ! №tџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! иtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! мtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! аtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! дtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! Рtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! Фtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! Шtџ р)xџtџ5dџ6dџxџ! Мxџ є dџќVtџ! Ьtџ р)xџtџ5dџ6dџxџ! ˜xџ є dџќVtџ! шtџ р)xџtџ5dџ( $b xџtџdџTџ0 ќЦP  0 ќЦ  0 ќЦа  0 ќЦ  0 ќЦP  0 ќЦ  0 ќЦа  0 ќЦ  0 ќЦP  0 ќЦ  .€–иўєў! 4єў є Шў№ў! 0№ў є Иўьў! ьў „ шў! шўaЄўќ‹:ў%Єў`# ўИў`#ДўШўќVиўќV  tџ2Дў ў)єў№ўьўшў6иўШўИўЄў ltџќcћвЇєў! МQєў§oиўџ5иў& tџ єpnџ%(ў%(pў%tџўЂиўў§ѓ\ў5иў6(ў%(pў%:Lў%\ўaиўю§ѓєўєўўЄєў5иўS(ў%(pў%Дўєў! Фєў l >ДўFШў%\ўaиўю§ѓ№ў№ўўЄ)єў№ў6иўШўS(ў%(pў%Дўєў! Рєў l >ДўFШў%\ўaиўю§ѓ№ў№ўўЄ)єў№ў6иўШў6(ў%(pў%:Lў%\ўaиўю§ѓєўєўўЄєў5иў6(ў%(pў%:Lў%\ўaиўю§ѓєўєўўЄєў5иўS(ў%(pў%Дўєў! Ьєў l >ДўFШў%\ўaиўю§ѓ№ў№ўўЄ)єў№ў6иўШўS(ў%(pў%Дўєў! Шєў l >ДўFШў%\ўaиўю§ѓ№ў№ўўЄ)єў№ў6иўШў6(ў%(pў%:Lў%\ўaиўю§ѓєўєўўЄєў5иўќcќј\ўлєў! ЌQєў§oиўџ5иў ѕѕ8ўўŽ€&єў! А8ўlєў=№ў№ў )єў№ў)єў! Д џY4ўlєў=№ў№ў )єў№ў_иўєў! Lєў є 'Шў(<ў%:Lў%'`ў%cpў%ќf€ў%ќfў%єиўќVtџџY0ў џY4ў8ў |єў6иўШўєў! ˜Qєў§oиўџ5иўѕѕ8ўўŽ€&єў! œ8ўlєў=№ў№ў )єў№ў)єў!   џY4ўlєў=№ў№ў )єў№ўѕ џѕl8ўЂ_иўєў! Lєў є 'Шў(<ў%:Lў%'`ў%cpў%ќf€ў%ќfў%єиўќVtџџY0ўџY4ў8ў |єў6иўШўєpnџ›(ў%(pў%tџaиўю§ѓєўєўўЂИўќ‹(Lў%knџєЉD ў%tџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  ьўaўі§ѓhџ)єў№ўьў6 иўШўИўЄўўўСўПяџџ%hџў ќ ltџќјdџ*(ў%knџЗє­Dpў%dџўЂиўў§ѓtџ5иўCdџaиўѓ§ѓєўєўaШў§ѓ№ў№ўaИўvќ"q`џ)єў№ў6иўШўИў–(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  ьўaўь`1\џ)єў№ўьў6 иўШўИўЄўўєў! єQєў§oиўџ5иўњl\џ*#Дў*1јў/Дўбєў! јQєў§oиўџ5иў-l\џ*#Дў*1јў/ДўбSиўєў! ќєў є иўДў№ў! №ў l lДўћ=§јўћ'Шўџ/Дў)№ўєў6иўўЉ&Дўєў! єў l lДў*1јў/ДўєўбSиўєў! єў є иўДў№ў! №ў l lДўћ=§јўћ'Шўџ/Дў)№ўєў6иўў%& Дўєў! єў l lДў*1јў/ДўєўбSиўєў! єў є иўДў№ў! №ў l lДўћ=§јўћ'Шўџ/Дў)№ўєў6иўўЁ&!Дўєў! єў l lДў*1јў/Дўєўб+'Єў'Иў'Шўѕ:ў"Nиўиў #6иўШўИўЄўŠ(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  QьўDџ)єў№ў6иўШўИўЄўDџaиўь`1Tџ5иў-$l\џ*#Дўlјў*# ў%*Fиў%Dџ,J2Дў ў5иў–(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  ьўaўь`1Xџ)єў№ўьў6 иўШўИўЄўўєў! єQєў§oиўџ5иўf lXџ*#Дў*1јў/Дў– єў! јQєў§oиўџ5иў– lXџ*#Дў*1јў/ДўŠ(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  Qьў@џ)єў№ў6иўШўИўЄў@џaиўь`1Pџ5иў-$lXџ*#Дўlјў*# ў%*Fиў%@џ,J2Дў ў5иўєў! шQєў§oиўџ5иў" Š(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  Qьў<џ)єў№ў6иўШўИўЄў<џaиўь`1Lџ5иў6$lTџ*#Дў&*# ўlPџ*#ќ§'*Fиў%<џ,J2Дў ўќ§5иўŠ(ў%(pў%dџaиўю§ѓєўєўўЂИўќ‹l`џ§iLў%( ў%dџaШўю§ѓ№ў№ўўЂЄўќ‹ьўќэЄўќэИў$  Qьў8џ)єў№ў6иўШўИўЄў8џaиўь`1Hџ5иў6$lTџ*#Дў(*# ўlPџ*#ќ§)*Fиў%8џ,J2Дў ўќ§5иў%(ў%(pў%tџўЂиўў§ѓј§5иўe(Lў%( ў%(ў%(pў%dџaиўю§ѓєўєўўЂИў%ј§aШўю§ѓ№ў№ўўЄ)єў№ў6иўШўИўQ*l\џ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИўQ,lTџ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИў@:Lў%(ў%(pў%ј§aиўю§ѓєўєўўЂШўџC+єў6иўШўe(Lў%( ў%(ў%(pў%dџaиўю§ѓєўєўўЂИў%ј§aШўю§ѓ№ў№ўўЄ)єў№ў6иўШўИўQ*lXџ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИўQ,lPџ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИў@:Lў%(ў%(pў%ј§aиўю§ѓєўєўўЂШўџC+єў6иўШўєў! шQєў§oиўџ5иў“Q,lLџ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИўQ,lHџ*#Дў*FШў%(ў%(pў%ј§aиўю§ѓєўєўўЂИўџC+/Дўєў6иўШўИўќcќјј§>cў%dџaиўѓ§ѓєўєўaШўі§ѓ№ў№ў, )єў№ў6иўШўєў! шQєў§oиўџ5иў06(ў%(pў%:Lў-%tџaиўю§ѓєўєўўЄєў5иўh6(ў%(pў%:Lў.%tџaиўю§ѓєўєўўЄєў5иў•(ў%(pў%tџўЂиўўќ‹Шўєў! фєў „ №ў! шўФи§%cш§%ќfў%Q№ў§oИў%ќf ў%cLў%ќf<ў%Шў`#Дўknџиў§ѓьўьў /|/Дў)ьўєў6иўШўИў>(ў%(pў%tџaиўю§ѓєўєўўЂИў§Ÿў˜0єў6иўИўѕѕˆ§ўŽ€єў! LQєў§oиўќˆ§№ў! ,Q№ў§oШўќˆ§ьў! 4Qьў§oИўќˆ§шў! 0Qшў§oЄўќˆ§д§! ˜Q䧧oўќˆ§а§! ЌQ১ox§ќˆ§Ь§! МQЬ§§oh§ќˆ§Ш§! АQШ§§oX§ќˆ§Ф§! œQФ§§oH§ќˆ§Р§!  QР§§o8§ќˆ§ М§! ДQМ§§o(§ќˆ§ И§! єQИ§§o§ќˆ§ Д§! јQД§§o§ќˆ§ А§! ќQА§§oјќќˆ§ Ќ§! QЌ§§oшќќˆ§Ј§! QЈ§§oиќќˆ§Є§! РQЄ§§oШќќˆ§ §! ФQ §§oИќќˆ§œ§! ШQœ§§oЈќќˆ§˜§! ЬQ˜§§o˜ќќˆ§”§! шQ”§§oˆќќˆ§§! Q§§oxќќˆ§Œ§! фQŒ§§ohќќˆ§ˆ§§ѕ 1ˆ§Zl§œєў2$3 4єў€аЊbЖ\ўј§TџdџtџPџLџ@џHџџ’8ўќў<џјў џ’Dџhџpџ\џ8џXџк2Дў ўќ§єў№ўьўшўд§а§Ь§Ш§Ф§Р§М§И§Д§А§Ќ§Ј§Є§ §œ§˜§”§§Œ§иўШўИўЄўўx§h§X§H§8§(§§§јќшќиќШќИќЈќ˜ќˆќxќhќˆ§&АЬирьдфшм Є Ј ќ  є”˜œЌTXШД rU€€€ џџџџџџџџ $`Pџџџџџџџџ$A`Tџџџџџџџџ$`Xџџџџџџџџ$С`\џџџџџџџџ$``џџџџџџџџ$A`dџџџџџџџџ$`hџџџџџџџџ$С`lџџџџџџџџ$`pџџџџџџџџ$A `tџџџџџџџџ$ `xџџџџџџџџ$С `|џџџџџџџџ$  `€џџџџџџџџ$I `„џџџџџџџџ$‰`ˆџџџџџџџџџџ$Щ`Œџџџџџџџџ$ `џџџџџџџџ$I`”џџџџџџџџ$‰`˜џџџџџџџџ$Щ`œџџџџџџџџ$ ` џџџџџџџџ$I`Єџџџџџџџџ$‰`Јџџџџџџџџ$Щ`Ќџџџџџџџџ$ `Аџџџџџџџџ$I`ДџџџџџџџџnrU€€€€~| Љ9Z‡сgсSС ‡Pќєыttџ ѕqpџ!H aXџ8§ѓ[Tџlџ5XџўˆPџЬllџhџўˆLџП;hџaXџ:<џ]ћ<,џhџaџ §ј џћ'ќўџ6Xџџ џА"otџ§k<џhџaXџћ”,џBttџ6Xџ,џlpџѕЊqpџ hџў‹LџE lџў‹Pџ5lpџѕЧч ќ3ttџі otџlpџьЖttџ#€ќ8 TџPџLџlџhџ€ џџџџ€  ( (8'H€ џџџџ€ 2X++Ј+Р и€ 8ш+ +0+@+P+`+p €€ џџџџt€ џџџџ(ЂЈ€ џџџџP€ џџџџ" X€ џџџџ`€ h ˆ˜ € 6Ј р №ј€ џџџџ€ џџџџ" € X(€ џџџџ)€$)И€ џџџџР€ џџџџ"Ш€ џџџџ6а€ џџџџр€ џџџџ"ш€ R№€ џџџџ)H$)X€€ џџџџˆ€ џџџџ"€ џџџџ€˜€ џџџџ$G € џџџџ€ 8Ш 0@P X h x ˆ ˜ЈА€ џџџџИ€ џџџџ"Р€ џџџџ€Ш€ џџџџ$Gа€ џџџџEјE€ Nр"€ 6Ј"€ "`"€ ˆ"€ џџџџ(€ џџџџ" 0€ џџџџ8€ HhpˆЈ€ џџџџА€ џџџџ" И€ џџџџ Р€ џџџџа€ џџџџ" и€ џџџџ р № € џџџџ€ џџџџ" € , € џџџџ€ ,P € € џџџџ € џџџџ" Ј€ ,А€ џџџџ€ ,р   € џџџџ0 € џџџџ" 8 € *@ € џџџџ€ Pp  Р  а € џџџџр € џџџџ" ш € џџџџ№ € џџџџ € џџџџ"  € &  8 H € џџџџ"P € "˜8фДл8 8(u 1Нс=џџˆЖџџџџџџџџџџџџШ$o(ХиЖYv‹§њƒ$o(ХиЖYv‹§њB$o(ХиЖYv‹§њЧ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ <џџ0<ˆџџ<Œџџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџ Ш `џџџџџџџџџџџџмў@џџџџџџџџœŸ” „p џџџџxџџџЈ %`„r џџџџtџџџџџ B р `џџџџџџџџџџџџЄў@ џџџџ В”iƒўџџџџ џџџџ( „iƒLџџџџџџџџH „Iƒ„џџџџџџ џџp „ IƒЌџџџџ$џџ џџџџџџ„ „ џџџџPџџџЈ %`„šџџџџLџџџџџ`„ІџџџџJџџџџџ @ џџџџ`џџџџџџџџџџџџ џ@ џџџџЄ77а”iƒўџџџџ џџџџ@ „%iƒьџџџџџџџџ` ‚iƒ2џџџџџџџџ€ ‚)ƒ&џџџџџџИ Р €€џџџџ   )ƒ6 џџџџџџј џџџџ€€џџџџ р `„Žџџџџtџџџџџџџџџ`„Тџџџџpџџџџџџџџџ`„nџџџџnџџџџџP`„Œџџџџlџџџџџ „’ˆ.hџџџ €џџџџx  „”@ dџџџШ џџџџ€ фаА `„$` `џџџџџ€ўџ џџ џџш џџџџџџџџ%ўџџџџџџџџџ@ џџ џџџџџџџџ %B˜Жp BџџџџџџџџџџџџџџB˜И Bџџџџџџџџџџџџџџb€ж(4џџџџ@џџџџџџџџ"€К€@џџА@џџџџџџџџb€˜ИHџџџџ@џџџџџџџџџџџџшР ш џџџџџџџџџџџџ №џџџџ˜€p(0џџџџPџџџџpџџџџџџџџџџџџџџџџ№А0@H РАџџџџр џџџџ@џџџџ№џџџџШ €P Иџџџџp џџџџ˜ џџџџX ƒўџџџџџџџЈџџџџџџџџџџџџџџ‚ žџџџџўџџџ№џџўџџџџџџџџџџџР ш џџџџџџџџџџџџ №џџџџ˜€p(0џџџџPџџџџpџџџџџџџџџџџџџџџџ№А0@H РАџџџџр џџџџ@џџџџ№џџџџШ €P Иџџџџp џџџџ˜ Р ш џџџџџџџџџџџџ №џџџџ˜€p(0џџџџPџџџџpџџџџџџџџџџџџџџџџ№А0@H РАџџџџр џџџџ@џџџџ№џџџџШ €P Иџџџџp џџџџ˜ ш+0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџш+€цо^ьФvџџР-X,џџџ џџ џџ@ўџ(џџџ џџ џџ@ўџ$џџџ џџ џџ@ўџ џџџ џџ џџ@ўџџџџ џџ џџ@ўџџџџ џџ џџ@ЪЬЮавђџџР-Аџџџ џџ мо@ўџџџџ џџ џџ@ўџ џџџ џџ џџ@ўџџџџ џџ џџ@ўџџџџ џџ џџ@ўџџџџ џџ џџ@ўџќўџџ џџ џџ@ўџјўџџ џџ џџшикмортџџР-иєўџџ џџ ью@ўџ№ўџџ џџ џџ@ўџьўџџ џџ џџ@ўџшўџџ џџ џџ@ўџфўџџ џџ џџ@ўџрўџџ џџ џџ@ўџмўџџ џџ џџ@ўџиўџџ џџ џџРшъью№џџР-дўџџ џџ џџ@ўџаўџџ џџ @ўџЬўџџ џџ @ўџШўџџ џџ ј@ўџФўџџ џџ џџ@ўџРўџџ џџ џџ@ўџМўџџ џџ џџ@ўџИўџџ џџ џџ@ўџДўџџ џџ џџ˜@ўџPўџџџџР-ўџАўџџј џџР-р ўџџ џџ џџ@ўџўџџ џџ џџ@ўџ€ўџџ џџ џџ@ўџpўџџ џџ џџ@ўџ`ўџџ џџ џџ@ўџPўџџ џџ џџ@ўџ@ўџџ џџ џџ@ўџ0ўџџ џџ џџ@ўџ ўџџ џџ џџ@ўџўџџ џџ џџ@ўџўџџ џџ џџ@ўџ№§џџ џџ џџ@ўџр§џџ џџ џџ@ўџа§џџ џџ џџ@ўџР§џџ џџ џџ@ўџА§џџ џџ џџ@ўџ §џџ џџ џџ@ўџ§џџ џџ џџ@ўџ€§џџ џџ џџ@ўџp§џџ џџ џџ@ўџ`§џџ џџ џџ@ўџP§џџ џџ џџ@ўџ@§џџ џџ џџ@ўџ0§џџ џџ џџџџ@ўџ §џџ џџ џџџџ@ўџ§џџ џџ џџџџ@ўџ§џџ џџ џџџџ@ўџ№ќџџ џџ џџџџ@ўџрќџџ џџ џџџџ@ўџаќџџ џџ џџџџ@ўџРќџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXџџџџР-@ж2єџџџџџџР-(xџџџ џџ џџџџ@ўџtџџџ џџ џџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџ0 ФЪаЬЮвџџ0ˆtџџџ џџ џџџџ@ўџdџџџ џџ џџџџ@ўџTџџџ џџ џџџџ@ўџDџџџ џџ џџ04џџџ џџ џџџџ@dџџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџР-ˆФШю№џџџџџџР-ptџџџ џџ џџџџ@ўџdџџџ џџ џџџџ@ўџTџџџ џџ џџџџ@ўџDџџџ џџ џџР-4џџџ џџ џџџџР-ј0џџџ џџ Р-рџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџР-XџџџџџџџџџџџџџџР-@xџџџ џџ џџџџ@ўџhџџџ џџ џџџџР-dџџџ џџ џџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџР-@2жєџџџџџџР-(xџџџ џџ џџџџ@ўџtџџџ џџ џџџџ0˜Hџџџџаџџџџ№џџџџ`џџџџџџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ "џџџџР-0:р”.ФжџџР-Hџџџ џџ џџ@ўџDџџџ џџ џџ@ўџ@џџџ џџ џџ@ўџ<џџџ џџ џџ@ўџ,џџџ џџ џџ@ўџџџџ џџ h@ўџ џџџ џџ Јџџџџџ @ўџјўџџ џџ Јиєўџџџџ @ўџфўџџ џџ ˆ Hрўџџ џџ Р-0мўџџР-Р-Иv2ўBDђџџР-ЈJЬX˜ЖџџР-иўџџџџ ШЪ ˆШўџџ џџ џџ@ўџИўџџ џџ џџ@ўџЈўџџ џџ џџ@ўџ˜ўџџ џџ џџ@ўџˆўџџ џџ џџ@ўџxўџџ џџ џџ@тЦШЪЬЮџџР-аtўџџ џџ џџ@ўџpўџџ џџ ик@ўџlўџџ џџ џџ@ўџhўџџ џџ џџ@ўџdўџџ џџ џџ@ўџ`ўџџ џџ џџ@ўџ\ўџџ џџ џџ@ўџXўџџ џџ џџ джикмоџџР-јTўџџ џџ џџ@ўџPўџџ џџ џџ@ўџLўџџ џџ Ош@ўџHўџџ џџ џџ@ўџDўџџ џџ џџ@ўџ@ўџџ џџ џџ@ўџ<ўџџ џџ џџ@ўџ8ўџџ џџ џџ@ўџ4ўџџ џџ џџи фцОшъьџџР-0ўџџ џџ џџ@ўџ,ўџџ џџ џџ@ўџ(ўџџ џџ џџ@ўџ$ўџџ џџ џџ@ўџ ўџџ џџ џџ@ўџўџџ џџ @ўџўџџ џџ "@ўџўџџ џџ АШ!Pr@ўџР-0ўџџ џџ @ўџ ўџџ џџ @ўџўџџ џџ €ўџўџџ0# Р-ИР-Ає§џџ џџ џџ@ўџф§џџ џџ џџ@ўџд§џџ џџ џџ@ўџФ§џџ џџ џџ@ўџД§џџ џџ џџ@ўџЄ§џџ џџ џџ@ўџ”§џџ џџ џџ@ўџ„§џџ џџ џџ@ўџt§џџ џџ џџ@ўџd§џџ џџ џџ@ўџT§џџ џџ џџ@ўџD§џџ џџ џџ@ўџ4§џџ џџ џџ@ўџ$§џџ џџ џџ@ўџ§џџ џџ џџ@ўџ§џџ џџ џџ@ўџєќџџ џџ џџ@ўџфќџџ џџ џџ@ўџдќџџ џџ џџ@ўџФќџџ џџ џџ@ўџДќџџ џџ џџ@ўџЄќџџ џџ џџ@ўџ”ќџџ џџ @@ўџ„ќџџ џџ џџџџ@ўџtќџџ џџ џџџџ@ўџdќџџ џџ џџџџ@ўџTќџџ џџ џџџџ@ўџDќџџ џџ џџџџ@ўџ4ќџџ џџ &Ј˜Р@x(№ијџџџџ Рџџџџи`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX+Р&Р-и> 0 Ь@ 2 Цџџа&њўџџџџ џџш&ўџ'јўџџџ ј&ј' џџ џџ(шшўџџ џџ џџ@ўџиўџџ џџ џџ@ўџШўџџ џџ џџ@ўџИўџџ џџ X@ўџЈўџџ џџ XШ'Єўџџ џџ X@ўџ”ўџџ џџ @ўџ„ўџџ џџ 0(tўџџ џџ @ўџrўџџџџ  ($0(pўџџџ ($ (Xlўџџџџ @ўџhўџџџџ џџ@ўџdўџџџџ @ўџbўџџџџ И()џџ џџШ(`ўџџџ р()№№(^ўџџџџ №)+ю)\ўџџџ H)+џџ џџx)(Lўџџ џџ џџ@ўџ<ўџџ џџ џџX)3h);џџџџ<J ЪL Р-№B ШF *0юџџР-и,ўџџ џџ џџ@ўџўџџ џџ џџ *@ўџџ џџ џџ@ўџўџџ џџ џџ *ўџџџџ џџx)№J ЪL 6аЮР-H ўџџџџ иV @ўџўџџџџ V\ @ўџўџџџџ b d@ўџўџџџџ h p@ўџќ§џџџџ Оц@ўџј§џџџџ zj *ЬP @ЮR F–Р- T JиV NмџџР-ˆкZ V\ ж^ Р-p` `b dрd џџР-Xlтh pфшџџР-@XrОцРъџџР-(xОzj ~l џџР-мжь–p+џџџџџџ.К0 ш+@pџџџ џџ @ўџ`џџџ џџ Р-\џџџ џџ H `„ўџџџџxџџџџџ€ p,hLџџџ џџ X@ўџ<џџџ џџ @@ўџ,џџџ џџ (@ўџџџџ џџ џџџџp,`„ўџџџџxџџџџџ€p-рџџџџџџџџџџџџА џџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp+џџџџР-@ џџџ џџ @ўџќўџџ џџ џџџџР-ьўџџ џџ џџџџ`„ўџџџџxџџџџџ€џџџџ˜-џџџџџџ`„Lџџџџtџџџџџ€џџџџР-џџџџџџ@„„џџџџdџџџ џџ€џџџџр-`„ўџџџџxџџџџџ€.`„Lџџџџtџџџџџ€0.@„„џџџџdџџџ џџ€X. @„ЌџџџџTџџџ џџ€ .мўџџ џџ џџџџ`„ўџџџџxџџџџџ€џџџџ`„ўџџџџxџџџџџ€џџ/Pњj џџ џџА/8Pџџџ џџ џџџџА/ @џџџ џџ џџџџX0 p-@„ЌџџџџTџџџ џџ€X0р` Р 0 H а ˜ џџџџџџџџ€  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ .H,X0@0џџџ џџ џџџџ@ўџ џџџ џџ џџџџX0џџџ џџ p-`„ўџџџџxџџџџџ€џџ`„Lџџџџtџџџџџ€џџ@„„џџџџdџџџ џџ€@„ЌџџџџTџџџ џџ€Шˆ1Р џџџџџ џџˆ1Ј(1џџџџџџџџџџџџX1p1џџџџџџџџџџџџџџџџџџџџ А џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџш2p-ˆ1 џџџџ8 `„ўџџџџxџџџџџ€џџџџ`„Lџџџџtџџџџџ€џџџџ@„„џџџџdџџџ џџ€џџџџ@„ЌџџџџTџџџ џџ€џџџџИ2 .ЬК„ZЂџџИ28џџџ џџ џџџџ@ўџ(џџџ џџ @ўџџџџ џџ џџџџ@ўџџџџ џџ @ўџјўџџ џџ `2єўџџ џџ џџџџ@ўџфўџџ џџ џџџџ@ўџдўџџ џџ џџџџЈ2Фўџџ џџ є@ўџТўџџџџ џџ@ўџРўџџџ џџИ2џџџџ˜/џџџџМўџџџџ @ўџИўџџџџ ˆ1˜”џџџџ(Јўџџ џџ @ўџЄўџџџџ`@3 џџџџџџџџ2 џџџџH ш џџџџџџџџр џџџџИ џџџџџџџџџџџџи ЈXџџџџџџџџџџџџџџџџџџџџџџ .р˜ 7BпўЪ€ џџџџ€ џџџџ€ € џџџџ€ N€ џџџџ€ h€ џџџџ€ˆ€ џџџџ„ „  € џџџџ„А€ џџџџ€Ш€а€и€р€ш€№€ј€ џџџџ"X € џџџџ€€ €˜ €  €Ј €И € џџџџ€ Р (Ÿр  € џџџџ9 € ,0 ` &x ˆ € џџџџ€ 8 € $Ш 9№ € & 0 &H  X € @h  Ј  Р и р € 4ш  8  @ (P 2ih € џџџџ2  И € џџџџ€ $а ј € џџџџ(Ђ€ џџџџ Ј€ џџџџИ€ џџџџ"Р€ 6Ш€ џџџџ€€€€€ €(€0€8€@€H€ џџџџ€P€X€`€p€€€ˆ€ џџџџ€€˜€ €Ј€А€И€ џџџџ€ <Р ( 0C@€ џџџџ€ .`x#€ N#6`Ј>р   € <8 *Vx€ "Ј,Qа    (€ *0 `  h &Mx ,Q  а и ш€p#ј€ џџџџ (0JЋ@˜ >SИј^l0 0Ј0Рир№ј0 08 :P0p :ˆ0ЈР Ш иш№ ј "2 H P X 0` € ˜ЈИ":а ј   (0 #8 H P 0X x  + *Р€ а шј-€ (@H€ P`h0<p   ЈА'И 2Ш /р &l(0€ џџџџ€ . @€ 4P)ˆ' (АР#Ш'иш€ ,№  0@'Xh€ pAˆ € џџџџЈ€ џџџџ"А€ џџџџ€И€Р€ џџџџ€ BШ€ &`&e@#€ 4/8Pˆ Шиш(ј€ џџџџ€ џџџџ"…€ :(€ џџџџ€h€p€x€ џџџџ€IˆЈ7Р"@р,4H8  X ` h p x € 0 Ј  А И Р Ши€ џџџџш€ џџџџ"…№€ P€ "P€ џџџџ€x€€€ˆ€€˜€ €Ј€ џџџџАР а€ *р(6  8 @H  P X`h€ >p€ ,А3р7  (  0 € *@ p x  ,€      И € 6Ш € 6! 8! H!€ X!  x!  ˆ! ˜! $= ! $BШ! №!ј!€ "€ " "H"€ џџџџP"€ џџџџџџџџш#р Form dlgSummariseрG Copyright 2002: Statistical Services Centre, The University of Readingќџр Written by Colin GrayerЭџџp]ЌђH i ]Ќ ђp ]ЖVariableђ]ђ˜ ]ђ(]ђP]ђР ]ђ€]ђш ]ђИ–р Set up the list box мA ќA@ ўЗбA@р, Put values into the box for proportion typeЖ Proportion ОB@^Ж Percentage ОB@^ЖCount ОB@^Ќ О(rр2 Put values into the condition box for proportionsЖ< РB@^Ж<= РB@^Ж> РB@^Ж>= РB@^Ж= РB@^Ж<> РB@^Ќ Р(r р т ф цA@оІ  - 9 ^ ь т ц ф Ф v ќ ў Ц Ш Ъ Ь Ю а в ђ д ж и к м о р т ф ц О ш ъ ь ю № A@ш"oџџЈ–@ Фœр Display the variables boxЗ ќ(A@dџџXр0 Hide the variables box, and show the factor boxЗ ќ(Ќ'жЗ'vA@Škџџ№A@єoџџр–€рR Variable list has just changed, so check whether the OK button should be enabled. ќ$ 'ж жЌ  2Ќ  (A@єoџџ8–Р v! ў(oџџ–рL By list has just changed, so check whether the OK button should be enabled. ў$ '2 жЌ  2Ќ  (A@єoџџp–@]ђ€ жЌ 2Ќ  Ф'ір2 Disable all statistics except CountAll and Blanks і Ъ( і а( і Ь( і Ю( і в( іœЗ Ъ(З а(З Ь(З Ю(З в(kџџPA@јoџџ@–˜]ђи жЌ 2Ќ  Ф'і і Ш ю( і Ш №(oџџА–№ в! ќ(р Adjust width of dialog вœ џџ!€ И џџ(€dџџP џџ!€ И џџ(€kџџ0oџџ(–0 ф ш(oџџ–p ц ъ( ц О( ц Р(oџџШ–Ар& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџ8–№р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџЈ–0р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџј–p џџ!(A@joџџи–Ар Cancel button just been clicked џџA@roџџ–№р OK button has been clicked]ђ0ђHђ`]ђx]ђ˜]ЌЌђа]ђр Find the output rangeэ ц ф : рЖSummary$”.. .А›G|j Ф жЌ œр& Get the ids of the selected variablesЌ жт<8 ќ <A>kџџPр2 Unstack or copy the data to the destination sheetр Position data after the table v 2Ќœр Unstack the variables by factorЌ 2сX ў A> жЌœр : If no variable specified, assume first factor is variableЌЌт<xЌ$Ќ+<kџџdџџјр. Simply copy the visible rows of the variablesЌЌс˜kџџ  B D '6 ђ›G 6 F'6jІ <  И . ь! 6б6$J'Ь !$X'˜ ˜Ќ›G Ж'˜jр Set up the descriptive statsA4 І  - 9 ^ ь т ц ф Ф v ќ ў Ц Ш Ъ Ь Ю а в ђ д ж и к м о р т ф ц О ш ъ ь ю № A@P" џџA@roџџ – р/ Sets up the table containing the summary stats]ђр]ђј]ђ]ђ(]ђH]ђ`]ђx]ђ]ђЈ]ђР]ђи]ђ№]ЌЌ ђ]ЌЌ ђ@]ђx]ђ]ђЈ]ђР]ђи]ђј]ђ ]ђ0 р6 Insert sufficient columns at front of sheet for tableэ ..Кџ ІўЌЌ’A@> џ ІўШ 0 ЌЌ .%Ф(р' Insert description of each data columnџ ІўЌ Ь’ІЌ ІЌ К%Ц ь 2 & 6 A@  ь ІЌ Ќ .,Фџ ZўЌ 2’З'8 џ 8ўЌ : ’р 6 Check whether a column already exists for this factorЌ 8Ќ .%Ф! Z$&œр Insert factor value into it Z$6  ІЌ 8Ќ .%Ф(З'8 yџџа kџџШ џ 8ўШ 8 œр $ Insert a new column for this factorA@> : Ќ ': Z$&Ќ : Ќ .%Ф( Z$6  ІЌ : Ќ .%Ф(kџџ џ ZўШџ ІўШ : Ќ '2 Цœ D &A@B kџџИ Шœ F *A@B І эЌ 2 Ќ .%Ф ЬЌ 2 Ќ .%Ф$0.kџџH юœ !N 2 'ЦЖRC[ ЦЖ]/SUM( .б, %ЎЖ)*100'L H LA@B kџџа №œ !N 2 'ЦІ *ЖSUM(R2C[ ЦЖ]:RC[ ЦЖ])/SUM( .б, %ЎЖ)*100'L J LA@B kџџ8 Ъ›G L 6A@B j а›G N :A@B j Ьœ P @A@B kџџш Юœ R FA@B kџџШ вœ д›G T JA@B j и›G V NA@B j м›G X RЖ1)A@B j к›G Z VA@B j м›G \ RЖ3)A@B j ж›G ^ \A@B j оœ ` `A@B  b dA@B kџџ№ рœ d hA@B  f lA@B kџџР т›G h pЖ0%бЌA@B j фœЌ'n_џџ€ ш!d nЖ $j' Ж›Gxj $šœ $X' Ќ Ќdœ r Ќd$ОЖ)'L Ж% LA@B kџџШkџџРЙџџИkџџА цœ Р!'Ќ'n_џџˆ ъ!d nЖ $j' Ж›Gxj $šœ v  $М x'L О!rЌœр Proportion L z'L j 'ў О!rЌeр Percentage L z ~'L l 'ўdџџр Count n 'ўkџџp ўЖ  Ж   LЗб„A@B kџџ8Йџџ0kџџ( ь!dЖœ ь!dЖ(„'n nЌ›G ь!d'nj ь!d nЌ $м ь!dA@B kџџАkџџЈЌ ˆ%PB@Zolum ЬЌ 'Ьр insert works will a full sheet.kџџˆр. Delete last column in worksheet if it is used0р; Following If statement added by CJG 19/3/03 to ensure thatort byр( Finally, prettify the descriptive table жЌ œр- Delete the first column if only one variableЌ$.!Ў'< .!ЪB@Zэ < $0..kџџэ .!Ш.. .!ЪB@b ьœр%Convert to values and delete the dataэ .!Ш. B@ –б” B’ К!ШB@˜dџџ`р Hide the dataЗ К!Ш!Ъ(Ьkџџ(oџџ –P ]ђ ]ђА .!Ў'r э К!Ъ.p  p B@э r $0..oџџРІїЗ–Ш р3 Adds the column containing the specified statistic]ђ ]ђА ]ђШ A@> ўЌ 2 .%Ф(џ ІўЌ Ь’эЌ І$К$„.  L$ZЖ? !Ў$Ђ'š šЌ$мЖ=›GЖ= š'šj ІЌ 2 .%Фѕ „œ š9œdџџ` š9LkџџP Ќ$(œ5 ˜$”9ždџџ  Ќ9žkџџqџџџ ІўШ 2 Ќ '2 oџџрІ–р рI Splits a column header in the form ColName:Factor1=Value1,Factor2=Value2р into individual components]ђ ]ђ ]ђ0 ]ђH ]ђ` ]ђ˜ ]ђа ў$Z'ў ўЖ:„'n nЌœр$ No colon. See if there are factors. ўЖ,„Ќ ўЖ=„ЌœЖ'ь ў'Тdџџ€ ў'ьЖ'Тkџџhdџџ`р8 Treat the string before the colon as the variable name,р% with the factor list after the colon ў nЌ $м$Z'ь ў nЌ $њ$Z'ТkџџЈЌ'2 ТЖœр# Find name and value of each factorЌ'n_џџP Т nЖ,$j$Z'$ $Ж›Gxj 2Ќ '2р/ ReDim Preserve FName(1 To NoOfFactors)р0 ReDim Preserve FValue(1 To NoOfFactors) $Ж=„'Œ ŒЌœр  No factor name specifiedЖ 2+& $ 2+6 dџџ0 $ ŒЌ $м$Z 2+& $ ŒЌ $њ$Z 2+6 kџџиЙџџар FactorNames = FNameр FactorValues = FValuekџџ€oџџxџџџџpр chkPercent.Value = Falseр chkCumul.Value = Falseр/ a different factor is selected. CJG - 18/3/03e рH Following 2 lines commented out to prevent these boxes being cleared ifџџџџи"џџџџ ˆ!Š!N ˆ!Š!P! Ќ œџџџџ #Ѓф `#Щф р! CJG 19/3/03рG Error may occur if InsertColumn has reduced the number of data columnsџџџџј"џџџџ<ЗAttribute VB_Name = "dlgSummarise" ŒBasŒ0{4D9183F3-C5EE-11D8-B659-0004768BFDFA}JC2J dGlobalŽSpacAoFalse ŠC€reatablPredecla‰IdзTru BРExpose0Template Deriv–Cu@stomiz‹D ' For m Ї Copyright 2002: Statistical Services Centre,€ The Un@rsity of Readingƒ%Written by Colin GrayerOption Arlicit Const DefaultSigFˆigs€F4 CExtraWidDth@160Ч sиtrV@„D9"Х€n Dim NoOfs As `IntegС D:e@6n8€"РRang€a… Р,umnP €vШH Currч€FLoBAE3Э&Factor1K P€u€w S€ub UserAk’_@ iv@()С> '€dt u(p tbl€i box @CallР:itAЊs(cшmnD@-A€ЅРР8Putƒ0ТEoLУ€@ lstPB!Z By, 0:=KУАР Т ' @ valuŒinto)Afor p roporТ€ty†p]Р cboP€.AddItem< "Ёƒ@9er2cр-agaCount‹сIndšZš< я ‚In€a`IeOutputЂ[ reТf, opC"NewSheetс…BookЂ‚€рkore!troˆls FЗSavР‡јchkС!S"G їa х „ _Т 6CРЙ%U, €QЈW,AYa@т@‚NonBlankƒumрЇBcbMeanStdev"Tot№al, Я TBCЁ=  S€T@Ma ximumЂMi"ngediф Qu"a`les1 Sk`ewnes`с SЉтCVТPƒ^i" ЇdЁchN txt_ъсFpррO€ˆrУ) bCumu` рƒ„˜k0 Endр:žb!’‰–…3_C`МЮk–р6ТIfс5хСШnХ ' Disе@лyТ…vd]s†M 8.VisibbvХчG 9L_ChS]€E‚z€ ' HiDdeO, a shhowВfвYпiŸСfи4zГіf= Fѓ`№By Gi 2гѓтЁIfЄЦwGџЯР‘bєдbVСђahas jP№Aad, soАeРck whe bhOK —t`quld be en9! d.ђ 3^ˆNumberSele`cted( gbРtnOK.E3p((Ц> 0) јOr хpA“3?Џ'Ё8'№Byѓјb.Vбiђ ЏЇœByN яgeя~rяяр!Bѕ=ђ ByПЂПППП0c%АO<1= ­‡qУ OnlyёŽН[l@Tє@ ш= уР(10 Aащ5 шNotр(kE+ЗrA( ‘sUЉs e`xceptІ~Aџ@с;^У €€Q^иџQЧ Bpт^_а™џUqbOL2d_\gdџЏЉрRЈ@ЗжRй Б,я€5šHW п г ЯџТT пвй .ЈL1 џDwЕNп6д6О'бВ'n Ih'd‚Р#sў '2]bЕ$sиџ!,ј 5s22@/!иllow@г 2† @ваВcomm`­!`нout Гpr|evБD ю№Ј@bše!c7@ф icc' a diff eaШ Фkis stY. CJG - 18/3/0о3рТ–›'P< џ4 ^wч!S‘2xfraЉ#|pyaЗlue ' Adjust width of dialogрIf chkAdditionaРl ThendфMe.Wf= €+ Extra.БNElsЮ`-0 nd If; E Sub Private “Percentiles_CРlick()%etxt.VisРible = 5aрropor{‘0‡Œ0 ‚0cboP qConВ›‰o€ptRange†…'Ўistin4g  €€у h€as been€D ostB+' Make book ˆnamAx aa€label vУRC‚ €YWork N@ ˆ-Tr„–lblй3NewSheЌetŒ4€ sСп4B‡4=\4B€V4B]|hinФh, since newƒscannot€}( revd|Fa%wз8gЖbtnHelpGТGetЁс†с€_textLID‚y Ca€l (ƒ butto\n ‚™Ѓ[с‚eU`nloadЙ OђK, OKЅ Gfˆ ТDim i As Integerˆ, kЊjun сfDataЃr`FFactor(†)шЧummy@0 To 0вOЦp"—!LonЃЙb' Fizthe output rс†bSet Dкe†aЁ`ІOBЂю(@S`oX,Сn`Тs\, Dra,@Lf!b, "Sрar )в' рJ !id s йAsele@cted vds3т р ReA7! (1)х ю)`Call ItemsIn€Box(lstљb, AУсе†зР' Unstack or copŠyЂd ? tocШ-(Ђ' Posib0‚afterтtС b##By уe"ƒBs <я"Ѕ"Сц by f’&ђџр Щ%1tPПрtBy, cVр /p$‹@'@~ noV specified, asФsuАgfir`‰ x isІе P-1ЋПP (Р=T АU(ЙŠ' Si0mplyW„U rМowЦ%?%2%Ѓ(@с9’hЅ9‰mnIncludeColumnС3 + ~cfƒaB0р˜S[P‰‚˜ —•O`&m~nУ.єАU4nS!)(a+e, ЎDwEРW),q“C +ёJ.VapЃ, _ЯтЂG4:=„Ѓ ’SigFigsћР(№BѓƒР 9e<=”=@…Deрfault$RB€PKupе4criб Ove p7tу+АMupФHзutSavаntrol’s Gmm`BseQџš"O4MP„PlА0УDBРBy, ŠCРƒ1 CountNonBlank#Уp0ricВMean‚StdevС’Totalор?Л#‚ Ma ximumRMinЗeрПsQuaрЏЖhkSke wnessSSљbCVbиЗѓ'Б№ѓА.0!zёy№OаKаuР ”вCumўu0№Ў!8U*п$ХЯщ!ЁФ’%s Є%‚Wёа@ntaрЕБTpJН№"yИ&Ђ%-Fj}.mъ‚–Prc`:tsŸbІ aom DqЁStr uГвNxumbPdа† FєoraPSР>ў БЪlЖcF‚L€ŒПqH#Mb “ЖзNsyў1Г\c’HЄŽ‚ ЕВmF5dб €‹l 4џмѓ т7A) –‹5rр.1ьHead?cŒ•<вkOf|fsKP}с[O г1 ЁKe0sн2 Bunsert €sufficiРёа*Qes at f0ront1‘B† foЖr table Set DataColumns = Destinatio‚n„For i\Р1 To 2HnРInsertj&РNext i‚.Cells(1, 1).Value’strVaLriƒ4' R €descrip of eachф dЁ cЂ, “pNoOfОO n ErrИGoДEndOfLoop 'CJG 19/3/03'„may ohccuxfG, has reduced the РnumberOMs…'Call ParseHeader(ˆГ.Of€fset(0,€­т-Ž, _…R‹ƒ"Name, vFactors,ž  Вs)&сХi + Тc@bћХ AVk@B{ШХ&AFound FИalsƒ’У,jkƒ CC tˆ€ ' Check wDheUr aФx alr€Ly ex@ists f@rtœhi> If‰Ќ=œjС9ƒ"‚J(kр) TheƒЗC-C%Ц fТ vЌin№to iŒ. –VR?Уe€K/РC&ХSTru‰SР€ExitŽ @VЫРЕ IfШЭТрjРFNo@‚3C>Іa newћE0{.nЌУ ƒ(>џBDСUi PЈРo)@Tџo р5:§ Ф^ kq5ћ‹-"-kbBŸЃŒ:ТCurren!Є4 CЉbР4chkЃd SAddЃ& @ІpSummrƒB lanksCmulaB ШЃ NonџЂ %C Ѕ‰ 5сХaERangсЙт(ёO82, Ј Оœ  Bї С!sƒ—Ь ЃN№Perc@0*уЎ@2ѕŠ.Ф,-Т) @"RC[" & d& "]/S8UM(aЫ 7re€ss(Refe @ceStyle:=xlR1C1)`")*100"Ÿ… .=dХ @Нor—<ЌCu`џeџaqЉA R2Ю:џ)яЯkЂO&@lC)’#ў.пппёŠu1ђПŽ1umericэв ~Ё&Nt0Уƒi0ƒ5Total_vrq:В,“ ŸMxean‚пt>, QйЎ StdeЮvŸ™", bПїу i1—4 Ѕ УЯr‚В, bУMinimuўmяЂдаc/ QQuartile†sOBLQ, 53161)6ЄedіiД MТaA[о#Uq3~aъx/nе,MгƒƒЏ Skewn0Fџе0> …@ $ќOmmKurtoќsiPЅ•LИ(№гЬSSЯ lCs @ч/ПЁUsкm MsV‚/CV hVФ3Tat:="0ž%Œ!фV&&PoQбђ1DoШ ФSБ€Field(t$xt8.Tаб, С , " "жЙРч а'""Г "ŸщIsфI(4ПЌRчдРЪ= `ƒы є>= 0 AуОk<= Pk >_`„€d&Hrћх$/ЁЃpЦ0&ч!Ф‘4%"›p ›!“>aрЅ ЫА`5PаropoАFoА№ЌВCo№= cboџ‘ТR#эЈЯ"-т›Ў"џWЏ"9@ "ˆp‡"h"јЖ Formula = Prop@ortion˜1€ & CondDecimalNumber(Va0lue),d2  ИIf cboP.ListIndexи0 Tиhen-0'ˆ+А &К39Header|str0Summ‡^ŽElse”\1™\ercРentage‘?Ѓ\}Ћ4'g>g!'‘РwuntaCo E@‡IfЮAdd€Column )x& "@†“‚‘, „E, AsArray:=TruУ PЮLoop… €mtxtOther.Text <> "" mPos‚InStr(Š Р, "(")H4Р‹ ƒЌ LenЫ У‰ ‡?LeftЭР- 1), P36‚' Finally, pre@ttify 9 descriptive tablCN@-NoOfVa@rs < 2Š?'@ DeletРhe first cЃ5if only€e variCЦ рrDestr 256m3rl =†qnƒA  sit is u_`b€G‰ Є>(@ )џЬlФ€5Љ`HВx§V=Љ9 >!8ѓЦР_P0D*?ђл.(xlShiftTРoRightC,џ=6ASп%д%"У(ŒByА1ѕgAs ##м, sЕxˆ_Ђ `ѕ*OUopWt4jpфFa0‚, _с\Ѕбa' 0 sЂ[ЩTWco ƒinБ+]rs>fi`+a,0“i>c’ B‡2A:O2Th,isО –iIn№tegeГ@’уcЃ ^4Y.Cell`s(1, фK`)>.RG0г}2@ iѓ р‘o 8&Т G#A‚ = All‘Inƒ(СЃs(2p, i)“ 9 = Replaceу(Trim(ёu"?" Тlёe+oІ<"y(, x2‚=GC‚€9'= "`&У9 With*2“№i + л ёCїCŽэЏ.d B8 џ(Џœu/!и=`IsMiss 'gТА) .уОa aТtаSigF УШat(3 , Chџ/ #Y zЄ сѕN1œiЂ'(аШяђ_ATAP`$ˆ#+GпAeбARefЄhN8ame3•CІ>ByƒAA.Facto –`Dd5№Ќ2Сs()љУВ3šг)' SЈpliPƒa`hѓЪtinТBfp :IЃ1=Т1,у2у3иm ‹indi@vidualPmшpon@qsФ сDМVnzТqCs я–Ќi2б F‚ї! ЉFђ Џа€в/џ’ ТSP ђ?гcmБ =@†@(sН:oН€/ѓыч'KAoРn. SeeСv€Xерa0fBs€ GС3bУж,")D0ш Or=ЅмюƒNѓq0 ""2 А Uў=ЄkЅL5 “OКX@љБ€Else ' Treat the string beforeDcolon as0variable nameB,€with@factor list after*†ZColum$nN@ =yim(Left(Header, Po€s - 1))/ŠFRs,Mid +++End IfЁ6NoOf70If <> "Р" Then‚ €‚0' Fik avalue o€f each ƒj#…P= 1DoУ…€#Thisƒ2…WNextFiel d(„>q, ",>"‡q€O P E№xit Š1 n‰€… '&ReDim Prese rve FЙ(1p To РYW V/A‘ ЦC2€:In0Str(0Р7="o†p@ €7„ 0 ^'@$DY‚– specрifiedШV€ ƒP™С1s(Щ0@ ""‘ 0Ю Ч)Ш ‰ФC%XTўrХ­Щ џџџџ<џџџџџџџџџџ<џџ<џџ<џџџџџџ@˜ #DIV/0!џџџLџџ%+v и`џџџџџџџџ`ќўkXџџџџ Œ)ƒx џџџџ џџxџџџџ€Р%`„џџџџpџџџџџons. „ИџџџџlџџџА2: S% „жџџџџhџџџаThe %+z ј`џџџџџџџџhдўk џџџџ'''Œ)ƒx џџџџџџ8џџџџ€%`„џџџџhџџџџџ „Иџџџџdџџџp% „жџџџџ`џџџ%`„| џџџџXџџџџџ`„~ џџџџPџџџџџ`„шHџџџџџ`„€ џџџџ@џџџџџ+‚ `џџџџџџџџh<џk8 џџџџNŒ)ƒx џџџџџџXџџџџ€%`„Єџџџџ\џџџ џџТšџџџџHџџџџџџџџџџџџџџџџџџXџџџџџџџџџџџџјиxџџџџ€ƒt џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјиx`‚ џџџџlџџџ џџ `„В џџџџpџџџџџ€џџџџџџ`„а џџџџnџџџџџџџџџџџџџџџџџџџџџјиxџџџџџџџџџџ`џџџџz š„ џџџџџџџџџџџџ@ўџџџџџLџџџ џџ џџџџ@ўџџџџџ<џџџ џџ џџџџ`z џџџџlџџџ џџџџџџшH`„В џџџџpџџџџџ€џџ`„В џџџџpџџџџџ€` `„В џџџџpџџџџџ€џџџџ`„В џџџџpџџџџџ€а`„В џџџџpџџџџџ€И`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€`„В џџџџpџџџџџ€џџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ H+в џџџџ`џџџџџџџџџџџџŒўJHџџџџ aŒiƒВ џџџџ џџџџџџџџ„аАџџџџџџџџџџџџ˜@рџџџџXџџџџџџџџџџџџШџџџџxџџџџџџџџџџџџHџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшxџџџџџџ џџџџџџv ššX0џџџџџ@ўџ0џџџ џџ џџ@ўџи џџџ џџ џџ@ўџˆџџџ џџ џџ `@ўџАџџO џџ џџШˆ@ўџџџџџџџO џџ џџ8Аўџ@ўџ№џџџ џџ @ўџ єўџџ џџ @ўџџџџџфўџџ џџ @ўџџџџџдўџџ џџ PАџџџџ№џџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџ€Xџџџџџџџџ˜џџџџџџџџџџџџ џџџџИџџџџџџџџџџџџ8 џџџџШ џџџџџџџџџџџџџџџџџџџџџџџџP џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ј  `v џџџџtџџџџџ( џџ џџh џџџџўџ@ўџр Xџџџ џџ @ўџx Tџџџ џџ џџ P @ўџ  PџџO џџ џџИ x @ўџџџџџLџџO џџ џџp   @ўџ( <џџџ џџ @ўџ ,џџџ џџ Hџџџџšš @ўџ@ўџH џџџ џџ @ўџџџџџ џџџ џџ џџџџX@ўџџџџџќўџџ џџ џџџџџџџџ €   џџџџџџџџx аџџџџH џџџџxџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџp˜ 7B*\R1*#175$*\Rffff*1?4238491c*\R0*#15*\R0*#13п ўЪl€ € џџџџ€ >€ @X€ џџџџ€ N˜€ џџџџ€ ш€ џџџџ€€ џџџџ„€ џџџџB (€ <0€ 6p€ џџџџ€Ј€А€И€ џџџџР Ш!аш ;ј " 0 @ H X h x€ ˆ˜€ џџџџ € џџџџB Ј€ @А€ 8№€ џџџџ€(€0€8€@€H€P€X€ џџџџ€ N` А И Ш!аш ;ј  , 8 h €  ˜ Ј€ <И€ Fј€ 6@€ <x И€ 0Ш ј*.8€ џџџџ@€ џџџџB H€ JP€ 8 € џџџџ€и€ џџџџр №€ "(8€ ,@ px€ џ @[РƒIf x.V; <> "" And IsNеB(Ф)unEC;‡$E+… С*n Ј+ 1ˆEAfРNext xB‚(€&‚9ЪGB…Т Exlse&ЧE/ц .ˆ EŽšŽP‡Р} “Varе’q€ian@Ј “vЄar@ce0”"Ѕ[џ_J‚џI ьIAeЁLˆbСResidSumPDiffаSqТ' U,seAcу‹ …Š C€OUNT toр”РterminЃрfјberс&+h‚ т@"ѕ"=})Ђ`>`3c{c`' cсfqc‚"=9&k- Т ",uaоlЂa bц.= “D0l+ ‚d'Ё2`Љr‡!4р Еo fa)yя Цd*B K!*CŸrr' at :is point,я!1A.AЅs€GРBФqu@Ђs, Рвb!e„Џ, whiР™should be zero , `цЄmay notAexacˆtly@cauРMЋ!$…мeЁЦsХЖC„цуƒMЦttakт0@ o acc€tCЁЂ<= 1Ъ''­b €empaнРWnС has oРZЂШ‚i3Kаe= (5Д-Ї *ЇРL) / (n - 1/3/MqMnaStћ‚ŸMeRr ŸMR<я…ч?NOs$Reѓv?NosAЃТqIThisџA&} ђЕ2Aа— Ÿу№чlФ+;' CћP[ a|2у‚АE№Sqr(…тљgШЅa r‚ed@0 )Ѓ…_а%2зqЏj' New!œced2uq‡dd№ё”JG 19/2/03Q›•–Р(a "sp@ecial"ЃC€BS, Nai` .i”МoаD•(Bъyp ЁS0Ћ`ЃрŸ“•0в А0on№ž@ts a dP t“АЉm ddmmpyy (`Š’S'џ0 `rBuЋrЈ‘pFdd/mm/yybBб LqhInt\egqЃА’LLxen(ї “д вf"tш, L@44)@ & "/"PM„idю3, 26RAА:2ф  —above ­e 5рreplaСБ0=q Х№CA8/3BВ Ћˆ__SRP_1aџџџџџџџџџџџџAv__SRP_1b=%џџџџSdlgUnstackTwoWay"џџџџџџџџџџџџbAdlgColumnPlotHџџџџџџџџ(Пm§џџџќ      !"#ўџџџ%&'9)*+,-./012345678$:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZўџџџћ]_ `abcdofghijklmn\pqrstўџџџvwxyўџџџ{Њ§џџџ~€Xџ,џџќўЈP ѕqhџ l tXџ (0џќіlџ!Ha џ8§ѓ[џdџ5 џўˆџќldџ`џўˆџя;`џa џ:0џ]ћ<џ`џaєў §јфўћ'дўџ6 џєўфўр`џa џoXџ§k0џћœџBtHџ5 џ oPџoHџЋtPџlџoHџoHџГ§k0џћ” џќіlџlhџѕЊqhџ `џў‹џU dџў‹џElhџѕж :0џ§lџH.lџoPџoPџГlhџьЖ§k0џћœ џlhџѕЎ§iфўћМџќіlџ§• ЈP<$lџџџџdџ`џ џџєўдўŒPlLџ Lџќі\џ \џ :\џB9 §k<џќіlџE \џ§lџ§•# @P,blџ\џLџ0 ќЦ  \rU€€€ џџџџџџџџ,`ќџџџџџџџџџџџA =I ,Љ`§џџџџџџџџџџџA=I ,б`§џџџџџџџџџџџA=I (љ`§џџџџџџџџџџџЁ n€ џџџџ" H€ џџџџP€ џџџџ"И€ џџџџ€ 2Р ј€ 6t@€ 8X(v€ џџџџ€ џџџџ" € X€ џџџџ€ 2p Ј€ И (и'ш'ј€ џџџџ€ џџџџ"€ &€ џџџџ€ &@ h€ @x)ИШ р€ @№ 0@€ џџџџH€ џџџџ"P€ *X€ џџџџ€ &ˆ А€ џџџџР€ џџџџ"Ш€ (а€ џџџџ€ &ј  € џџџџ0€ џџџџ" 8€ ,@€ џџџџp€ џџџџˆ€ џџџџ" € џџџџ ˜€ џџџџЈ€ џџџџ" А€ џџџџ И€ џџџџШ€ џџџџ" а€ џџџџ и€ џџџџш€ џџџџ"(€фt?Д5 1Н,ЋџџˆЖџџџџџџџџџџџџЪ$o(ХиЖYv‹§њ‡$o(ХиЖYv‹§њD$o(ХиЖYv‹§њЩ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџ0x№ € џџџџ€ :0 (vp € џџџџ€ ш  € џџџџ€ џџџџ€ џџџџџџџџxр Form dlgUnstackTwoWay>•рG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin GrayerџџЭџџh]ЖUnstackђX5џџ]ђ€–0р, Set up data area box with current data areaџџџџџџ мA@кјр/ Restrict output options if protection in force р т ф цA@ор2 Restore certain controls to their previous valuesІ   # X ь ю ђ † Ц ј њ є і ˆ Š Œ Ž  Ю а т ц ф ќ ў &A@шoџџ№–pрQ Resets list of data columns, and puts the list into appropriate list/combo boxesр+ Set up column names from the new data area Aр Initialise the lists ќA@ ўЗбA@ &ЗбA@oџџ№–ар Variable list has just changedр Remember the order of selection ќA@ р: Count the number of selected items and disable OK is none ќ$ 'ж жЌ  ( жЌ œр: Set option to put column names in unstacked column headerЗ ю(kџџИoџџА–р$ Column factor list has just changedр Remember the order of selection ўA@ oџџ8–Pр! Row factor list has just changedр Remember the order of selection &A@ oџџШ–р% Make sort options visible if checked ђ ю (oџџp–а Œ – (oџџP– Œ – (oџџ0–P Œ – (oџџ–р& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџ€–ар% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџ№–р$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџ@–PрC Help button has been clicked. Display context help for this dialog џџ!(A@joџџа–рC Cancel button has been clicked. Exit without performing any action џџA@roџџ`–ар OK button has been clicked]ђ]ђ0]ђH]ђ`р Find the output destinationІ э ц ф  : р д$8.. .Аœр" Specified destination is invalid.рC An explanatory message has alreadly been displayed by OutputRange.|џџ(kџџ р& Get the ids of the selected variablesЌ жт< ќ <A> ў$ '2 &$ 'ар+ Get the ids of the selected column factorsЌ 2т@А 2Ќ œ ў @A>kџџ0р( Get the ids of the selected row factors аЌ œЌ ат4а & 4A>dџџРЌЌт4№kџџ р Set unstack options ю›G 6 B '6j №›G 6 D '6j ђœ 6 F '6 іœ 6 H '6kџџkџџ † ›G 6 * '6j Ц›G 6 , '6j ˆ ›G 6 . '6j Š ›G 6 0 '6j Œ œ 6 2 '6  ›G 6 4 '6j Ю›G 6 6 '6j а›G 6 8 '6jkџџHр/ Unstack according to the specified parameters.І < @ 4 . ь! 6б6 јбL њбNAJр3 Save the values of certain controls for next time.І   # X ь ю ђ † Ц ј њ є і ˆ Š Œ Ž  Ю а т ц ф ќ ў &A@Pр Get rid of this dialog џџA@roџџрџџџџи–А Œ – (oџџ–poџџј ђ ›G 6 ъ '6jџџџџи џџџџVЗAttribute VB_Name = "dlgUnstackTwoWay"  œBasœ0{4D918427-C5EE-11D8-B659-0004768BFDFA}J3C4J dGlobal!’SpacoFalse ŠCreatablPre declaIdлTru BExpose0TemplateDeriv–CustoHmiz‹D 'Р Form Њ Copyright 2002: Statistical Services Centre, The UnCrsity of Readingƒ%Written by Colin GrayerOption ulic$it Coё DefaultSh8eet…Ф~d Dim NoOfVars As  IntegУPDF Sub Fr€Ž3_C@k()qEndA UserC_act iv€A '€ 0‰CIfЧЖ> 1AЧўnbT a˜AТа'AQЛ*%Juѓ€ ”hfЏq_№ G.1uxѓVб4IfПР†1c™` By]s' f’GЏ`XЏЏЏДІBџp?Ÿ — ’(Э  LŸ O%ї№O%O% бnO%’t?БruБ^ЁVЗvтMapke sp^tei siq‘`nchecDkeˆfra1."V4= (db AџJл%ЯФ0Z‘^ƒ\€p pExcepўt˜њ"Щ‚Єp\c!ѓппptзпп$joЏЏЏ_ce2„ AќddvЂnГWТExрY { Т“•=!Obe№ ch№­гг?' в"bpŠ2dB–‘Ilabel vC!ЂtxtWolbўl/ђИ&П#З#Ez, ѕ` asЉ  ё/O   c2=  oўkOУZ  !ˆ  џ2 №!БW†АВcѓ фin4, ›АбЁ‚cannot ўbСЊс3??5ЯP$o?_TiHelжp,! АхtрЕЇ!Тed. Dis €еy 1Бext Кh Иt`qdрЗŽopЭ ‚(Getт8Me.q‘Б@IDТ w CanceОlœ CП Е 5tbЧЁ У per` mё5№any iАtр Unload Mч‚!Ÿ—OK\€п–i›ZёзDЬinpсџp иB>ђХйѓ’ћй х`kKДm Options As Integer   ' Find the output destinaШ„Set„ D& = OPRange2(optNewBook, Sheept, _zЮt€xtWorkb+@Name, sЃ0refW,r`faultL) NIf ‹Is Nothing Thenq' Sp€ecified Ю is invalid.An explayory message has alreadly b€een dis2y€)by‰†%Ex@it Sub‚-E‰€ЊIf' G€ЁБids of‚Ж@select&variables‚ReDim Vars(0 To)oOf)оCall ItemsInBox(ls6t€‚$,‚˜NoOfFactors@nNumber&S„С ByЧ RoТw™ CarrD [4column fџƒˆ56DЮ6@y9Щ-> €Bˆw>By, Cƒ3f_rowџ *„ˆBMCh‡2 ЯN3РПP,BS, У -ИlseBK@ O0 9щunstackСсќТ4chkіCB2сhs"ef‚ yЄƒ+ cmnInc№ludeЧhЃ5‡dЧhSortJuџe“ьсƒУb "р‹љByc  %џ" ((HC&!  3ћ%У…HCounc•,‡"%`Dupl`Ј€ "еЧoc%пeЦw#,Add~`ЌIgnore?"W0AЃЃ9Las[%ЫMaxЇо`ŒinŸicШ#ˆA‚' UDkaccordЮtoуИ&Эpar кterFs#Т‚~UnSAr(aИE”Ѕ~мfэ€СtpyData.VaЬluф$Z:=Ћъ!#*Missр:=ѓР|*, УУ2ozH/Savetuerlcerta`controls for next timвeSutCtРTwoWay‘zџФсcrFћё6B…7џ 7’ &К[FEџ2ŒБ•BQ(:щ“4ЃОFirs?аPq,в )sinпюдр_• j~РўB€o`вd‚ѓ4q‡rid3‡аdialogТUnload Mg Q/т‹ € џџџџ€ N € џџџџ€ p€ џџџџ€€ џџџџ„˜€ џџџџ€И€Р€Ш„а€р€ џџџџ" ш€ џџџџ№€ џџџџ"ј€ џџџџ€   '0+@'P (`€ џџџџ,p,ˆ, ,И,а,ш, € џџџџt(€ џџџџ>@€ џџџџ€€ џџџџ )ˆ€ @˜ и ш ј€ џџџџ€ џџџџ"€ џџџџ 0 8"H`€ џџџџh€ џџџџ"p€ џџџџ€ Fx€ <Р)€ џџџџ(€ џџџџ"0€ џџџџ*8 Hh)p€€ џџџџˆ€ џџџџ" € џџџџ˜€ џџџџЈ€ џџџџ" А€ џџџџИ€ џџџџШ€ џџџџ"а€ џџџџ и6ш ј€ џџџџ 0H `p ˆ˜А Ш иш    0€ џџџџ8€ џџџџ" @€ џџџџHX€ џџџџp€ џџџџ" x€ ,€€ џџџџ€ ,А р №€ џџџџ€ џџџџ" € ,€ џџџџ€ ,@ p €€ џџџџ€ џџџџ" ˜€ * € џџџџ€ Pа  0€ џџџџ@€ џџџџ" H€ џџџџP€ џџџџ`€ џџџџ" h€ &p€ џџџџ ˜€ џџџџЈ€ џџџџ"А€ "И€ џџџџ€р€ш€№€ ˆ!фДђ!’!‚T 1НЦDџџˆЖџџџџџџџџџџџџЬ$o(ХиЖYv‹§њ‹$o(ХиЖYv‹§њF$o(ХиЖYv‹§њЫ$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ<џџ€ <џџ0<џџъ <„џџ<џџ<ˆџџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџbv2ўџџџџ lџџџ џџ (T `@ўџhџџџ џџ @ўџXџџџ џџ @ўџHџџџ џџ ˜8џџџ џџ №тцфfЊ Ќ џџџџ4џџџ џџ @ўџ0џџџ џџ @ўџ,џџџ џџ @ўџ(џџџ џџ @ўџ$џџџ џџ @ўџ џџџ џџ @ўџџџџ џџ @ўџџџџ џџ {€rг–№гџџџџИџџџ џџ €ўџџџџ0 џџџџpџџџ џџ @ўџ№ўџџ џџ @ўџрўџџ џџ ф$ч@ўџаўџџ џџ №@ўџРўџџ џџ  @ўџАўџџ џџ @ўџ ўџџ џџ @ўџўџџ џџ @ўџ€ўџџ џџ џџџџџџџџ˜@РH @р џџџџШX` p`0 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈа&t ќ”'§<#N/AџџџџHАџџџџXј џџџџџџџџИ џџџџP(џџџџџџџџџџџџ pд@ќџџџџџџџџџџџџџџџџџџџџџџ.#и˜ 7BпўЪЧ€ џџџџ€ џџџџ€ џџџџ€ џџџџј € ,( &X &h x 9 Ј &Р а € џџџџи € џџџџ>№ € џџџџ 0 € џџџџ@ € џџџџ"… H € @` € џџџџ€  €Ј €А €И €Р €Ш €а €и €р €ш €№ €ј € € € € € €0 €8 € џџџџ€@ €X € џџџџ€ h  € "Hˆ  А Р  и %р %ј  (  @ %H %` x  Ј   А  %И  %а ш   №  %ј  % ( 0 H  ` %h %€  ˜   И  а %и %№   8@X p%xЈ€ џџџџ€ А(—ај€ џџџџ   ( 8€ .Hx  %А ар€ џџџџ€ .ш(@ Xh€ џџџџ x ˆ€ ˜И€ "а dр0ˆ(0‰X ˆ˜L 0‰ј№€ џџџџ€ 8ј0 H%h ˆ€ џџџџ€ N˜шј,X @€ џџџџ€ P%h€ џџџџx€  АИ€ џџџџ€ Р6Rи€ џџџџ€ N `€ џџџџx€ џџџџ"…\N €€ @а€ џџџџ€€€ €(€0€8€@€H€P€X€`€h€p€x€€€ˆ€€˜€ €Ј€А€ џџџџ$И$р€ џџџџ€ џџџџ€ , P` x ˜ И Ш р ш   (H P X ` 6h Ј И Ри№  € $ @ P X ` h€ џџџџx €   6Аш № 008 P px€2Ш и ш № ј    (0 @ H P X ` p €ˆ€˜   АР€ џџџџШ€ Hр ( 0 H `€ F€Шш$$06X˜   АР€ џџџџШ€ џџџџа€ џџџџ€ џџџџџџџџPр Form dlgColumnPlotџџџџџџрG Copyright 2002: Statistical Services Centre, The University of Readingџџр Written by Colin GrayerџџЭџџh]ЖColour GradationђXџџџџ]ђ€]ђ]ђЈ]ЌЌђ(]ђP–Аoџџ–№р Initialise the lists мA ўЗбA@ ` \B@^ \ЗбA@ bA@ fЖColumn   Ad fЖBar Ђ Ad fЖLine žAd fЖPoint žAd fЖArea Є Ad fЖPie І Ad fЖRadar Ј AdЌ f(r р т ф цA@оІ \ т ц ф f b \ v ў Њ Ќ Ў A@ш A@А z!|œр9 Workbook is shared - must create chart on a new workbookЗ ц(З т(З ф(kџџ№oџџшІ –0 ~ѕ dC@^ ‚5„Ќ +Xqџџ˜oџџ–ир? Check that the number of selected items in the lstXvar and theр6 lstYvar boxes is non-zero, if so enable the OK button b$ 'V VЌ  (oџџа– \!rЌœЌ'Tр1...n selecteddџџ \$ 'Tkџџxoџџp–X v! ў(oџџP–˜ ў$ '2oџџ0–иЗ Њ ( Њ ! Ќ (З Ў ( f!rъЌKTр ColumnЌKTр BarЌKTр LineЗ Ў (ЌKTр PointЗ Њ (ЌKTр AreaЌKTр PieЗ Њ (З Ќ (ЌKTр RadarЗ Њ (З Ќ (З Ў (nџџШoџџР– Њ ! Ќ ( Њ ›GЗ'Ќ joџџˆ–Xр& Existing Range option has been chosenр% Make book name box and label visibleЗ (З (oџџј–˜р% New Worksheet option has been chosenр% Make book name box and label visibleЗ (З (oџџh–ир$ New Workbook option has been chosenрI Make book name box and label invisible, since new book cannot be renamedЗ (З (oџџИ– џџ!(A@joџџ˜–Xр Cancel button has been clicked џџA@roџџP–˜р OK button has been clicked]ђи]ђ]ђHЌ TсŽ˜Ќ VсИр& Get the ids of the selected variables \ ŽA> b A>ЌЌси v 2ЌœЌ 2сј ў A>kџџ(  Ž A–І \ т ц ф f b \ v ў Њ Ќ Ў A@P џџA@roџџИІ –р9 Plot series on a graph from stacked data (for filtering)]ђ]ђ ]ђ@]ђ`]ђ€]ђ˜]ђА]ђШ]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђЈ]ЌЌђр]ђ ]ђ0 ]Д&t ќ”'§<ђH ]Ж#N/Aђ` р Choose chart typeЗ'œ f!rЌ›GЌ f(rj f!rъЌKTр Column   'z Њ ›G |'zj Ќ ›G Д 'zjЖ Column Chart'€ЌKTр Bar Ђ 'z Њ ›G Ж 'zj Ќ ›G И 'zjЖ Bar Chart'€ЌKTр Line Ў œ  'z Њ ›G К 'zj Ќ ›G М 'zjdџџ ž'z Њ ›G О 'zj Ќ ›G Р 'zjkџџаЖ Line Chart'€ЌKTр Point  'z Њ ›G К 'zj Ќ ›G М 'zjЗ'œ Ж Point Chart'€ЌKTр Area Є 'z Њ ›G Т 'zj Ќ ›G Ф 'zjЖ Area Chart'€ЌKTр Pie І 'zЖ Pie Chart'€ЌKTр Radar Ј 'z Ў ›G Ц 'zjЖ Radar Chart'€nџџPр Find the output rangeІ $э ц ф : р €$”.ž žА›G|j Ž‘'T ‘'V ‘'2 2Ќ œр' Factor(s) specified. Get their names.џ ІўЌ 2’ ЌЖ›G ЌЖ,'Ќj Ќ І$$О'Ќџ ІўШkџџр( Unstack using the factor, but no carry.Ю 2сД џ ІўЌ 2’ І$ І+Дџ ІўШЮЌсЖА VЌ'В TЌ œр An X column is specified.Ќ$Ž$О'Јр Unstack the Xdata by factorэЌЌ ž%ФЌ А ž%Ф$0.ЄэЌЌ ž%ФЌЌ ž%Ф$0.ЂэЌЌ ž%ФЌ А ž%Ф$0.Є АЌ 'Аdџџ@І   Д И ž ь! В КбРЌ ž!N бм $J'АЌkџџа р2 set up string of Y column names, comma separated.џ ІўЌ V’ ІЌ ›G ЊЖ,'Њj Њ І$$О'Њџ ІўШрG Replace blanks with SmallNumber to prevent them being ignored by chartэ ž!Ш.žџ ІўЌ ž!’ І$ž!Ж›G К І$ž(jџ ІўШр Hide the dataЗ ž!Ъ(Ь АЌ z І œр Make pie into doughnut Ш 'zkџџ р Produce the chartІ z Ђ Є Ј Њ Ќ €б€ Ў б’AЮрG Replace temporary small number with #N/A to get rid of spurious points К М žB@аoџџH І(  &,28>DїЌ2ЌШЗЗЗЖPlot "–И р9 Plot series on a graph from stacked data (for filtering)]ђр ]ђј ]ђ ]ђ8 ]ђP ]ђh ]ђ€ ]ђ˜ ]ђА ]ђШ ]ђр ]ђј ]ђ ]ђ( ]ђ@ ]ђX ]ђp ]ђ ]ђА ]ђШ ]ђр м Ю ЌњЌШ ˆ!l%BB@H і!'а р pick up its name nѕ z9zЗ9pр& Copy unstacked columns into the chart Є!P!'Аџ ІўЌ А’Ќ І Є%Ф!'к эЌ І Є%Ф$„.д ІЌœ д бt Ъ бvC@rdџџр д бt5†B@BkџџР І7†ѕ ЂАœэЌЌ Ђ%Ф$„.в в 90kџџp к 9Щ` ’ €Ж Line Chart €Ж Point Chartœ Њ96 ІЌ 98kџџ z І  z Ш œ ІЌ 5ˆ(Š ІЌ 5Ž(ŠkџџИ œ œр Suppress lines in Point Chart Њ5ˆ(ЈkџџpЩhqџџ`џ ІўШЗ9~ €Ж of  Њ5€!ђ (d ЈЖœІ 5€!ђ !dЖ against  Ј5€!ђ (dkџџи ЌЖœІ 5€!ђ !dЖ by  Ќ5€!ђ (dkџџ ЊЖ,„Ќ'р ЌЖ р  z І œЗ9„kџџHЌ 5€!Š(‚Щє р$(Pie charts dont allow fiddling with axes Ъ7Кѕ ЈЖœЗ9ОЗ9РЗ9~ Ј54!ђ (dЌ 54!Š(‚kџџ qџџ˜ М7КѕЗ9ОЗ9Р р œЗ9~ Њ54!ђ (dЌ 54!Š(‚kџџ@qџџ8Ѓє 05Вѕ Њ5ˆ(Ј Њ5Ž(Šqџџ z І  z Ш œр B Tidy up duplicate series by making them the same colour and styleЩ˜џ ІўЌ5†!’џ 8ўЌ ІЌ ’ І7†! 87†!œр@ Duplicate series name found. Copy colour and style from j to i. 87†!8 І7†(8 87†!Ђ І7†(Ђ 87†!ˆ!Š І7†!ˆ(Š 87†!Ž!Š І7†!Ž(ŠЗ9„р')Suppress legend as it contains duplicatesyџџ0kџџ(џ 8ўШџ ІўШkџџqџџјoџџ№џџџџшІ    Д Ž ž ь! В КбР 0 * F б6Ќ ž!N бм $J 'АџџџџрџџџџЗAttribute VB_Name = "dlgColumnPl ot" Bas0{4D91842B-C5EE-11D8-B659-0004768BFDFAb}J3C6J dG lobalSpacoFalse ŠCreatablPredec$laIdиTru BExpose0Templa€teDeriv–Customiz ‹D ' Form ŠЈƒ Copyright 2002: Statistical Services Centre, The Un€Arsity of Readingƒ%Writte n by мin€ Grayer€Option €s licit Const strBтy€ourС|DdР!on@d Dim NoOfFactors A€s IntegQХXVaTYRChartTypeL@;(0 To 18)ŽShowLinР@Booаlean/P@b@d€ Sub FrЌˆ2_C@6k()AEndA UseЪrСa_Р1iv€C  '4itihali@Еt@Yts €CallBЁs(cmnD@›AРœ€РPut/M@ЩТРEoA4box lstBy,r CM:=ƒ@ РXvar.AddItem DummўyAТкA Pк С__B‚3@Ц_TТ+(ˆcboF, "C ", xlCCl]Р[e@hЃпpрU"јBarbр"Aь?a?"_…J Poјint_‘;"Ї<уџтPieрŸёˆRad$%"cI!‚.сIndex t0Ч9InХVOutputRange ref, opC"NewShиeet…рikG €e ˜reƒtroЦlРŽІПSavР9 їс Ы7_Ђ @^Ѓ^!QЦ,СbУXchkсcФd `Ÿcked, `100PercŸТс€":ƒrт i _€W т‚If Act@ЅWorkbook.Mult’iA€Ed`&ngЁЉ`‰Ѓ' х isŒ s@3рМ- m€^Д cсЫe€ – €Ј€a new wф Ђ €€#р+A".Va 0§3 Q —qа1?pС‹E:1Бc}= 0Ё1'1...ьn e’E2™IџŸ S 1є, •}p@Byъ ђ  By.рVisibBŸbS7яђёhAR !Q Iе=  ByП і IˆЯHeђ№ ЄMџH ЦAаЧN[ VEІ ‘ЃPШdЋ0bг$ ~CAК™ зbђЁ'kC~G1'P{2?Qx"РQ Џ= ;† в3aт ytaя^џ РR4QбwB§"5!puoo  Џу"З‚6 'bwџЏЏР Џ­Cgkџ˜10“’o+d+аџ” З0ocX10?јNotБuФТ>ёч'чрH™$ ub}Дu€š9~'РХЫ€u‚nЁ‡!Чh as bePЩch жуOТ ' Mak‚eРSok na ч1ГVlabel Цvу=ЂtxtхyQЖСП lbl/вAџцџєЃ{Ђ‘, y‚ўsa“    QХ џХLц  .  Сˆ —Žp€Ж been chosen   ' Make book nam$x and label invisible, since newXcannoЂtЈ repdœ€txtWorkœNš.Vz = False#lb"l# EƒSub Pri vate  btnHelp_CРlick()ЪGet Me.ContextLIDoKCa€hlРButton('$'  b‚ hlas„ž:eu‚-Uрnload€;›4€Z$OK 1OK/Dim XVars(@) As IkgLer‚5 Yv F`actorТRe0 To NјoOfТTР?УCMЦYС!У' \ the ids of‚selected %ia€ŒsТCall ItemsInBo@x(lstX@,ЯУ5УаA, ‚ У—У$„5%0IfЕрkBy A@Œ2У s <> Р hDЛ?†5‰ˆ @ #Byž,РЏTC СІIf‚7„б NewXYBySeries(УФ9Š2utSaveAЊrols ColumnPlo‚, optRИangРн@BшBРSheet, cboCharаtTyp€ _„#@0N РXУO[ch@H,a Stacked hk100@Percen hkShowPoiќnt8т џ\Ђs€. љjP, щalЏ]^'уT d 4' a) sb1 on a graph from sЃ data (for fШilt`ng`""dDestinaМtiрo"2ІYККX#:sсvь6i‘|XЉStrinўgЧсТ OД!^їIMŠсYёb4Q‚С„‘УsAsLЧ!Ы€ZleaЃбс-ФBy ourСmi)* З#ЎpC#0d(sAsLab(els$(7YV”ar1If‚BX‚ > 0 Th en‚F' An X cŸ is specifiьedƒxXЊ€-‹В9'(1В‡ЄЁXdРata byІ7GOƒеPUnSН(”Yv€X, Ќ, 1Destina€tion, _%€LchkCopyD@.Valu(e, LE,@?nNumeric:= Small@berЮOps:=cmnDuplNDewƒ* + €S€ortRowsG#2Max„:=€257 - XШ0.Уg€0Set XФ €YRange( ells(1, 1)‹C.CGѕЪYу2ж jвРК#ˆJs- 1‚fEllseХh =Рw™{D№ummyo?}Ÿ> /џA5рŠ+T)2u5Љ" d+Я’s Bup s„trС’of Y…tn€œs, mma separatХunbХ1 i >s“ € YсzЁp&№ ","EЫ"v(eЌ(–' Replace blanks with ho to p@reventAЎm beСignoredс†char>t‚ тcшg`dЋcurтrрReg„"Њ ёkounЃ `?Р!‰ч Cˆ ""ЂЄъvщ‡H" HideЂЩЁb EntirŠeЃt.`denРјTrucgр h!7 AрзCA#TypeA xlPie,КM ake pРinР,doughnu{ІЋDЉЈPР#b'Р Produ 9ЁКЕ‡2CРЈ  Т († ѓ`^D, %…`AM"N%ДcьЙр@У i tle:=g,rker!ДhkSрhowPo@dwф …'temporary s!_ nu†m0_ƒ(#N/A(Bg06rid а5spurious ~p"Т u˜eA ‚ ‘Sub € Priv9І рByаi Г ‘As InteўgohRVaаba7~ '$3у{рSљЂD, c>xz“YAБХODУtaъlфDа.cсu2+&"яя‡!№"Plxot"^w”`МB"y№our FaЯаiŸІœMaђ&‡…ŒLineЁU=яж]eftА8200??sTozp 5aЁА:€ ariРon a graph frožmdPЎАU‚™(f@ЊfiltP‘ngрmуr,С­XYGR*GЇoЂ#В(fYoiз4.ЖjOmХЋ%э&Xƒ'P uP і*іыTFп QYпuжPtr/ m MultipleYsбBoolea3ГAQYЙ9]Z[ §M˜incqРWbl_чa ˆom Р+СMпƒ Ђс;ёАSА’6RP _ Grцe@h B`ЕТA=veSheet.B#Objects.Add(LР,, аp, 25ƒ-P-).SelГТ†&= Sа{.R'Рkйp itsю сŽBW„sџBА1ѓDq’БжCVisiрOnl^y3’@ѕu'Рp8y u#с`sбs o’tp@z=іnОsпpи†Џ™€АЅsХчЙ,љUОi)Š(б‘A8= AllI:n“(ф€2,ў Hёр†„ъсp ItS0Sce IЃ:=’, сBјy:=V] љПЖIџ@ Сa№!+љњу"№;а˜C Д If Not (XColum ns Is€hing) Then ЈSet Xdata = AllDInzŠ.Cells(@2, 1))‚.€XValues@H End IfA .Name.Yg On Error Resua*Next !шMarkers Aa(ChartTitl+"Lin„e  " OrƒСPoint„Š.ƒ-BackgroundTorIndex[xlN8one‹G€ІForei + 2‹€keype <> xlPieq Doughnut“ъ.Bord8er.Ъ- -Inрterio д+œPShow]s“#' Suppress l€fs in ˆaR„/StyuQ]Q$ЦŽGoTo 0ШA With3…A• iEХ.HDasХŠTruЦy.'`˜‚ac€Ms.T€ІР„ & "ˆ of& YЖ6sEРvXСu""їMJлY_ 9CA€againstт/ТЅ‹&€F@orџ?€kТ+?Ц!by‚Ч3Mul@tipleY!‹(@InStr(*,  ",")С(0Ц‘љы= ,ƒS AC5ъk,ЃA@Lege‹= Fals†@k'IFont.S4izс1ІN‹QIgВn€ƒAx`Ѕb"'a{"c!—s dр allow fid"dРdg w€U a'Р$ЁW .(xlCategor>y)В  XL€AMaРjorGri ТЖыJ" тiРџВeёЄAxiУB% GŠRџюѓ)РK0Ёiz*$твџЩ#П _€-LKЏыџ 1‰Р@Р8w# ‡/Ÿ#"Ч—':Л$PlРotAreaUpџЕcЯWI_cЏqЭѕР3O8OnxlOnr ' Tidy up€ duplic0 s@lа,РEmakA№Ž themA sб†colourє a0=seИ F:с} i ^1 №d .SbpulectШion vunЬ‰‚ji - 1иЧ Ў(i)•‘ПŽjДo&' D­ nqfс‹. Copy = from j to iо.. po Mr—0ЙoŽ= € l䔧O /q#Е€_Vw"oonao’/ nў(РŽ//"22ї @Џxo`Šыi­ '–“kaP–t |ntq€‡2цˆ@&E№xit ю!<эЛ§r“jЈ‹”+b!VZ сSub modChartџџџџџџџџџџџџeН/dlgDataAreaџџџџџџџџџџџџ}xmodColumnџџџџџџџџџџџџ†+Ф__SRP_e@4џџџџяf&Р€ :и   "( @ H P€ џџџџ` h  p€ ˆ€ "˜Р XШ ш 6†ј0 8 0†Hx€˜ АИ;Р2а&  ( 0€ ,8  h "p !€ ˜&  А И€ *Р  №  ј "  !   ( €0 8  *@  *P ` € џџџџ h  8p € @ˆ € Ш  $ш  Lј  E  E0  'H  %X *@x  Ј И  Р а  и ш      ( 0 H P X p x  € ˜   И‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸўџџџЁЂЃЄЅІЇЈЉЊЋЌўџџџЎЏўџџџБВГДўџџџЖўџџџИЙўџџџЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшўџџџъыьэюя№ёђѓєѕіўџџџјљњћќ§ўџ Р Ш р  ш  №    € џџџџ € џџџџ€ џџџџ€ џџџџџџџџ0 р Module modChartelрG Copyright 2002: Statistical Services Centre, The University of Readingџџр Written by Colin GrayerЭџџpІ(  &,28>DїЌ2ЌШЗЗЗЖPlot "–Їр9 Plot series on a graph from stacked data (for filtering)]ђ(]ђ@]ђ`]ђ€]ђ˜]ђА]ђШ]ђр]ђј]ђ]ђ(]ђ@]ђX]ђp]ђˆ]ђ ]ђИ]ђир Dim ChartTitle As Stringр Dim NoMarkers As Boolean]ђј]ђ]ђ( м Ю ЌњЌШ ˆ!l%BB@H і!'а р pick up its name nѕ z9zЗ9pІЧџрq NoMarkers = (.ChartType = xlXYScatterLinesNoMarkers' Or .ChartType = xlXYScatterSmoothNoMarkers)р& Copy unstacked columns into the chart Є!P!'Аџ ІўЌ А’Ќ І Є%Ф!'к эЌ І Є%Ф$„.д ІЌœ д бt Ъ бvC@rdџџ8 д бt5†B@Bkџџ І7†ѕ ЂАœ Ђ!P!'Ў ЎЌ œр Find the corresponding X column к Ж:„'о о Ќœ к 'м dџџ€ к о Ќ $њ'м kџџ`џ 8ўЌ Ў’Ќ 8 Ђ%Ф!'ж ж Ж:„'о о Ќœ ж 'и dџџј ж о Ќ $њ'и kџџи и м  ЌЖœэЌ 8 Ђ%Ф$„.в в 90yџџkџџˆџ 8ўШkџџpkџџh к 9 ’œ Њ96 ІЌ 98р Elseр3 .MarkerForegroundColorIndex = xlNonekџџр šœ њ бl5ј BBkџџИqџџАџ ІўШЗ9~ ˜œЖ Colour plot'€р Elseр ChartTitle = "Plot"kџџ8 €Ж of  Њ5€!ђ (d ЈЖœІ 5€!ђ !dЖ against  Ј5€!ђ (dkџџШ ЌЖœІ 5€!ђ !dЖ by  Ќ5€!ђ (dkџџ€ ЊЖ,„Ќ'р ЌЖ р œЗ9„kџџ@Ќ 5€!Š(‚Щє р$(Pie charts dont allow fiddling with axes< ј Ъ7Кѕ ЈЖœЗ9ОЗ9Рр& .CrossesAt = .MinimumScaleЗ9~ Ј54!ђ (dЌ 54!Š(‚kџџhqџџ` М7КѕЗ9ОЗ9Рр# .CrossesAt = .MinimumScale р œЗ9~ Њ54!ђ (dЌ 54!Š(‚kџџиqџџаЃє Ш5Вѕ Њ5ˆ(Ј Њ5Ž(Šqџџ˜ ˜œ5„›G5ќ B@Zjр : Factor is in first Y column (and hence the first series).р  Delete this seriesЌ7†B@ZэЌЌ Є%Ф$„.ˆ ˆ :%'т ˆ :%'ф џ ш ў5†“џ ІўЌ ш !ў !’ І$ˆ т  ф т Ќџ'ц ц Ќ@ œЌџ'ь Ќ ц 'ю Ќ'№ ц Ќ€ eЌЌ ц 'ь Ќџ'ю Ќ'№ ц ЌР eЌ'ь Ќџ'ю Ќ ц Ќ€ '№ dџџАЌ'ь№ДдШџџџџНй$1Н–HџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@<џџ0<џџъ € @р€ џџџџ€ €(€0€8€@€H€P€X€`€h€p€x€€€ˆ€€˜€ €Ј€ "А€ "и€€€€ џџџџ$L$'@€ џџџџhpx€ џџџџ€€€€ џџџџ€ ,-0@ CX Mx ˜ Ј Р AШ р ш  ј- € &(P `px*€˜ CИи шј* (M@`hp xˆ  ˜   ЈА€  ЌЌџ ц 'ю Ќџ'№ kџџ€ І ш %ў ѕЩ` ь ю № $@9А5А9І 9ЂЌ 9 р# Col + 2З9 qџџџ ІўШџ ш ўШkџџшqџџрoџџиџџџџаџџџџ\ЖAttribute VB_Name = "modChart" ' Module L PCopyright 2002: Statistical Services Centre, The University of Reading–Written by Colin GrayerOption ExpliˆcitPub Sub MakТeЇ(ByVx Type As Integer,  _ XmumnsRanКg€TY ƒ9X‚™…€7S€Ѓng,  Y ‚,… œ#Facјtor &Œ€y7 Direc•= f t­сЉuэMiЄncЁDoр…eЦ јMaxб XQB1ћСk2D€<@с@!&"BЙD a(i™ PР NoHt (FEIs`tњh`ˆ)Š Aжќ= ЅяА'rИK> 0яф' Fiр ‚#orrespond X з“%hPрT=рcƒ!, ":"<Ÿ3 3F [\чж%Ё_ oЖMid‹ б+ 1{Я E№ъf2jџ 2я 2ф PХє.CХ2jЯ2Ж€#ќInaЈoHŸШЉ wЖ%ЯFџџry|= !J /щ џ_шP § +U“rДм""/ъAIX"OIЭd s„@Ij)Ÿ"ц<.XFЯ ЅExјit @$/…РNext jnћP1п+ Cs5хаLЬ“АвH.Г‚Bac€kgroundR€orIndex€-рxlNonŽ€D№eO`]+ 2џVus&ЊrЯЮ !7ЛOpCal8l .F3Š1‚:=фxl}ar\ ~7С`•riеu.HˆasTЄЮTru–пP.–Ь ѓŠ4"баЮўpQв&Э+ёpАє` { ЄˆСЂ`р б.ŽT1'•’’& "‘ѓ№" & Ух с9‚7И<> Ÿ7џ№Шsѕ.C{ДhartTitle.C acters.Text _ & " against$& XNameJEnd IfIf F˜orD <> "" Txhen>Арі=ц ™by”vk ™MultipleYs = (I@nStr(YRs@, ",")V0V)…‹c=cAtNot $lHasPLege=ƒls’‰qFont.Size€J10?On Error GoTo IgnoreAxesƒЫ'Pie cрs d€ allow fiddling withЌ a'W. (xlCategјoryЦ:€;uSl.€6MajorјGri€"Œ8 Х 6i€+а 'ƒC.CrossesAt>.MinimuрmScalЦLФ #ТЉ€ TruMAxмis‚ТT‰Б=‹ЉDЧ ^€ ‹AO’RV№alueЩQЂI оHџ"HРm›ЄР3tPуcEЗ` С _( U(Y:ы)PlotAreaH .Border.LineSty‚ldxlNonI@.In—ior.ColorInd|exEыJ8% 'Bђyur ”@a&$y a| .ƒ.Delet 'Ф is( in@pr`ЄY column (a@ Ÿce theЄseriesф).h'   р3Ш.SB lection(1)OSet„RangС%AllDat˜aIn Р(Yуs.Cells(`2, 1)ЉW pc 'Applica; s(#Ћ‚ Њax)ЎaxЕF€™Each !у In^ NШ€MЁi@1 Р '.PoinТtрount+€ @ (i) - С) / (Mƒ!х* 255nУ`@С< 64ЭC qCRedр БрGreenР4 *ю  @B€‡ †О@CE Ч128У<A (127@ I4& Ѕ”Ÿ”›9ў2Ÿ„ГЏ рП4џcДB р @ O ‘љO ж…ЂяџІDя МL1aOИ,)€&O ц|R€esume Np– .MarkerBackgr А-dp3= RG$B(, 2 , пё ?Р p3eЏSOF7WDiam8ondПЗѕ‹ 'aС. + 2паSјhad€ŠŸƒcŠZ#ѓPС iјЧ@•'б„ЈŠ сSub itten by Colin GrayerЭџџp– м  (d м$  (dІ T   A@ш K!oџџ–@р- Append current spreadsheet data to Data Area]ђ€ЗбJ  !d$0%Ў'  !dЖ›G  !dЖ,  (dj  !d    (doџџX–˜рC Help button has been clicked. Display context help for this dialog џџ!(A@joџџш–ирC Cancel button has been clicked. Exit without performing any action џџA@roџџx–р OK button has been clicked]ђX]ђp]ђˆЌ'n_џџ  n'  !d nЖ,$j' Ж›Gxj $Жœр 4 Ref box contains an invalid address - warn the user   (   ( Ж The Data Area address is invalidA@в|џџ8kџџ0Йџџ(  !d'м  ' '  '"  '$ І T   A@P џџA@roџџИџџџџАџџџџДAttribute VB_Name = "dlgDataAreaˆ" ˆBasˆ0{4D91842F-C5EE-11D8-B659-000476€8BFDFA}J3C8J dGlobalSpacAoFalse ŠC!žtablPr@edeclaI"dжTru BEx0pose0TemplateDeriv–Customiz‹D ‹€' Form ˆЌ' Copyright 2002: Statistical Services Centre, @The Un€Ersity of €Readingƒ%Written by+lin G rayerOp tion €wlihcit Pjn Sub UserС'_activ@€() refAƒ.Texbt€Qcmn‡‚tРxtCurr€(С‹!E Initps(‡Ш ‚ utReMreCo6ols" ESavР9op…First, No€Fndar№d, _BР'ƒ@ХЩ D%Ы EndС<@btnAp@pend_C€HkI@'  cƒ8 sp@dsheeˆt dРШ to/ ?‚Dim ЃФ6 As@vrBjР,‚‰= Range(аR).Ad@dress(€_eРrnal:=AВhIf Ъh<> "*"‹nЫ=‹& М",@ор,<Ъ&щУY(Help (A ŒtрOhas be@Tca,ed. Dis`ly c AсKh for this dialo [e&GetqТ Me.сСG€IDўCancel,ƒwExit without (perРm@8 aШny eonфРUnload M' ŒСf—LOKЌOKG5Ї СIPosСHIpntegz€СO џџџџ<\џџџџџџ*Lџџџџџџџџџџџџš џџџџџџџџš џџџџš џџџџџџџџџџџџLџџџџџџџџџџџџLџџџџLџџџџ”џџџџPџџџџ<`џџи`џџџџџџџџ 0јўkА џџџџџџ99N„)ƒџџџџ џџа и €kџџ %)ƒ<џџџџџџџџџџ€Ж€Ж› ј `„Іџџџџzџџџџџ$`„Zџџџџxџџџџџkџџ`„˜ џџџџvџџџџџр `„” А tџџџџџlumn`„š џџџџrџџџџџdard`„œ `pџџџџџA`„ž џџџџnџџџџџkџџ`„nxlџџџџџ" + џџџџ`џџџџџџџџа-4џkџџџџ‡Œ)ƒџџџџ џџ8џџџџ€' %`„Іџџџџxџџџџџetur`„N vџџџџџellsЂ€2 ˜џџ№@џџџџџџџџт€4 џџџџџџџџ@џџџџџџџџџџџџ8џџџџџџџџ(џџџџxџџџџА ( p џџџџџџџџџџџџЈ ˜џџџџј`˜ ј џџџџpш  иџџџџ H ƒ& џџџџџџРџџџџџџџџџџџџџџџџџџџџџџ(џџџџxџџџџА ( p џџџџџџџџџџџџЈ ˜џџџџј`˜ ј џџџџpш  иџџџџ H џџџџџџџџџџџџџџ`„6 џџџџtџџџџџ€Ши`„6 џџџџtџџџџџ€`„6 џџџџtџџџџџ€Hџџџџџџџџ(џџџџxџџџџА ( p џџџџџџџџџџџџЈ ˜џџџџј`˜ ј џџџџpш  иџџџџ H џџџџ`„6 џџџџtџџџџџ€џџџџ`'Ш`„6 џџџџtџџџџџ€џџџџџџџџ(џџџџxџџџџА ( p џџџџџџџџџџџџЈ ˜џџџџј`˜ ј џџџџpш  иџџџџ H џџџџ`„6 џџџџtџџџџџ€џџџџРx'Ш`„6 џџџџtџџџџџ€џџџџџџџџџџ(џџџџxџџџџА ( p џџџџџџџџџџџџЈ ˜џџџџј`˜ ј џџџџpш  иџџџџ H џџџџ`„6 џџџџtџџџџџ€џџџџа"%`„6 џџџџtџџџџџ€џџџџџџрџџџџџџџџ(џџџџџџџџџџџџјА˜џџџџxџџџџџџџџџџџџH@ˆџџџџpџџџџXџџџџџџџџџџџџџџџџЈ`џџџџџџџџџџџџxџџџџџџџџџџџџ0Ш`„6 џџџџtџџџџџ€џџџџџџ> @ вzˆіp0џџ@ўџ0Pџџџ џџ џџ@ўџџџџџLџџџџџ џџ@ўџ <џџџ џџ џџ@ўџИ,џџџ џџ џџ@ўџаџџџ џџ џџ@ўџш џџџ џџ џџ@ўџќўџџ џџ џџ@ўџьўџџ џџ @ўџамўџџ џџ @ўџЬўџџ џџ p@ўџШўџџ џџ @ўџџџџџФўџџџџ @ўџџџџџДўџџ џџ @ўџџџџџАўџџџџ`@ўџџџџџ ўџџ џџ ˜ўџџџџџœўџџP`pџџџџЈ/џџџџ@ўџшŒўџџ џџ џџџџ@ўџџџџџ|ўџџ џџ џџџџ@ўџџџџџxўџџ џџ џџ(H 2 4 " $ J мџџj Жџџџџџџаџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџшџџџџџџџџи џџџџˆ џџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшp`H џџџџzџџџ џџш(PџџџџX@ўџ№\џџџ џџ X@ўџ`Xџџџ џџ x8 џџ@ўџˆTџџO џџ  ` џџ@ўџАPџџџ џџ Шˆ џџ@ўџ LџџO џџ X8А џџ@ўџИHџџџ џџ џџ@ўџ8џџџ џџ џџ@ўџш(џџџ џџ џџ@ўџH$џџџ џџ `  @ўџџџџџ џџO џџ ˆH џџџџL џџџ џџ џџ@ўџаџџџ џџ џџџџ@ўџџџџџџџџ џџ џџџџ@ўџџџџџџџџ џџ џџџџ@ўџџџџџјўџџ џџ џџџџ@ўџџџџџшўџџ џџ HџџXА%@„џџџџlџџџ џџ€ џџ`„ьџџџџxџџџџџ€(џџџџ``„Ў@tџџџџџ€ №`„, џџџџpџџџџџ€`„ьџџџџxџџџџџ€И`„ЎЈtџџџџџ€ `„, џџџџpџџџџџ€`„ьџџџџxџџџџџ€`„Ў№tџџџџџ€Ј`„, џџџџpџџџџџ€№ˆpџџџџ@џџџџџџџџˆиhИ8X№P џџџџ€Xиџџџџ№Аџџџџџџџџџџџџџџџџџџџџ№џџџџ(P џџџџџџџџџџџџџџџџџџџџ˜€@ўџp џџџ џџ џџ@ўџџџџ џџ џџ@ўџ0џџO џџ Hџџџџўџџџџџџџџ `8И0 @ўџШџџџ џџ џџџџ@ўџ џџџ џџ џџџџџџџџЎ0` b вd 2 џџ@ўџШўўџџџџ шр 'џџ џџ@ўџџџџџќўџџџ џџ@Ш'@ўџьўџџ џџ џџ@ўџ8мўџџ џџ @ўџрЬўџџ џџ џџџџ@ўџPМўџџ џџ џџџџ@ўџhЌўџџ џџ H@ўџ€œўџџ џџ џџџџ@ўџ˜Œўџџ џџ џџ@ўџА|ўџџ џџ џџџџ@ўџџџџџlўџџ џџ @ўџјhўџџ џџ @ўџџџџџXўџџ џџ џџ@ўџTўџџ џџ џџ@ўџџџџџPўџџ џџ џџ@ўџџџџџLўџџџџ џџp(OўџўџџџџџHўџџh`A%ШPOўџ@ўџџџџџDўџџџџ ˆf šh 4 p@ўџ@ўџџџџџBўџџџџ XиШmџџџџpџџ џџўџџџџџ`џџџ` џџ%ш џџ џџ@Hџџ`„ьџџџџxџџџџџ€џџџџh`џџ`„Ў(tџџџџџ€џџџџШ€#џџџџџџ`„, џџџџpџџџџџ€џџџџ@ўџ0Pџџџ џџ A%`„ьџџџџxџџџџџ€№˜#`„ЎАtџџџџџ€ЈА#`„, џџџџpџџџџџ€@ўџ№"Lџџџ џџ џџџџ@ўџ8#<џџџ џџ џџџџ@ўџ`8џџџџџ џџ@ўџџџџџ4џџџџ џџ`„ьџџџџxџџџџџ€џџџџ`„Ўxtџџџџџ€џџџџ0 Ш#џџџџџџ`„, џџџџpџџџџџ€џџџџ@ўџш$џџџ џџ @ўџј џџџ џџ `„ьџџџџxџџџџџ€`„Ў tџџџџџ€џџx!Ш#!џџџџ`„, џџџџpџџџџџ€ џџxЈџџџџрџџџџџџџџџџџџџџџџрHџџџџ`Рџџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџ€#Hџџџџџџџџџџџџџџџџ #@ўџ!џџџ џџ џџ@ўџ(!єўџџ џџ џџ@ўџ("фўџџ џџ x!`„ьџџџџxџџџџџ€%@„џџџџlџџџ џџ€џџџџИ!˜#&џџџџ`„Ў@!tџџџџџ€@„џџџџlџџџ џџ€џџџџ`*џџ џџ`„, џџџџpџџџџџ€ џџ`„ьџџџџxџџџџџ€@`„Ўр!tџџџџџ€(`„, џџџџpџџџџџ€@ўџ "дўџџ џџ %`„ьџџџџxџџџџџ€`„ЎH"tџџџџџ€џџџџX$8%џџџџџџ`„, џџџџpџџџџџ€#@ўџИ"Фўџџ џџ @ўџр#Дўџџ џџ %@„џџџџlџџџ џџ€џџџџ@ўџh#Аўџџ џџ @„џџџџlџџџ џџ€џџџџ0H šџџ џџ џџ@ўџP# ўџџ џџ џџџџ@ўџј#ўџџ џџ џџџџ@ўџџџџџŒўџџ џџ џџџџ@ўџ˜#Šўџџџџ џџџџ@ўџА#ˆўџџџ џџџџ@ўџШ#†ўџџџџ @ўџџџџџ„ўџџџ @ўџ$tўџџ џџ @ўџ($dўџџ џџ @ўџџџџџTўџџ џџ @ўџџџџџDўџџ џџ `„, џџџџtџџџџџ€P%x%`„, џџџџtџџџџџ€Иџџџџаџџџџџџџџџџџџџџџџx%`0џџџџHџџџџ %(8' &P'џџџџа%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH(p(h'џџџџџџџџџџџџџџџџџџџџи'x"@„џџџџlџџџ џџ€ џџ`„ьџџџџxџџџџџ€А& %`„, џџџџtџџџџџ€ џџ`„Ў8%tџџџџџ€&џџџџ€`„, џџџџpџџџџџ€џџџџџџџџ0x z zˆ4 2 Ђџџ@ўџш%@џџџ џџ @ўџџџџџ0џџџ џџ x)@„џџџџlџџџ џџ€џџџџ@ўџ8&,џџџ џџ @ўџџџџџ(џџџ џџ @„џџџџlџџџ џџ€џџџџ@„џџџџlџџџ џџ€(`„ьџџџџxџџџџџ€`„Ў€&tџџџџџ€˜'h'`„, џџџџtџџџџџ€`„, џџџџpџџџџџ€€`„ьџџџџxџџџџџ€`„Ў№&tџџџџџ€`„, џџџџpџџџџџ€@ўџЈ'$џџџџџ џџџџ@ўџ№'џџџ џџ ш @ўџ€'џџџџџ џџџџ@ўџџџџџџџџџ џџџџ (€'џџџџџџ@ўџР' џџџџџ џџџџ@ўџџџџџџџџџџ &И%њ`џџџџџ @ўџџџџџјўџџ џџ @ўџџџџџєўџџџџ `(€'+`„, џџџџtџџџџџ€@ўџџџџџ№ўџџџџ ˆ(H(1џџ џџўџџџџџьўџџЈ` џџџџџџp(1ўџ@„џџџџlџџџ џџ€(№(˜(X!џџџџ4 2 ‚  мp џџ@ўџ8*`џџџџџ џџџџ)и( џџ)()8* (`„, џџџџtџџџџџ€P)8*`„, џџџџtџџџџџ€ џџX+(+џџ џџ`„, џџџџtџџџџџ€ џџX,`„Іџџџџxџџџџџџџџџh P џџџџџџџџџџџџџџџџџџџџџџџџ€ џџџџџџџџш џџџџ˜(џџџџџџџџџџџџј*р*h*џџџџP*џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџи(џџџџџџџџџџџџџџџџџџџџР(А(@ўџ(+^џџџџ @ўџ€*Lџџџ џџ X@ўџ˜*<џџџ џџ (@ўџА*,џџџ џџ @ўџШ*џџџ џџ @ўџ+ џџџ џџ џџџџ@ўџџџџџќўџџ џџ X@ўџџџџџјўџџ џџ џџџџ@ўџџџџџєўџџџџ џџџџ@ўџџџџџфўџџ џџ џџџџ@ўџ@+тўџџџџ џџџџ@ўџџџџџрўџџџ €+@+`„Њџџџџtџџџџџ€ џџџџџџ@+4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0,џџџџџџџџџџџџџџџџџџџџџџџџџџџџˆ,џџџџџџџџ-(-џџџџр,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0,Ш,H,` џџџџzџџџ џџ џџx,0,и0`„Њџџџџtџџџџџ€И,џџџџџџ џџ`„, џџџџtџџџџџ€џџ`„Њџџџџtџџџџџ€ џџџџџџˆ,џџ џџџџџџ0м@ўџ,џџџџџ@ўџј,dџџџ џџ џџ@ўџ -Tџџџ џџ џџ@ўџ@-Pџџџ џџ џџџџ@ўџX-@џџџ џџ џџџџ@ўџџџџџ<џџџ џџ џџџџ@ўџp-,џџџ џџ џџџџ@ўџˆ-џџџ џџ џџџџ@ўџИ- џџџ џџ џџџџ@ўџџџџџќўџџ џџ P,@ўџџџџџьўџџ џџ џџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp.Xџџџџџџџџџџџџџџџџџџџџ0//H/џџџџ/џџџџџџџџџџџџџџџџџџџџџџџџЈ.џџџџџџџџџџџџx/џџџџџџџџџџџџџџџџp.а.ˆ.` џџџџzџџџџџ˜.p.џџџџР.џџџџўџџџџџpџџџX!`џџ/Ј.џџџџpџџџџ џџ`„Њџџџџtџџџџџ€џџџџ@ўџџџџџlџџџ џџ H@ўџџџџџ\џџџ џџ @ўџџџџџXџџџџџ џџџџ@ўџ`/Hџџџ џџ џџџџ@ўџџџџџ8џџџ џџ џџџџ@ўџИ/6џџџџџ џџџџа/x/ а/`„Њџџџџtџџџџџ€ џџ@ўџџџџџ4џџџџ р/И/ џџџџИ/ џџџџ`„Њџџџџtџџџџџ€P2Р0 џџџџ џџџџ0џџџџРHи Јџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџа1 1ш1џџџџИ1џџџџџџџџџџџџџџџџџџџџџџџџР0џџџџџџџџџџџџ2џџџџџџџџџџџџџџџџџџџџˆ10ўџџџџџhџџџ@"`џџ02џџџџX/џџџџШџџџџџџџџ№џџџџџџџџџџџџјА˜џџџџxџџџџџџџџџџџџ№pџџџџиџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџp~ XџџџР1@ўџџџџџdџџџ џџ @ўџ№2Tџџџ џџ џџ@ўџџџџџPџџџџџ џџ@ўџ2@џџџ џџ џџ@ўџ`30џџџ џџ џџ@ўџ`2.џџџџџ ј3`„Њџџџџtџџџџџ€x22џџ џџ@ўџ 2,џџџџ џџ2`2џџџџ@/И2`2џџ џџ@ўџШ2*џџџџџ џџр2 2@ўџџџџџ(џџџџ џџ 3Ш2@ўџ3џџџ џџ џџџџ@ўџџџџџџџџ џџ џџџџџџџџШ2((23x3џџ`„Њџџџџtџџџџџ€џџџџР1@ўџџџџџјўџџ џџ џџџџ`~ џџџџzџџџџџ3И3џџџџџџџџџџ`„Њџџџџtџџџџџ€џџџџИ4 3џџџџџџџџџџ4 2 ‚ мџџџџџџџџџџ@ўџШ4jџџџџџ 3ј5`„Њџџџџtџџџџџ€ џџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx3џџџџџџџџџџџџџџџџџџџџџџџџџџџџ5џџџџ№4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџр3џџџџџџџџџџџџџџџџx3Ш303р4р3ўџ@ўџџџџџhџџџџ PAШ4џџ@ўџ 5Xџџџ џџ џџ@ўџ85Hџџџ џџ р@ўџP58џџџ џџ џџџџ@ўџh5(џџџ џџ џџџџ@ўџ€5џџџ џџ џџџџ@ўџ˜5џџџ џџ џџџџ@ўџА5јўџџ џџ џџџџ@ўџШ5шўџџ џџ џџџџ@ўџџџџџиўџџ џџ 8@ўџр5Шўџџ џџ @ўџџџџџИўџџ џџ PBџџџџИ0€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџ€)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџџџџџџџџџџџџџx5џџџџ*џџџџЈ5џџџџџџџџџџџџџџџџџџџџџџџџ8*џџџџџџџџџџџџа*џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџР*џџџџШ4( џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџB8BB`@џџџџxџџџџџџџ(BBџџџџџџџџџџџџџџ2 CјўџџџџXCџџџџ@@ˆ џџџџџџџџџџџџџџџџCџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџC@C CџџџџИA`Оџџџџxџџџџџ0CC“ џџџџџџџџџџџџџџџџ2 pC1џџџџ ьўџџX!`jџџџџ1€џџџџˆBpџџџџџџџџџџџџи˜џџџџџџџџџџџџџџџџџџџџ@ џџџџџџџџџџџџџџџџџџџџџџџџџџџџИ˜ 7B*\R1*#175*\R3*#2b$*\Rffff*1142384913(*\Rffff*1142384913\0*\R1*#1d6*\R0*#10*\R3*#26*\R1*#1df*\R0*#f$*\Rffff*1244Xp !xˆ€ B2и€ 6№€ H( %p 7€ 6˜ А .И€ Hи > @ H AP Bh €€ & 0–И ш № ј€ & 0–0 `hp x!ˆ€ џџџџ€ &˜ Р€ .а> (^(P€ X€ x ˜ЈА€ џџџџ #И€ 8Ш%  € џџџџ€ ( @  X "` € 0ˆ  И Ш  а и р  ш      U  @  H € >X  ,˜  Ј А И  Р € 0р    € џџџџ ( € џџџџ8 € џџџџB @ € <H € џџџџ€ˆ € €˜ € џџџџ!  !И  0а  !р aј   (  0  @  H  X h € џџџџp € џџџџ" x € @€ € NР € џџџџ€ € € €( €0 €8 €@ €H €P €X €` €h €p €x €€ €ˆ € €˜ €  €Ј €А € џџџџ!И € ,а   - , ( 0 H€ ,P €€ "  Ш а и€ № C (€ 8X `€ "h.› Р и р ш€ $јQ € P@   € (Аи€ 4№(^.0   Ј€ >И ј€ 2H(ŽX €˜E ИРШ€ :а € 00 %`€ ˜ Ј А€ 8ИE№Q (€ џџџџ€ (0 X€ 6h(2  Ш а€ 2р  0€ џџџџ€ $8 `  x€ џџџџ€€ ˆ˜€  Ј€ џџџџИ€ џџџџ"Р€ Fи€ B € (h€ џџџџ€€˜€ €Ј€А€И€Р€ џџџџ Ш -а ,р № €   (@ &h€ 4 Ш$Oр€ >H$P€ :pА<ˆШ  (08@ H€ :X ˜   Ј И€ &Ш №€ *  0 8€ B@€ &ˆ  А  И РШа€ џџџџи€ џџџџ"$р€ 4ј€ џџџџ€0€8€@€H€P€X€`€h€ џџџџ/p/ˆ $  "А€ џџџџ€ <Р€ 40 hp€ x9˜9Ии€ B№ 8 ,.P €€ &˜ &(Р :Bш (€ &@ ;hFfˆ а и *X* >2P5р ш€ џџџџ€ .ј(€ 8PX h p x € ˆ € џџџџ€˜ € џџџџB Ј€ DА€ ј€ џџџџ€ € € џџџџ( @ >jX € ˜  &И и € 43€ JШ3€ р *ј  (! 8! @!H! P!`!€ џџџџh!€ џџџџB  p!€ Hx!€ >Р!€ џџџџ€"€"€"€ џџџџ"8"(P" x"€ ˆ" Ј" А"И" Р"а"€ џџџџи"€ џџџџB  р"€ Fш"€ 0#€ џџџџ€P#€ џџџџX#p# ˆ# #˜#  #А#€ џџџџИ#€ џџџџB  Р#€ @Ш#€ :$€ џџџџ€H$€X$h$p$€ џџџџ"x$€ џџџџ  $ А$Р$)а$ш$%5%€ џџџџ(%€ џџџџB 0%€ <8%€ џџџџx%€ џџџџ%€ џџџџB ˜%€  %€ џџџџ4 5€ џџџџР%€ џџџџ€ DШ%€ 0&€ џџџџ"…@&€ DX&€ : &€ џџџџ€р&€ш&€№&€ј&€ џџџџ'€ ('@'2JX'(B'€ 2И' &№'(*0(€ 44€ BP4€ (,6`( ( 4 ( &6Р( ш( ј( )) )0)€ H)h)2J€)(BИ)€ 2р) &*8**`3€ 4˜4€ Bа4€ @*ˆ*˜* А* 4Р* &6р* + + 0+8+@+ P+€ џџџџ`+€ џџџџB h+€ џџџџ@p+&l+И+Р+€ џџџџШ+€ џџџџ"  а+€ . 2€ џџџџ€,€2€ џџџџ ,€ *1€ 2Р1€ ","ј1 @, 2 .И2 !и+ №+€ 0ˆ28P2)ш2 , 3€ 03 @3 p2 x2P,€ џџџџX,€ џџџџ"… `,€ Th,€Р,€Ш,€а,€и,€р,€ш,€№,€ј,€ џџџџ - --4 - @-€ :P- "- Ј- И-*Ш-+ј-. . 0. 8. H.X."`. x.-ˆ.  .€ 2А.ш.€ &/(/0/8/@/H/ P/0`/ /+ /Р/ Ш/ а/и/€ р/ .0 20 80@0H0€ џџџџP0€ џџџџB X0€ B`0€ џџџџ€Ј0€А0€ џџџџИ0 Р04Ш0"ш0 '1 101 81 H1P1 X1`1h1p1x1€ џџџџ€1€ џџџџџџџџ˜5р Module modColumnрG Copyright 2002: Statistical Services Centre, The University of Reading”р3 Written by Howard Grubb, Martyn Byng, Colin Grayer]ђЭџџPЭџџH№^ђ^ђ0^ђH^ђ`^ђx^ђ^ђЈpџџ]ђp]ђ˜р;=========================================================== AЄЄр" Procedures to handle column names–р' Get range names from the current sheet]ђx]ђ˜]ђА]ђШ]ђр]ђј]ђ]ђ( > !Ќ œр2 There are no workbooks open - flag error and exitЖThere are no workbooks open @ A@вЗ'zџџ€kџџxрK Resolve problem if something else is activated (seems to be a web problem) zА›GЌ$> B@2j ˆ!B œр6 Sheet is protected. Allow macro to use CurrentRegion.ЗбF ˆBD kџџ˜рB No data area is specified. Use the current selection if sensible,р< otherwise the area at the top left of the current worksheet і$pЖRangeœр? Select top left cell if a non-range (e.g. a chart) is selectedэЌЌ ˆ%Ф.dџџˆэ і.kџџpр< Limit Selection to the area currently used in the worksheet !B!Ќœр0 Too complicated to do this with multiple rangesрA Just live with some inefficiency if e.g. whole rows are selected ˆ!Šѕ5Œ5Ž! Ќ '†5N5P! Ќ '8 qџџH !Œ † !N 8 œр B Whole selection is outside the used range, so set Datarange to A1эЌЌ ˆ%Ф!Ш.kџџИ ѕ5Œ5Ž! Ќ ': 5N5P! Ќ '< † : œр  Reduce number of selected rowsэ5Œ5N ˆ%Ф † < ˆ%Ф$0. †': kџџ 8 < œр  Reduce number of selected rowsэ5Œ5N ˆ%Ф : 8 ˆ%Ф$0.kџџ˜qџџkџџˆ !Ў'Иэ И$0.р Determine location of data range $H œр' Default to region at top left of sheetэЌЌ ˆ%Ф!Ш.dџџи !Ž!Ќ !P!Ќ œdџџЈр  Only one cell selected.р  Use the current regionэ !Ш.kџџPkџџH ˆ!B œр2 Sheet is protected. Protect it again from macros.ЗбF ˆBD kџџшр! Initialise the column name arrayЌЌс2 XЌ'4 $H  "  $ œр* Set up list of column names in this sheet AJ kџџ0 œЌ'n_џџ м nЖ,$j' Ж›Gxj  œЗбJ $0!Ш%Ў'kџџИ $Жœр 8 Set up list of column names from the standard data area $0AJ kџџPЙџџHkџџ@ $H  "  $ œр* Set up list of column names in this sheet AJ kџџи !Ў'iџџР–`р5 Returns True if all the cells in the range are empty]ђШ]ђш]ђџ Иў і!B“џ Œў И!Ž“ Œ!D!Ьœџ Єў Œ!Ф“ Є$L  Є!Ъ!ЬœЗ'H zџџиkџџаџ ЄўШkџџИџ ŒўШџ ИўШЗ'H iџџˆ–(р9 Set up the column names corresponding to the given rangeрG Returns an array of indices pointing to the corresponding column names]ђ]ђЈ]ђР]ђи]ђ№]ђ]ђ ]ђ8]ђP]ђh]ђˆ]ђ ]ђИ]ђи]ђ№]ђ]ђ(]ђ@]ђX]ђp]ђˆџ Иў !B“р% Cater for ranges with multiple areas Иѕ5P!'Ь5Ž!'ЪЗ'Z И Œ ŽAЎ Ъ'R р & Column not currently in list - add it ŒЌ ŽЌœр  Range is empty - ignore itš\ 0kџџ(џ  ўЌ Ь’р  Ignore hidden columns  7P!Ь›Gš^ j ŽЌœр No data in this areaЖ'Иdџџ˜р Column has some data in itэ Ž  7Ф R  7Ф$0$.іЗбJ і%Ў'Иkџџ Ж'ь ŒЌœр No header row has been foundЗбJ Ž  7Ф%Ў', рI Check if there is already an entry for this column in the same worksheet , $` 'N N Ќœр" No existing entry for this column ŽЌ Z œр. Data has been found but no obvious header rowЗ'Z ІЖ*Do you want to treat the first row of dataЖ as column headers? b $в'P P d œ Ž'Œ Ž R œр8 This was the only data row, so now no data in this areaЌ'ŽЖ'Иdџџ№ р, Next row after header is now first data row ŽЌ 'Žэ Ž  7Ф R  7Ф$0.іЗбJ і%Ў'Иkџџ` Œ  7Ф!'ьkџџ@ kџџ8 dџџ0 р3 This column already has an entry in the name array N $2 ѕ ИЖœр* Append this range to the existing address5ЎЖ›G5ЎЖ,9Ўj5Ў И9Ўkџџh qџџ` š^ X kџџP dџџH р2 A header row exists - get the column name from it Œ  7Ф!'ьЗбJ Œ  7Ф%Ў', kџџа р " Set up column name and range name ьЖœр/ No name for the column - default to "Column_X"ЖColumn_5N  Ќ $f 'ьkџџ0 ь$šœр+ Prefix a numeric column name with "Value_"ЖValue_ ь'ьkџџШ р  Add a new record to NameArray ь И , ЗAh  4 'N Ѓ^ x џ  ўШqџџ` Ѓ\ X џ ИўШoџџ@ І – р@ Looks for the header row (last non-blank row with no numerics),р< and the first data row (first row containing any numerics).р" Public since is called by Lookup.]ђH]ђ`]ђx]ђ]ђЈ]ђР]ђр іѕ5P!'Ь5Ž!'ЪЌ'ŒЌ'Žџ ІўЌ Ъ’р  Search for a header rowэ ІЌ7Ф І Ь7Ф$0.j j $H œр0Ignore empty rowsр - Check to see if there are any numeric valuesџ 8ўЌ Ь’ 8$j $š 8$j Жœр7Numeric value found in row - give up looking for header І'Ž ŒЌ і!ŒЌ œр4 Check to see whether preceding row contains headersџ ZўЌ Ь’І Ќ Z і%Ф$šЌ Z і%ФЖœ|џџ№kџџшџ ZўШЌ'ŒkџџШ|џџРkџџИџ 8ўШр 3 All values are non-numeric - could be a header row І'ŒkџџXџ ІўШ Œ Ъœр  The last row is the header row ЪЌœр $ Only one row, so header but no dataЌ'ŽdџџРр < The whole data area is non-numeric, so assume header row isр the first row, followed by dataЌ'ŒЌ'Žkџџ8kџџ0qџџ(oџџ І –јр- Adds a new item to the array of column names]ђИ]ђа]ђш]ђ]ђ]ђ0]ђH]ђ` , $0$x 'n , $0$z 't z!'p ˆ!'v р6 Search NameArray to see if the entry is already thereџ ІўЌ 4 ’ І$2 !, , œр . Entry is already present - ignore the new one|џџkџџˆр Check for duplicate names І$2 !, $0$x 'l І$2 !, $0$z 'r І$2 !ь ьœр ; Duplicate name found - distinguish them using HeaderSuffix , Ж$Ж$Ђ'. І$2 !, Ж$Ж$Ђ І$2 (. n p  l p œр  Remove book name from suffixes . Ж[ n Ж]Ж$Ђ'. І$2 !. Ж[ l Ж]Ж$Ђ І$2 (. t v  r v œр Remove sheet name from suffixes . . Ж!„Ќ $њ'. І* І$2 !. І$2 !. Ж!„Ќ $њ І$2 (. kџџ(kџџ kџџџ ІўШр( Append the new item to the current list 4 Ќ '4 р i = ArrayLengthЩ| Ј І$2 ѕ ь9ь Ў9Ў , 9, . 9. €9€qџџhЃ| `oџџX–xр> Finds the index in the array corresponding to the column nameр Returns 0 if not found]ђи]ђ№џ ІўЌ 4 ’ І$2 !ь'€ € Ќ € Ќ$‚ Ж! ЊЌ$‚ Ж!œр  Get rid of trailing ! € € Ќ $м'€ kџџ р End Ifœ € І$2 !. '€ р6 CJG 23/6/04џџ € Њœ І'~ zџџИkџџАџ ІўШЌ'~ iџџ– рB Searches NameArray for an entry with the specified header addressр8 Returns the NameArray index if found, or 0 if not found]ђh ]ђ€ ]ђ˜ ЗбJ , $0!Ъ%Ў'† џ ІўЌ 4 ’ЗбJ І$2 !, $0!Ъ%Ў'„ † „ œр  Header addresses match І'` zџџHkџџ@џ ІўШЌ'` iџџ –А р@ Finds the index in the array corresponding to the column numberр Returns 0 if not found]ђ џ ІўЌ 4 ’ І$2 !Ў Ўœ І'ˆ zџџhkџџ`џ ІўШЌ'ˆ iџџ@–( р: Get the letter(s) corresponding to a given column number.р3 Column 1 is "A", column 2 "B", column 27 "AA" etc.]ђˆ ђ  ]ђИ ђа Ж'т І'8ЖABCDEFGHIJKLMNOPQRSTUVWXYZ'Š 8Ќ œ 8Ќ '8 8Ќ'Œ Š Œ Ќ$њ'т 8Ќ Ќ '8kџџј т Š 8Ќ$њ'f iџџа–ш р5 Get the data address in the i'th record in NameArray І$2 !Ў'@iџџh–H р Get the i'th column nameiџџ р==============================================================р) Procedures to handle controls in dialogsІ %їЗ–Ј р> Inserts the list of variable names into the specified listboxр4 If Factor is true, lists items ending with ! first.]ђ8 ]ђP ]ђh ]ђ€ џ ІўЌ 4 ’р! Insert factors first if required І$2 !ь' Ќ$‚ Ж! І$2 !, $ 'Ž Ќ Ќ$‚ Ж!œр + Get rid of trailing ! when displaying name  Ќ $м'kџџар End Ifœ  І$2 !. 'р. CJG 23/6/04џџІ  Ž  І$2 !ЎЖœ  ~B@^ ~$pЖListBoxœ І$2 !€ ~!„Ќ ~,€ І$2 !€e ~!„Ќ ~(rkџџаkџџШџ ІўШџ ІўЌ 4 ’р Now insert the rest І$2 !ь' Ќ$‚ Ж! І$2 !, $ 'Ž Ќ Ќ$‚ Ж!œр + Get rid of trailing ! when displaying name  Ќ $м'kџџЈр End IfœЖ( . Ж)'. р3 CJG 23/6/04џџ  Ž œ І$2 !ЎЖe  ~B@^ ~$pЖListBoxœ І$2 !€ ~!„Ќ ~,€ І$2 !€e ~!„Ќ ~(rkџџАkџџЈЗ І$2 (€џ ІўШoџџ€–˜ , $0!’ А›Gzj , $0!’ !dЌ$мЖ!œЗ' kџџ iџџ–ј ІЌ7‚'” electi ” Ќœo a k]ђX  ~ѕр .Tag = SelectionOrder;‚ І7€œqџџoџџˆ–p рN Returns an array containing the ids of selected items in a List or Combo Box.]ђ]ђ0]ђH]ђ`]ђx]ђ]ђЈ]ђР <‘'˜  ~ѕЌ'Z ~$pЖListBoxœ5– Жœр 4 No selection order specified. Select in list order.џ ІўЌ5„Ќ ’ І7€œ ZЌ 'Z Z ˜ ›G|jр/Vars array is full І7‚$~  Z+<kџџШџ ІўШdџџА Z ˜ bЌ'š Ќ'œ џ ІўЌ5„Ќ ’ І7€œ ІЌ7‚$X'” ” ž œр+ Only include selection if not already done œ Ќ ” œ œр Lowest selection number so far ” 'œ І'š kџџЈkџџ kџџ˜џ ІўШ š Ќ›G|jр4No more selected items ZЌ 'Z š 7‚$~  Z+< œ 'ž Йџџkџџdџџр  Must be a combo box5rЌ ˜ Ќ œ5r7‚$~ Ќ+<kџџЈkџџ qџџ˜oџџ–ир< Returns the number of selected items in a List or Combo Box]ђ@]ђXЌ'N  ~ѕ ~$pЖListBoxœџ ІўЌ5„Ќ ’ І7€›G N Ќ 'N jџ ІўШdџџА5dЖœЌ'N dџџЌ'N kџџ€kџџxqџџp N ' iџџ`џџџџXр$ SelectionOrder = Val(.Tag) + 1р+ .List(.ListIndex, 1) = SelectionOrderџ ІўЌ5„Ќ ’Ќ'” ]ђ€)р(Update the selection order in a list box5– $XЌ ІЌ;‚kџџР0џ ІўШр) Put next selection order no in list itemЩр'#In case .List(i,1) has not been set5– $XЌ 9– џџџџ00dџџ3р * Not selected - reset selection order to 0Ќ ІЌ;‚џџџџШ2  І$2 !. 'р. CJG 23/6/04р- If NameArray(i).HeaderSuffix <> "" ThenAddrрD FullName = FullName & "(" & NameArray(i).HeaderSuffix & ")"g(Nameр- If NameArray(i).HeaderSuffix <> "" Thenp2р< Name = Name & "(" & NameArray(i).HeaderSuffix & ")"р- If NameArray(i).HeaderSuffix <> "" Thenр< Name = Name & "(" & NameArray(i).HeaderSuffix & ")" І$2 !ь І$2 !. 'ОрH CJG 23/6/04Ж( І$2 !. Ж) І$2 (. рM CJG 23/6/04џџџџX1џџџџЖЗAttribute VB_Name = "modColumn" ' Modul$e P TCopyright 2002: Statistical Services Centre, The University of Reading–Written by Howard Grubb, Martyn BynHg, ’inayer7Option Expli cit Pr8ivaаЗ)Type мArray Range‚yAs€_^r‚G€ ƒ} HZerAddress ƒ Suffix „'o Integ_€3$Sel ectedBoolean End ƒ[ Diђmf()UˆmLength†;€н=7A~ProceduР@ to  hand@‡cТ‹ n@s\PubA@e FuncBiInitA)s(By‚V€ˆDummy&rSРŸngB1ƒ‚f'Р Get rhУ€ from tР‘curr€• shaaspeciєfiaU€ъeтŠ!ІЁС,ensi`.,„' €$erwiD!рGa atТmtoРp leftЖЩ пKGp@/С“!|(ƒb @) <> "тp"Я'‚`$„ ceр!р@a non-у~(e.g. a cšh Р)ЂЂedЅ(ОS`„iB рO *C Рs(1, 1d'GSyргt щ& Ј,'№ LimрXЁ:Ё #"$$‘ly  6d Я€гA#& .A~Ew=Kwawoo coVmЁй RdA dРHh ``wi Иmult|ip`­Т# Ќ"wJ ust l ы т Ah€e бcienLcyсjb)whРЩ Xrow jР|sЬ)WїQ9 $dВ„Th= .ёT+b5 -| 1›БU`Р„ їР“џ Aёѕ%›w‘>Р€"\OrЗ{`PaŠ ТАZ&Р ' W"“В/s oРutsideв-‚хђ, G s%vA я&t@ѓ;ш&.џ*? X%€ Ђ5€?уѓ&0€oP_oolПCя{Д<Є6БR8 ` БZduce numberПС@е#ђ$л2$(п9Щ!$, D), Qн , P  )#=p ї#Sц =є H лPџг00tрШ=$Рпџ"Tšб4пІPIпГ џпэ${ Uк‹ бV4їЈсЕˆ=ш34ђ OаБ(˜CВ'De jmine loўcт€!!ЂhВ3R0В€IsEmptyВ):' DefіaРM7rrrТgˆg‡fŸа %R_o8 E8`пР Б ђ‘5I>pY/F^nщщ1)’"O0{ ўo€"mE2†2­yCџ2№ -— ПEр˜яЈ5љ/e…œ€dЂLv( Ppaga—0n‚И"ŽsяŒveуPsTяŒ:=BЂГ$Э 'т бЄial…ˆXХ ŽsАл2 ReaВБ†BЮ(0 To 256ЃC‰Я= 0U(€ пя(аЧ№еcmnРIgnore„!{уёаDisplŒayБFirРwѕ!'т…u€р№Q1ЉбŸC‚}-в 0uppHћrЁ sш22 ША+дГ Хj5aФ@†В0"Do•С0Ѓб =Ж NextField(cmnDataArea, Pos, ",") If € = "" Then Exit Do N–Expјand`VFІ–@Range().CurrentRegion.A€ddress(Љernal:=True ™End If ‚Valid XБ …' Set up list of column names from the stfardd d‘ a€‘ #Cˆall$upC‚N( ?YLoop(ˆdЗ(Not "IsEmpt†y‚‘)) A€z‚€ЖIgnore„›с€ DispˆlayЎFir€s‰Ц[@inР?is рsheetХsBР С€ r.F@ƒƒow.@EntireР.№Hidd€рЯж†*ПРA С‰@(%LСЁ) Or d ћcZФ )АhC b1ф€<рFalse#ЃџB†ЧsС-ƒbъReply1РHeader`7JЂ‘b+oBgŠLaв~O O аheckЃ1›Рure С lЗ˜dy аr№СryI>t` eЛR#рКрЗ wИorkjЋbAc p'рCBƒInЁAr§№w(z ЏРгП;хй‚ex№ФА"  рХоАЩ <>№A§1ОN0GЋOџЕ`.С$B.Ч but no obviouўsX’Vf“v†S= MsgBox("Do yopu wa0Qt=Вf’Ч‘$Pжaд" ˜& _(" А:tŽ“(s?", vРbYesNoЯЃп€E ’OV( їa`ZЯ Ÿ e= dЯ/ъ->sron‡dbхА, soўwб2oPмхК# eя ˆGЖss = "" „ Elsetа' Next row afte@r head is n&firsРt dataD’*F*D)R7=  + 1;Set ThisRan geв(.Cells( I, cc), Las6t„8 )2AdXdre‚š7.„ (€ƒernal:=True˜%End If—5Colu`mnNameUHЋT.Valu/Ь/” y'ТT c!‚# alrР y has an entry in the nС*arrayQ5With 3AA(cnt‘GIf IY<>Ї !enK' Ap”pe@TtР r€toB%existрing aCmРU…q  Ц=‡&ј ",Ь“ 5!mCAPGoToрcўcŽQRz (ЅvСxЂ&рs - g€j;ф?b:   h˜р !' њwhe€ƒr pй [edQ ш= ActiveWorkb№ook.A$3ХBB ' Seaprch С ТЊArs ee iften try iРzlr%Р’yreТFors= 1 ToТ ТLengЧРА„IfG(i). @У@мЫThen‚CПh' EMp@Р€# - ignore3Т' on$CEx k W! aKƒ= }ІaA Ї7ЦL#р'С move af‚”Є fРu sт{e#–7рCŸ rЃ@[" & …& "]џn"` п"E,6E ХU џ%%QA"cD%%}ц%sЂЊСe& l&MЬidФE%%In Hl"!") + 1џIH` @9&a ј$ќыѓџUS п/ БKFs "("J )" 'CJG 2Р3/6/04Ј8O џD p9гЏЇ˜ РNext i2B`~ЂŒ–VЉ~curr§сXlEв(` й h '  i‹bO n ErrрXGoћpdаS•Р–КOт}€.?PR•і$IСdџr“–їњ\“*@џCу6Ж‘ {d’Вся‘ Т"Ђ№ :ИЂ /#WЄFun`}onЩ@ЊndгByс—Є[б‡ˆ)ЁI•'Ђs’index i&nТšcoРspјondС_Ф›8›в Q?€turns 0с€јnotSdЄ 0 џœD№Full Gƒ{ƒ§Ж=ŸoуГВРM b() >Рˆ‘MRаightv,E`=аE ЧP В<>F СЌO' GЄridёЌtrailБ!Х№˜ Lefћ k -(Mё!сˆс0# пaв2з„Є'q "рm‘‘џє[>EП*@S8џ0U  x ПЕџJrŠhдД S (џ Pау,PуFЂ›Е/зuЈ јIFŸ0“6їGO5H5IrCУƒж Agџ5FЫ…ГesG*а1rА an PQ0Гwpт7specifiх`дhви aHI76сг—&а:2;f7, №Q§O8 O8аAА•Nџіц0ŠЯ!№иšRЬš).рЙireУ.”(№cernal:=Trueџc|я>Р1hТX ЅŸ'%ь?aёѓ$Уe= ЇHЖ Then ' Header addresses matchˆFindColumnInNameArray = iFExit FunctioМEnd IfJАNext`N0( 5I Pr ivate] @ByAЕ(ByVal  As €String) €Integer^'=s the Ykex€ajc„or‚pond( to c‚} numb†"Returns 0 if not fou nd„`€­Dim Fi >For€ =@ 1 To ЅLengtИIf ЁВ(i).…i=†n?Œр‡AЮЦVІfGeђtDŠd(‰?ТaƒdA ' @ Wlett@er(s) Ю^aР givenСžФ_.Фƒ@Qis "A",E 2 " BH7A" e,tcB AgAlРphabetiC&€, ResulHХG mШr, jHУЁD= ""jЧ`ЦРABCDEFGHIJKLMNOPQRSTUрVWXYZDƒ €‚(j > 26)ƒŒэAj - 1 нѓm@К / !†&Mid(E!, `m, 1)Ї# Mфod€ + (x!6Їe;@ Є & Ћ jЇ 0yublic …{' d\_FBFdataХ•Хwi'th rњe`HdA&hЃfSџ'jmƒŸЦ ?"џЂХ‰ Љb Ъ р+J3у.A &ЋƒƒЗSuffix 'CJG 23/6/0f4Ѓ Я'=7 ' Proce duрЄЄhandle ontrols/dialogs `З#>SubX PuDƒСs Uo€Listbox`З€Ref BoxЁjФCo , _#A[9zOpAЮ€ПCРFact Ќ= False\' Ins(ertУОlР of variab`n 1ФНspe€cified !w`f` ‚ @Žt0rue, tems ecЦwiQ€! firstHŽџђСN‰"=†итС IsЄ@BoolРdt_є ёї"("_X& "о) eф› Р(ѕ$А§ѕ)7Z ѕS  ї#`ЬlР‰AsЧ HДElsУКЦ˜' NGƒ)edk resetŽЌto| 0 +K* K‚giТЊƒиРгLзI1€EsInРВ…еControl, V`ars()ШП„к Returns aжrray c€ ainingрРids of5 A/sУpс_Рr Coшmbo!h.Ђ2mЦkЭoMax`1?LF€„эyс#І’ in1њLasч‘PosЭbЄ= UByud(С+#*Ї‰уDkРL&<aTypeNиame!4С…"Ё( 6ю"эa`ЄT"n@ ONMspecifi№ed. у&fЂЇу3џу ПŽF€Л}cСkУЄ‡%@k > „'С— ExitI"У 'a( abPiРs fullB-Ь Ё(k!'FindColumnByћ"*Фj)1щЫj#ˆk|Do WhiРle k <ЄNqkP= -Фу ІM§ЉP=Р1f !CџУ;ѕРЦУр№‚э%žANŸуДO%C@ L> Ы2ЯgF€' OnlByа'cludY|ifealreadрy donLUYPёН OrЄ-F    )А' Lowe„fnumbe€r so faу‚џ<цќKџ*h"s]џЇя*hЯХŸ’ пР- -1BHI9No morџѕ_Žo?E џ:ќ:JП;l'= {Loopым=' MuѕAЄeрЄcђkѕЄƒ атD’ >P; AnђdЅK> šо—Ђ2 џЏI"7zŒ `ЄД“Cc %Ж Nв+Ѓ(AРd1kЄ9У'џ6ЖЄ//~’Жa *~#яRб{ЕAcЋмzџqхOjrРoqРЕnqRЗВ№№(™ВЃВ ѓQbМƒс'д1)" .фTeаБ= яwƒV}џЌ%гf`иЌЃ` PZ Ёё‰длФ5Pџbєlџkzџўc„ўXˆ($џ%klџDџ%H aPџю§ѓ LџLџўЂ<џ .§јTў(фў%klџDФў%H a ўю§ѓ АўАўўЂў:tў]ћ$џ1`џ,џ",џ$ @,џWџ3`1Tџ,џ5џєnџ“ўcџ?knџч”AŠlpџћ0ф9,џ'0џ%knџч”AŠF@џ%$  Q,џ(џ(џ 11hџ(џ9,џ'0џ%knџч”AŠF@џ%$  Q,џ(џ(џ 21\џ(џknџч”AŠlxџћ034lpџ 5 1Pџ.4knџч”AŠ 5 #$џknџч”A§‘ /$џldџl`џћ0lhџl`џћ0Фщ(6ldџ*#$џ7*# џlPџ 5 1Pџ2$џ џB6lhџ*#$џ7*# џknџч”AŠ 5 #џknџч”A§‘ 2$џ џџlXџlTџћ0l\џlTџћ0Фч;'џѕlPџ8ѕў§ѕЊPџM@џ@јў 9јў`1Pџ6џјўf'џѕknџч”AŠ 8ѕў§ѕЊknџч”.єўA M@џ@јў 9-єўјў`#$џknџч”A§‘ /$џ6џјў:lPџ*#$џ;*1Pџ/$џ2:knџч”AŠ *#$џ;*# џknџч”A§‘ 2$џ џ nџdџЪ“єЉ˜KЄknџч”.№ў@qьў lxџTьў ltџTьў lpџTьў lPџTьў k˜ьў ѕqьў-№ўЈPb8 №ўhџtџxџPџ\џXџTџdџ`џpџ,єў$џ џџ,џ(џџјўTl Ctџєrџ“ўchџјkrџч”AŠClџjllџJѕл§јџѕlџMXџ@Hџ < Hџ:8џ8]ћ/(џћ'џѕtџMјў@шў < шў:иў8]ћ<Шўћ'Иўџ6HџџшўМ&llџJѕЎlџMXџ@Hџ > Hџ`1lџ5Hџllџkrџч”AŠ *1lџ llџltџћ0ьkrџpzџ rџdhџєpzџФ,blџtџ$Hџ(џџшўШўИў0 ќЦ   0 ќЦА   0 ќЦ(   L ч”AŠCxџ§(bxџ \(  ч”AŠ ч”AŠ *1xџћ'((bxџ (мў’lџєjџ“ўc^џщkjџч”AŠCdџJѕdџMLџ@<џ < <џ:,џ8]ћ/џkjџч”AŠ =§ј џћќўќVpbџ6<џ џBldџJѕл§ј џѕdџMLџ@<џ < <џ:,џ8]ћ/џћ'ќўџ6<џ џо&ldџJѕЎdџMLџ@<џ > <џ`1dџ5<џldџkjџч”AŠ *1dџ6lџkbџ§јLџћ'<џkjџч”AŠћ=§ј,џћ'џџ6Lџ,џнdџ§“@H ў˜?4€ ќјјўјўMLџ @ 1єўlјў=@§/ lєўAћ0/єўјўЋ6H W<џB(Lџћœџ%kjџч”A‰§ј џ%H ўœC6<џ џлkjџч”A‰лH W<џB(Lџћœџ%H ў›D5<џ jџd^џєjџ“ўcрўзkjџч”AŠCdџJѕdџMLџ@<џ < <џ:,џ8]ћ/џkjџч”AŠ =§ј џћќўќVpbџ6<џ џBldџJѕл§ј џѕdџMLџ@<џ < <џ:,џ8]ћ/џћ'ќўџ6<џ џП&ldџJѕЎdџMLџ@<џ > <џ`1dџ5<џldџkjџч”AŠ *1dџlџkbџ§јLџћ'<џџ5LџђКkjџч”AŠћ=Кdџ§“@H ў˜?4€ ќјјўјўMLџ @ 1єўlјў=@§/ lєўAћ0/єўјўˆ6H W<џB(Lџћœџ%kjџч”A‰§ј џ%H ўœC6<џ џИkjџч”A‰ИH W<џB(Lџћœџ%H ў›D5<џєkjџч”AŽ jџdрўћœм,dџlџ єўјў<џџќўРl Ctџ=Pџ'Tџ%ltџFdџ%$  Pџa@џŽ§ѓE[<џќcћв)Pџ<џ5@џHlPџ'Tџ%ltџFdџ%$  Pџa@џŽ§ѓE<џ<џa,џŠќ‹ѕ,џ`Fџ џ >  џ:ќў8]ћ3)Pџ<џ6@џ,џџ џЛєџpzџР(btџ(Pџ<џ@џ,џџ џьў0 ќЦј   и €єќЫфpvџ € ќјhџєpxџ4€ ќјdџdџMTџ @ 1Pџldџ=@§/ lPџAћ0/PџdџPџhџ Ф@lPџћ0/Pџ"єzџhџW@џB(Tџћœ0џU5@џўc,џ§zџ§“@hџўš@џCџ5@џё kxџєЉpxџ kxџkvџкЦ+zџ§“@hџўš@џG§ўPџ Hkxџч€Ђ/Pџ5@џ zџd,џ kxџkvџаєџprџєppџ"єzџhџW@џB(Tџћœ0џU5@џўc(џЦzџ§“@hџўš@џCџ5@џК-zџ§“@(џ%hџўš@џG§ўPџ Iхptџ/Pџ5@џ ktџknџкИkpџєЦktџkpџаХЖktџppџkzџprџ zџd(џ> krџєџЦд kxџєЉpxџ+rџ§“@hџўš@џG§ўPџ Hkxџч€Ђ/PrU€€€€~| J!; с1fYfБhсaйfqg!g™e™gСgсSсg™cЩcсcщ_ h1hYhЉСWд;и;ба;™hШ; С м;С !iљ‘iљ щiЙiqjбj1kQkС9Zk!щСБkбkq щkё/ lYYЉlСlСmaщXйl ^m1mam‘m1nЉnЁsI pа`l Ctџ*LџPџ$ аPџ 0lLџѕбPџi+'Ьў'ьў' џѕ0:<џN,џ,џ 6,џ џьўЬў єўЧ1xџPџ$ HlPџќcћвPџН5ѕ Шў(<џ%Pџ$ аPџ DШў 0)PџШў#Pџ$ @PџW,џџPџ5,џ$c<џ%Pџ$ @PџўІ Pџ2Pџѕ $ АQPџ§o,џ #Фў ћ=/Фў5,џo4(<џ%(ќў%Pџ$ @Pџўš,џ §ѓ pџPџ5,џ’!Pџѕ $ АlPџ= pџPџ2pџa,џ8§ѓPџPџa џvќ"ѕЧPџ6,џ џД%Pџ$ @PџW,џўїДўДўqАўPџ7lАўџA џlАўџ=,џџAьўћ”Ьў(<џћœ ўќ"qlџ6,џ џьўЬў6lАўџA џlАўџ=,џџAьўћ”Ьў(<џћœ ўUpjџ6,џ џьўЬў ѕqАў.pџa,џќ"llџлpџa џ№ќ"kjџчлХ6,џ џЮ>(<џ%(ќў%Pџ$ @Pџўš,џ џA џ§ѓ pџPџ6,џ џ lpџќјœўAœўa,џќ"œўa џ§ѓ PџPџaьўvќ"ЊѕЎqdџPџ6,џ џьўBœўa,џ№ќ"œўa џё§ѓ PџPџaьўvќ"ЊѕЎфpbџPџ6,џ џьў llџldџб–œўa,џќ"§i<џ%œўa џ№ќ"§iќў%Pџ$ @Pџўšьў ќ‹lџ§“@bџ§“@Шў$ @ШўўšЬў ќ‹xўќэЬўќэьў$  Qxўpџ)PџШў6,џ џьўЬўllџqdџ kjџkbџаЊ–œўa,џќ"§i<џ%œўa џ№ќ"§iќў%Pџ$ @Pџўšьў ќ‹dџ§“@jџ§“@Шў$ @ШўўšЬў ќ‹xўќэЬўќэьў$  Qxўpџ)PџШў6,џ џьўЬўќcќјœўpџa,џь`1\џ5,џ!Pџ'џ%l\џF<џ%$  QPџpџ pџ 8>(<џ%(ќў%Pџ$ @Pџўš,џ џA џ§ѓ pџPџ6,џ џЕ^pџa,џ§ѓ PџPџa џvќ"ѕлpџaьўё§ѓ ШўШўaЬўvќ"ѕлХ)PџШў6,џ џьўЬў›Гpџa,џѓ§ѓ pџ5,џ#Pџ$ @PџW,џџPџ5,џџ%ќf<џ%Pџ$ @PџўІ PџѕѕўŽ є˜pџ УuУФuУФG pџ  uУ"єpVџ:<џ%Vџv 1Xџ lXџћ0ƒ"u рUcќў%Pџ'џ%lXџF<џ%$  Pџa,џѓ§ѓ ШўШўўЋ џь`1Xџ)PџШў6,џ џ lXџ !,Pџ'џ%lXџF<џ%$  QPџШўШў Шў[pџ УuУФuФE pџ pџa,џь`1xџ5,џ`@b(xџœўДўtџ\џXџpџ0 ФўPџШўxў,џ џьўЬў ўЄ8!H a\џ8§ѓ[Xџtџ5\џўˆTџ +!tџa\џ§ѓ [Pџlџ5\џўˆLџ 0lџa\џї§ѓ HџHџa8џ ћФ(џџHџ6\џ8џ!lџa\џю§ѓ [$џpџ5\џўˆ џ alpџќјHџHџMџ @ "pџlHџ= pџkџ§јјўpџa\џі§ѓ џџa8џ ћ(џћФшўџ)Hџџ6\џјў8џєpzџ pџў‹ џ • lџў‹Lџ D tџў‹Tџ #єџpzџ”8H0 XџTџPџLџ$џ џlџtџpџ$Hџџ\џ8џ(џшў4Ј!H a џ8§ѓ[џXџ5 џўˆџ Є lXџќјџ-џa џё§ѓ џџaџvќ"фprџџ6 џџ,џa џ§ѓ џџaџvќ"qlџџ6 џџєp8џ`џdџXџ # llџq\џldџѕџџџџЧl`џѕЧФС—єzџkrџўcќў>kzџDьў%џa џё§ѓ џџўЂџџAЬў$џџ6 џџЬў…l`џѕЧ/CHџь›l`џ§iьў%kzџDМў%џa џю§ѓ џџўЂЬўќ‹l\џ§iœў%kzџD|ў%џaџю§ѓ hўhўўЂXўќ‹TўќэXўќэЬў$  QTўPўPў %Lџ)џhўPў6 џџЬўXў cьў%LџўЋ џь`1Hџ5 џCTџldџѕџџџџЧnQcœў%l`џ§iьў%kzџDМў%џa џю§ѓ џџўЂЬў§ŸўЇXў&'`1Pџџ6 џЬўXў lPџ (pxџ kxџєЦљl`џѕЬk8џУФєєџp8џ.'Xў'Ьў'џѕ)**F џ^фpjџ6 џџЬўXўkjџчѕЧђl`џqdџ l`џl\џЧэ ѕq`џCHџЋl`џѕЊq`џŽl`џ§iьў%kzџDМў%џa џю§ѓ џџўЂЬўќ‹l\џ§iœў%kzџD|ў%џaџю§ѓ hўhўўЂXўќ‹TўќэXўќэЬў$  QTўLџ)џhў6 џџЬўXў cьў%LџўЋ џь`1Hџ5 џEldџ§iьў%kzџDМў%џa џю§ѓ џџўЂџџAЬў+`1Tџџ6 џџЬўikxџч”.Lў@qHў lHџћ=U”Hўћ=?”Hў*#DўTHў/Dў”HўlHџ*#DўTHў/Dў ѕqHў-Lў…Eldџ§iьў%kzџDМў%џa џю§ѓ џџўЂџџAЬў+`1Tџџ6 џџЬўQcœў%ldџ§iьў%kzџDМў%џa џю§ѓ џџўЂЬў§ŸўЇXў&'`1Pџџ6 џЬўXў lTџћ0G2,џa џ№ќ"kzџчЊѕЎф+Bў -#Dў*1Tџ/Dў5 џTџMьў@ .g /lTџ*1TџєlPџlHџlTџ 0 “pxџ zџdќўгќcќјџ Xџў‹џ #џ<Ј\DLўџџџDџ0џ4џ@џTџHџXџLџ<џPџ0 DўџhўTўPў џџЬўXў0д € ќј`џ-`џaPџё§ѓ LџLџa<џvќ"фpzџLџ6Pџ<џ,`џaPџ§ѓ LџLџa<џvќ"qtџLџ6Pџ<џ ѕџџџџ… ѕ…ѕpџltџўd4џ‡lpџ§i$џ%(џ%`џaPџю§ѓ LџLџўЂ ўќ‹lpџ§iфў%kzџDФў%`џa<џю§ѓ АўАўўЂўќ‹Œўќэўќэ ў$  QŒўhџ)LџАў6Pџ<џ ўўhџ У{єnџkzџўcˆўsOknџD$џ%hџўЂPџ .§јдўknџDџ%hџўЂ<џ:фў]ћ< ўћ'ўџ6Pџ<џдўglpџ…$€ѕџџџџЧH aPџќ"ѕџ5@џkpџpnџ€.hџW@џD(Tџ]ћV0џkvџєк§јџћ'јўџ6@џџ~2hџW@џD%hџўš0џG§ўPџ Hѕ€Ђ/Pџ6@џ0џќcќјhџ „(bhџ Pџdџ@џ0џјў$рєpvџ € ќјpџ4€ ќјlџlџM\џ @ 1Xџllџ=@§/ lXџAћ0/Xџlџœ"єxџpџWHџB(\џћœ8џU5Hџўc4џ™xџ§“@pџўšHџCџ5Hџ kvџєЉpvџ xџd4џhЫpџWHџF:\џ]ћ35HџРєpvџЩєpvџќcќјpџkvџpzџHр(bpџXџlџHџ8џ      __SRP_fџџџџEџџџџXЃmodSheet0џџџџЌd__SRP_10џџџџџџџџџџџџg0__SRP_11џџџџ *rU€€€ џџџџџџџџ (`§џџџџџџџџџџџA ,Љ`ќџџџџџџџџџџџY =I ,б`ќџџџџџџџџџџџy =I 8љ` §џџџџџџџџџџџY ™ Й =I ((8!`ќџџџџџџџџџџџс )  1 (I`ќџџџџџџџџџџџQ (q`ќџџџџџџџџџџџ (™`ќџџџџџџџџџџџ) (С`ќџџџџџџџџџџџi &(щ `§џџџџџџџџџџџi &( `§џџџџџџџџџџџi &49 `§џџџџџџџџџџџ™ Љ  =y (a `ќџџџџџџџџџџџ (‰ `§џџџџџџџџџџџ™ ;4Б`§џџџџџџџџџџџ™ С =y f,й`§џџџџџџџџџџџ™ =y СWnrU€€€€~|  &џџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџа џџџџџџџџџџџџџџџџџџџџџџџџџџџџш ˜ 7B*\R3*#2b*\R1*#175*\R1*#22a*\R1*#228$*\Rffff*1242384913*\R0*#13*\R1*#b3*\R0*#2*\R0*#1*\R1*#b8*\R0*#14*\R1*#c0*\R1*#cd*\R1*#ce*\R1*#c0*\R1*#cd*\R1*#c4*\R1*#229*\R0*#f*\R3*#26п 0ўЪH€ € џџџџ€ N€ џџџџ€ :h€ џџџџ€Ј€ А€ џџџџ€ џџџџ€ DИ€ &€ џџџџB (€ 60€h€p€ џџџџx€ €- $]И р ш№ ј€ џџџџB € ^ € &€€ :Ј€ rш€ 4`€ T˜€ n№€ v,ѕ €:8btnCancel'}Ђ{*0ѕ€ 2DlblVariableList=„$х€!XchkCarry5(ѕ€&24btnHelp1{*$е€?#Frame2@эx$е€I#Frame1@ Л(х €\h chkCopyData `*(ѕ€"18lstCarry•(х €8lstVariable={ўџ џџџџMicrosoft Forms 2.0 FormEmb№d$дШџџџџ§%aQ1Н#џџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@0”џџ€ 8џџ00”џџЮ 0”џџв > џџџџ<`џџ<џџ<џџ<џџџџџџLџџџџџџџџџџџџLџџџџџџџџLџџџџPџџџџLџџџџPџџџџLџџџџLџџџџ”џџџџџџџџPџџџџџџџџ `џџџџџџџџа\џk џџџџџџ 9„)ƒ’џџџџ џџ8 џџџџ€% „н џџџџxџџџX % „Џ џџџџtџџџx  %џџџџxЈџџџџР8џџџџ8џџџџHиџџџџџџџџџџџџ Јƒ  џџџџџџј џџџџџџџџџџџџџџ%ЈџџџџР8џџџџ8џџџџHиџџџџџџџџџџџџ ЈџџџџЈџџџџР8џџџџ8џџџџHиџџџџџџџџџџџџ ЈџџџџЈџџџџР8џџџџ8џџџџHиџџџџџџџџџџџџ ЈџџџџЈџџџџР8џџџџ8џџџџHиџџџџџџџџџџџџ Јџџџџ`x џџџџxџџџџџџџџџX 0 џџџџџџџџџџџџџџџџџџџџ@ўџ@ \џџџ џџ џџџџ%@„ lџџџ џџ€ џџРџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџ0 џџџџџџџџџџџџџџџџџџџџX џџџџh џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0 p H @ўџџџџџLџџџ џџ h@ўџˆ <џџџ џџ ˆџџџџњр џџџџџџџџџџ@ўџџџџџ,џџџ џџ џџџџ`z џџџџxџџџџџџџџџШ   џџџџџџџџџџџџџџџџр @ўџ( \џџџ џџ ( %@„ lџџџ џџ€џџџџ@„ lџџџ џџ€(@ўџџџџџLџџџ џџ @ўџ0<џџџ џџ @„ lџџџ џџ€@„ lџџџ џџ€ˆ`„Њ џџџџtџџџџџ€p@„ lџџџ џџ€X@„ lџџџ џџ€@џџџџ`џџ џџ`„Ъ џџџџpџџџџџ€ џџџџџџњм@џџџџј@„дx`џџџ џџ€@ўџџџџџ,џџџ џџ @„ lџџџ џџ€џџџџ@„ lџџџ џџ€џџџџџџˆzLџџџ џџ џџ@ўџџџџџhџџџ џџ џџџџ@ўџџџџџXџџџ џџ а`„Њ џџџџtџџџџџ€P `„ж џџџџtџџџџџ€0џџџџ`„Њ џџџџpџџџџџ€XЈ`„Ъ џџџџlџџџџџ€АР@„дш\џџџ џџ€`„Њ џџџџtџџџџџ€H`„Ъ џџџџpџџџџџ€0џџџџи@„дx`џџџ џџ€@ўџ№Hџџџ џџ h@ўџџџџџ8џџџ џџ ˆ@ўџџџџџ6џџџ џџ џџџџ`„Њ џџџџtџџџџџ€џџџџ`„ж џџџџtџџџџџ€џџџџ`„Њ џџџџpџџџџџ€џџџџрШ`„Ъ џџџџpџџџџџ€ џџ@„дx`џџџ џџ€`„Ъ џџџџlџџџџџ€џџ`„Њ џџџџtџџџџџ€ џџ`„Ъ џџџџpџџџџџ€џџџџ@„дx`џџџ џџ€ ШрџџџџџџџџџџџџџџџџјАџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  џџџџџџџџџџџџ@ џџџџи џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  ј И @„дш\џџџ џџ€ џџ`„Ъ џџџџpџџџџџ€џџ`„ж џџџџtџџџџџ€ џџ`„Њ џџџџpџџџџџ€ џџ`„Ъ џџџџlџџџџџ€ џџ@„дш\џџџ џџ€ џџџџџџџџџџџџџџџџџџ0рџџџџXџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxа @„дx`џџџ џџ€ џџџџџџџџџџџџџџџџџџџџџџhHџџџџџџџџџџџџ˜ˆиџџџџРџџџџџџџџ€hџџџџ ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№р ”џџџџxџџџ€  џџ`„Њ џџџџtџџџџџ€ џџ`„Ъ џџџџpџџџџџ€ џџ@„дx`џџџ џџ€ џџџџџџˆ> ZЈ ž0вџџџџ@ўџ8Lџџџ џџ џџ@ўџP<џџџ џџ џџ@ўџџџџџ8џџџ џџ џџ@ўџА(џџџ џџ џџ@ўџрџџџ џџ џџ@ўџџџџџџџџџџ џџџџ@ўџџџџџџџџ џџ џџ@ўџШџџџ џџ џџџџ@ўџџџџџ№ўџџ џџ x@ўџјрўџџ џџ џџџџ@ўџаўџџ џџ џџџџ@ўџџџџџРўџџ џџ џџџџ(@џџџџˆџџџџџџџџаџџџџџџџџpXџџџџџџџџџџџџџџџџџџџџрИџџџџˆџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџШh`Ј џџџџxџџџ џџPџџџџџџџџџџџІ HЂ Д @ Ж вИ џџ@ўџ Tџџџ џџ 8@ўџџџџџPџџџџџ џџ@ўџ`Nџџџџџ x8џџ џџ@ўџџџџџLџџџџ џџа`(@ўџ(<џџџ џџ @ўџџџџџ8џџџ џџ @ўџ№(џџџ џџ P @„ џџџџhџџџ џџ€џџ@ўџ@џџџ џџ (@„ џџџџhџџџ џџ€@ўџˆџџџ џџ @ўџpјўџџ џџ @„ џџџџhџџџ џџ€џџџџ@ўџИшўџџ џџ @ўџ(иўџџ џџ @„ џџџџhџџџ џџ€ џџ@ўџџџџџШўџџ џџ џџџџ`џџџџџџ@ўџјФўџџџџ џџџџ@ўџџџџџРўџџџџ џџџџ№:рМ џџџџџџџџџџџџ@ўџџџџџАўџџ џџ џџџџ`Ђ џџџџzџџџ џџ№h@џџџџџџџџўџџџџџІ H @ўџИˆ@„ џџџџhџџџ џџ€`џџџџџџџџџџџџ@џџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXјџџџџШџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџџџџџџџџџџџџџ@xX@ўџрpџџџ џџ џџ@ўџџџџџlџџџџџ џџџџ@ўџ jџџџџџ @ @ўџџџџџhџџџџ џџџџ` џџџџџџ@ўџиXџџџ џџ џџџџ@ўџџџџџTџџџ џџ џџџџ@ўџDџџџ џџ џџџџ@ўџ№4џџџ џџ А@„ џџџџhџџџ џџ€`„ж џџџџtџџџџџ€џџџџџџџџ  џџџџџџ`„Њ џџџџpџџџџџ€џџџџА8џџџџџџ`„Ъ џџџџlџџџџџ€џџџџџџџџX@„дш\џџџ џџ€@@ўџџџџџ$џџџ џџ @ўџ џџџ џџ џџџџPџџџџ@ўџџџџџџџџ џџ  žџџџџxџџџ№ џџџџ@„ џџџџhџџџ џџ€џџџџџџџџˆL Фџџ џџ џџ@„ џџџџhџџџ џџ€џџџџ@ўџ˜`џџџ џџ џџ№и`@„ џџџџhџџџ џџ€ џџ@ўџPPџџџ џџ џџџџ`„Њ џџџџtџџџџџ€@`„Ъ џџџџpџџџџџ€x@„дx`џџџ џџ€џџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџ˜иџџџџ 8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8hˆ@ўџџџџџLџџџџџ @ @ўџИ<џџџ џџ џџџџ@ўџџџџџ:џџџ џџ џџџџ@ўџh(џџџ џџ џџџџ@ўџ€џџџ џџ џџџџ@ўџџџџ џџ џџ@ўџџџџџџџџ џџ џџџџˆ@ўџаєўџџ џџ џџџџ@ўџшфўџџ џџ џџџџ@ўџџџџџдўџџ џџ џџџџ@ўџџџџџФўџџ џџ џџџџџџџџx > z М џџџџџџџџџџ@ўџ`pџџџ џџ џџџџ@ўџџџџџ`џџџ џџ 0@ўџџџџџ\џџџ џџ ˜\џџџ џџ џџџџиp(`џџџ џџ а\џџџ џџ џџџџ`џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ џџџџ` џџџџџџџџџџџџџџџџџџџџџџџџ0Hџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаxџџџ˜`„Њ џџџџtџџџџџ€`„Ъ џџџџpџџџџџ€@„дx`џџџ џџ€џџџџ0ZЈ ž0вџџџџLџџџ џџ @ўџ<џџџ џџ H 8џџџ џџ @ўџ(џџџ џџ Р (џџџ џџ џџџџџџџџџ @ўџџџџ џџ џџџџpџџџ џџ @ўџ№ўџџ џџ џџџџ@рўџџ џџ @ўџаўџџ џџ @ўџРўџџ џџ џџџџ џџџџџџ`€ Dи€ r € .˜€ џџџџ€Ш€р€ш€№€ џџџџ€ dј` h-x @~ ар€ џџџџ€ ш  (@"Hh€ џџџџ€ hpиш №  ј  € џџџџ(V88  Ј +А€ џџџџ€ 8Р€ \ј€ <X  "˜  Ј  "И Ш а € џџџџ€ Jи ( € @8 9x ˆ Ј € џџџџ€ А  Ш € џџџџи € џџџџ"…р € (ј € џџџџ #  0 @  H  X h p  $x  ˆ  ˜  Ј И € џџџџР € џџџџB… Ш € Dи € L € џџџџ€p € џџџџ%x  Eˆ  Ј И ,tР № € џџџџј € џџџџB…,  € B € џџџџ€h €p €x €€ € џџџџ ˆ ˜ € D  -ш  ј € & !0@ H€ DP€ 4˜ а  рш6№€ џџџџ€ H€ B`€ "Ја и€ ,ш (€ ,0!`p*=x ЈИ€ џџџџ€Р€ "Ш8+№€ џџџџ(€ џџџџB…4$ 0€ BX€ џџџџ€ €Ј€А€И€ џџџџ Ра€ Dи-  0€ &@ !h x€ˆ   € Аа€ и ј€ D € 4h    АИ6Рр ш ј€ (€ "0 Xhp€ џџџџ€ Hx€ BР€ "0 8€ ,H xˆ€ ,!Ра*=и€  (8€ џџџџ€@€ "H8+p€ џџџџЈ€ џџџџB  А€ 4И€ "№€ џџџџ€€ џџџџ! ?0€ P h x€ ˆ ˜€ џџџџ € џџџџB  Ј€ 4А€ "ш€ џџџџ€€ џџџџ(€ H ` px €€ џџџџ˜€ џџџџB  € @Ј€ џџџџ€ш€№€ј€€ џџџџ  0(4Hp(.€Ј€ џџџџА€ џџџџB И€ BР€ џџџџ€€€€ € џџџџ (@P(4`ˆ€ џџџџ€ џџџџ" ˜€ H € Jш€ џџџџ€8€@€ џџџџ3H `:p ˆ ˜€ џџџџЈ€ џџџџџџџџИр Module modSheetelрG Copyright 2002: Statistical Services Centre, The University of Readingќџр3 Written by Howard Grubb, Martyn Byng, Colin GrayerџџџџџџЭџџPЭџџHр==============================================================Џр Procedures to handle worksheets–р0 Ascertain whether a sheet with name NAME exists]ђ`]ђxЗ'Є р Loop over all sheets џ ІўЌ І !’ І$І !$H $HœЗ'Є yџџkџџџ ІўШј Є 'Ђ iџџш–рX Get the sheet which results are going to be sent to (either stacksheet or unstacksheet)р The function works as follows:р3 (1) Takes the value of factor as the default name.рl (2) If a sheet with the default name exists, then the number of sheets with that as a root is counted, i.e.р. that are in the form factor1, factor2 etcрN (3) The default name is then set to be the next in the sequence, i.e. factornрg (4) A further check is made to see if a name of that form exists, if so the default is set to factornaрo (5) If NewSheet is true, then the sheet with name "factor", is deleted and recreated. If such a sheet does notр= exist then one is created using naming conventions aboveрl Notes: The return from the function should be checked to see if it is null (i.e. IsNull()), if null => thatр( user aborted an overwrite option]ђђ(ђ@]ђX]ђp]ђˆр] Count the number of worksheets with the same name as the one that will be created by defaultЌ'Є Њ Жœџ ІўЌ І !’Ќ І$І !$H Њ $H…Ќ ›G Є Ќ 'Є jџ ІўШkџџр Specify the target name Є Ќœ Њ 'А t e Њ Ж  Є 'А dџџИ Њ Ж  Є Ќ 'А kџџрa Check to see if the name exists, and if we are creating a new sheet, alter it until it is unique А $Ђ 'В t œ В b А Жa'А А $Ђ 'В Йџџрkџџи t  В œІ ЖAll data in the sheet А Ж will be lost Д @ Ж $в'Ќ Ќ И œэА.Ў dџџPэ А $І .Ў р 2 Remove the old sheet, stopping the warning dialogр U thought there would be a better way of doing this, but couldnt find it easily !, i.eр 5 a way to clear and reset a sheet without deleting itЗ :(К Ў B@ZЗ :(К kџџ0kџџ(рC If the target sheet is not null (i.e. Nothing), create and name it Ў $рœр: Set up and name the sheet to which data will be unstackedэ М !B.Ў А Ж›G А Ў (jkџџPр Return the sheetэ Ў .Ј iџџ І !!їЌ– р" Put default output range into box ˆ!B œЗ Р ( Р œЗ Р (З Т (kџџkџџˆ z!Ц œЗ Т (З Т (З Ф (kџџ@oџџ8їЌ–Јр= returns first cell of next free column in current worksheet.рF Gap specifies how many blank columns to leave after last used column.]ђэ ˆ!Š.Ш Ш !ЎЖ$A$1 Ш $L œэ Ш .ždџџ@эЌ Ш !N Ш !P!   $Ф.žkџџiџџІ їЖ–8р< Finds the top left cell of the area to contain output data.]ђ(]ђH]ђh]ђˆэ ˆ.д n œр= Create a new workbook and point to top left cell of sheet 1.э > !B.Ь Њ Жœр Rename the first (active) sheet Њ ˆ(kџџИ t eр= Create a new sheet in the active workbook and give it a nameр- if one is specified. Point to top left cell. Њ Жœ д'Њ kџџэ Њ $ZЗбt $Ј .а kџџшрA Select top left cell of specified range in the active worksheet.р< If none, select the top cell of the second column after theр last one currently in use.ЩК( Ъ Жœр& Choose the next but one unused columnэ ž.Ш dџџар& Point to first cell of selected rangeэ Ъ $0.Ш kџџˆэЌЌ Ш %Ф.”р' CJG 25/5/01 д B@2zџџ@ЃК8р specified range is invalidЖ.The output range that you specified is invalidA@вiџџаІ їЖ–Јр< Finds the top left cell of the area to contain output data.]ђИ]ђи]ђј]ђэ ˆ.д n œр= Create a new workbook and point to top left cell of sheet 1.э > !B.Ь Њ Жœр Rename the first (active) sheet Њ ˆ(Ж'Њ kџџx dџџp э ж $и .Ь Ь Аœр  Use current workbookdџџ( р  Book exists - activate it Ь B@2kџџ№ kџџш t œр= Create a new sheet in the active workbook and give it a nameр- if one is specified. Point to top left cell. Њ Жœ д'Њ kџџ@ э Њ $ZЗбt $Ј .а dџџ э Њ $к .а а Аœр  Use current worksheetdџџа р  Sheet exists - activate it а B@2kџџ kџџˆ рA Select top left cell of specified range in the active worksheet.р< If none, select the top cell of the second column after theр last one currently in use.ЩКШ Ъ Жœр& Choose the next but one unused columnэ ž.Ш dџџp р& Point to first cell of selected rangeэ Ъ $0.Ш kџџ( эЌЌ Ш %Ф.8р( CJG 25/5/01р Restore the active sheet д B@2zџџР ЃКИ р specified range is invalidЖ.The output range that you specified is invalidA@вiџџP –8р- Look for a workbook with the specified name.р Return Nothing if not found]ђ џ м ў > “ м !$H $Hœр Name matchesэ м .и zџџ€kџџxџ м ўШэА.и iџџX–Рр. Look for a worksheet with the specified name.р Return Nothing if not found]ђ(џ Ў ў І “ Ў !$H $Hœр Name matchesэ Ў .к zџџˆkџџ€џ Ў ўШэА.к iџџ`–Hр9 Extracts the sheet name from the full address of a range]ђА]ђШ]ђр]ђјЗбJ ’%Ў'Ў ЎЖ]„'І І ЎЖ!…'8 Ў ІЌ 8 І Ќ $њ'Њ Њ Ж'„'8 8Ќ›G Њ 8Ќ $м'Њ j Њ 'z iџџH–р< Extracts the workbook name from the full address of a range]ђx]ђ]ђЈ]ђРЗбJ ’%Ў'Ў ЎЖ[„'І ЎЖ]„'8 Ў ІЌ 8 І Ќ $њ'ж ж 'x iџџh–ирA Selects the workbook, worksheet and cells of the specified rangeрD Needed since Range.Select gives error if workbook/sheet not active.]ђ@ ]ђ` э ’$x $> .м м B@2э ’$z $М .Ў Ў B@2 ’B@HoџџPџџџџHџџџџ=ИAttribute VB_Name = "modSheet" ' Module L PCopyright 2002: Statistical Services Centre, The University of Reading–Written by Howard Grubb, Martyn Byng€, Colinayer7Option Expl@icit P№rivaЮЖ)Џ=9wProcedur€jto hand‰workŠs“s3Pub€D` Func‚L‚ E’x€Šs(ЌAs“r{) Boolean  'certa€pwhether a - with nЬNAME e(‚ Dim i%Integ‹€%‚ found †2ƒƒ = False ' Loop o@g alŽlC4For= 1 To WyF;.C€@\СIf (UCaseB(Ч(i).A=)wР“УB)ƒ=E q%TruФ$…@Ot. !C*AE€5IfУNext iУч[B  …cQhшGetТ (BС'LЦSФœNewТˆQAnObjecC?' € €kХjhich ‰ults @are goР{ a€Œbe s€У(e€t@xstackSyРYunЧ)5'ЮfХ“B› asРK@llows: (21UakAІРйvalueиfact‡€Р С'defa%Х’.2) €n M+mфM,n"nu\mb€€xBsTthataa ro"o 2s caDedр, i.e%!8#@#`]Ё form ƒ1,2 et*cЅ3bF ) ibsset„+A nBУsequenžc сф Ѕm(4 9 fur r checkA madeС see if pТn bУo€fј soт!х@Єƒєna5Т,ЦIa ]WH*c@}"#"Р sрleted @Ž‘ Kcre€›d.7Lsu€MЅ7do@nžoхR!-bу$on у`2Ѓ usЁR Сpconv S€Љ@Vbр€фNotes:bPreturn 0frombfRshрould €[‚(РK@]Ф'iТ@nu`Š(b0IsN€())гТ'=>р a‰„usрKaborУ§B“w`ФРZbОт‚kяЄ   AvІwASЎІ{(z" targќet‚?руЧC@ухЃ'€гun QрoЧcџЇУEd@€сИ фr3ЂKќwiр$с(D4€с$Kc =…Є0УрvТ‚–<>ј ""5ЋЗD`бр(In (Р7?\4\, Ѓ&)) И> 0‚9`!>dUW + 1# Z‰[ѓ' Specјify"%3ђIу‘ ŸF“ƒ‘ = V §ѓE mС7ПжИа & "&гh—Ÿ“?aТz -еџP"‚F22K!#%,s2>€GweВcВ>:a0 new#f0ltGр1Р5'il S6uќniрNГ У№rˆ7ГeёC(q ђDР~hiŽЃ'n{xpa№ЂSŸtќs(žБ!ˆcВУ0eе Anddi­Ђ>= MsgBox("A 5datьa ЄfsV" { №9ЁУ7lostPW_У QvbOKCaPel`.vbExclam€ЏpЈ+ vbDCvButto.Ъfс 'RenB+Cˆф(abЇ) $р@ѓivI= † hСnџCЂ lƒР9B<Ты!g€Й it a … ' if €one is х—№d. P’'&&j"aPџM"†`ˆV№ #‚0a•Geу[(TrimR( ),€ЛwТ:=сзˆР' SeЮlРдO_І rСюЁЙ—L%B(c'@т nр"x, sф ФiЅУasze`hdХУƒКр'чУЛA+„ЦlyaрНC On Error GoTo InрvalidЗ3 KCУn hoosP>  ‘ТjbutВunXewх:=Lrђљ]'з q“рjТ (ПZ NQв#f.жcАy 'CJG €25/5/01R%ЩA."4atѓ‹ExЇ-wc Љ:ђv'Ї-ХsАM€sgBox "АE фPC"that Xyou€2iУ"яВПkM‰ј2ЯkЯkP џ/$ŒPP20ЁTŸoћcoаkПk”Ј‡ђџŸŸH#ƒ_ozЈ{ _oa_o2$R'~ _o–œБ:_o…_omъ _o _otRq_oџА›ъlр~‘eтEbB‘0џj_o0@_o№1_o_o_oџсЊ_o_oВ w_o0ї_o_oЂ šЊ‚$_o‘џБNB`ьpeсB{ћqБ-(.3G0 €Is NothАšљMj' `Г*Нav(Џ Р' ё exiРsts - ~`Hч uPWbћI љ џЏА І<2#ac",-_} _}  _}ieџ_}tЁуh`0 +_} фч_} шRџ_}f_}Тщh&‚џHЅ  PЉЏ3 !3­з80љр@„Т2Яiїs?0 WpЂ!Хh ЯaRR ˜‰ъДp left cell of specified range in the active worksheet. ' If none, s electVtopœvsecond columnР afterN‚ last B currentlysusebOn Error GoTo Inval8idRš?OutputAddress = ""` ThenЃC hoosešne xt bupune—Set Rng€#N€Fre eC‚[‚Else' Poin€xрo fir€a† ‚„Џ ‡+^(ŠZ)‚ђE’Ifƒ‚&2GJ.Cвs( 1, 1)lCJG 25/5/01‚' RestМorƒuйзCАJS‚пAшatgE€xit FunРвoN ‰Z:„‡sРjBdMsgBox "€_ oBe‘that yo*uH—i†"Т ?Ч Public†% FindBook(Name As StrPing)WРЅb#Р‚' L€ f aBЌA wit6hТ€1nВReturn NotRh iСЕtРu ndФ'@\ DimN С Ы FРEˆachIn %sУС€Ћ(UCaЈse(A.A2)Рv{ƒB) ЏС й РmatcheHAџAŠEF@‡ЯvAњ › !]Ђ#L D"џcп4BLѕ4R5Bћ?5?5 "5ТE5ФУџf5C„5BВ5Тп5"+ч Ђп5у= тcƒќ 66H%6B @_6*kТaFromљУ“Myт'ЂlnЅЂ'Рtr@ŒscjeaŠ сi f`bfкu ЪaФВ ЫaƒТ_‚iХЖЦy&iaI@nteger†j‘ЦhЂчТD.$(РЛernal@:=TrueCАi)€'In`(Є, ("]"cjfi, Ч!ФЇ= M„idi + @Ж j - i`1­ ` '„ р„j <8> 0ЂЃD‚J= њL ѕ(hс d Іц8џ@†Т!џwDП Ё€0ПП P+М 1‚Wя я џT `я €Xт‘я  Xџя єYВ;%’d`п я`‰п ‡л [з Ї я•"%aŸ œ `5B ?ЄqSub іSв†r(4 a0ƒт.'4“:е,Зœ a?б™Ё… ›K dNeed`sinceJ .г gАЁsм eršs5/UЂўtєЃУvт1QС к{2+•B2Bа tН#v=vтt_+P+)у6Н.J‚“tXsw5?žPuŒЕ$г аЁщkё/YY l!lщX!; сйfYn1kсa)b1fС БkaqЉљсS‘pБhбqсVљqr)r™r1сr s™cys!iщСИєpvџ-єxџlџpџ$ иpџ 0llџфpџўchџЋ]TџkxџDXџ%pџ$ иpџ dTџWDџ4џ 4џl M$џ@џ џћ3)pџTџ6Dџ4џџŸєџpvџЋ xџdhџ6kvџpzџxИ$b $pџTџDџ4џџџDрєpvџ € ћ=Ы-єtџPџTџ$ иTџ 0lPџфTџўcLџЫsѕ8џktџD<џ%Tџ$ иTџ d8џW(џџ џl Mџ@јў јўѕўўшў(иў]ћt)Tџ8џ6(џјўџшўС kvџєЉpvџ tџdLџC kvџєЦу€ Chџ1 € *#Фўkvџћ§#Рў*1hџ2ФўРў1"€ *#Фўkvџє­ћ§#Рў*1hџ2ФўРўhџ §ј<џќіXџz Xџџz lhџ*1hџhџ §ј<џќіXџMУ§ј<џXџћ'(џџ5<џe8'шў'јў'џѕ1lhџ*#Фў*F(џ^фprџ/Фў6(џџјўшўkrџчѕЧчќcќјlџc+8џlhџF<џ%Tџ$ иTџ dQ8џlџTџ"єѕ Tџ$ Tџ рTџ lџў˜"єџѕ Tџ$ Tџ рTџlџM<џ @ Уа98џѕ 'Аў%'иў%'џ%'<џ%Tџ$ ИTџ (Q8џlџTџ lhџћ=аlhџF<џ%lџў› llџќјxџ Ьр4bxџXџhџlџ0 ФўРўTџ8џ(џџјўшўШўєИў’lџ#hџ$ @hџWXџ џhџ5XџdќfHџ%Hў› €§oHџџbќfHџ%Hў› cHџ%Hў› $6џhџ$ Hhџ d k6џhџГќfHџ%Hў› ќfHџ%Hў› cHџ%Hў› $HИ(lџhџXџXќў’ hџ%`џ$ @`џWPџ!§ѓdџ`џ5PџEdџaPџь`#Lџ"ћ0ldџќј`џ`џM<џ @ #p:џl`џ=dџk:џФ/Lџ`џ5Pџ~ ldџќјxџєt(єў%dџaPџ№ќ"dџa(џё§ѓ`џ`џaџvќ"Њ§i<џhџћ”џ%џ$ XџўЂФў§ѓxџ)`џџ6 Pџ(џџџФўИќ0xџdџhџ,Lџ`џџPџ(џџџФў$ИlCtџlCpџў’`џLџ$ @lLџ= PџLџk ˜-8џѕ '<џ%Lџ$ аLџ (Q8џ\џLџ ltџћ=“!ltџF<џ%Lџ$ @Lџў›Lџяkя ltџћ0З `џќ1tџ6tџM<џ@џ єџ+џџ`§Чџ [Lџ= Xџ/џLџ5џKŠ lpџћ0(<џ% Tџ9!Lџ'(џ%lpџF<џ%$  QLџTџ=(<џ%(џ%Tџaџю§ѓLџLџўЂрў§ѓxџLџ6џрўѕ Pџ ( +'Рў'аў'рўѕ:<џNџџ 6џрўаўРў$МИD,xџTџ\џXџtџPџ`џpџ(џLџ8џџрўаўРў0 ќЦЈ$  0 ќЦ8  0 ќЦР  и c\џ%H ўЋ <џь`1tџ5<џѕltџѕў§фprџkrџчltџѕў§фppџ4kpџkrџ­є­D<џkrџєЉчtџM\џ@,џ ,џ`1lџ6<џ,џѕllџѕў§фppџ kpџєЫЫ#kpџє­чlџM\џ@<џ  <џ`1lџ5<џllџCxџPи0bxџlџtџ<џ,џи” c\џ%H ўЋ <џь`1tџ5<џѕltџѕў§фprџѕltџѕў§фppџ4kpџkrџ­є­D<џkrџєЉчtџM\џ@,џ ,џ`1lџ6<џ,џllџCxџP”0bxџlџtџ<џ,џф 3\џl $F`џ%pџ$ аpџ DQ\џxџpџ5`џѕ xџ 0 :\џl %F`џ%pџ$ Иpџ dl\џ= tџ)pџ\џ5`џѕ tџ ( H ў ы8џ(  ,bxџtџpџ\џ`џ  9rU€€€ џџџџџџџџ(`§џџџџџџџџџџџ 0,Љ`§џџџџџџџџџџџй љ 0#Xб`§џџџџџџџџџџџ 9 Y y ™ =y =y =y =y 0љ`§џџџџџџџџџџџ™ I D!`§џџџџџџџџџџџЉ љ й С щ I HI`§џџџџџџџџџџџЉ љ й С щ I 0q`§џџџџџџџџџџџ 900™`§џџџџџџџџџџџ Y0,С`§џџџџџџџџџџџ =I ,щ `§џџџџџџџџџџџ =I , `§џџџџџџџџџџџ =I nrU€€€€~| џџџџ0 ќЦ€  kmodCommon !џџџџ>Н*__SRP_13:џџџџ­Œ__SRP_12џџџџџџџџџџџџА/modTranslateџџџџџџџџџџџџUІ#€ џџџџ€ N€ џџџџ€ :h€ џџџџ€ DЈ€ џџџџ€№€ ј€ џџџџH€$€ џџџџ€ *„H„$h„„Ј„(Р„*ш„„8„P„h„€„˜„А„Ш„*р„"„8„X„p„ˆ„ € џџџџ€ А„Р„и„№„"„8€ џџџџ€ 2P„ˆ„ „И„а€ џџџџ€ ш„ „ „ „ 0„ @„ P„ `„ p„ €„ „  „ А„ ˜€ џџџџ„Р€ џџџџ€ .и€€€€ €(€А€ џџџџB  0€ џџџџ€8€@€ џџџџ H$X€€ џџџџˆ€ џџџџџџџџирˆјдџџџџЖж$1НМяџџЖџџ$№ @џџShellExecuteAЅџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(6 џџџџ<џџ< џџ<џџџџџџX (+т €pџџџџџџџџџџџџ@џџ?? iƒф џџџџџџџџџџ`„iƒц џџџџџџџџџџ€„@iƒш џџџџџџџџџџ „гiƒъ џџџџџџџџџџР„џџiƒь џџџџџџџџџџр„#iƒю џџџџџџџџџџџџџџ„u Ъ6`pHџџџџџџџџџџџџџџЪ@P HџџџџџџџџџџџџџџЪFˆА HџџџџџџџџџџџџџџЪNАр HџџџџџџџџџџџџџџЪ\Шј Hџџ џџџџџџџџџџџџЪRи Hџџ џџџџџџџџџџџџЪd Hџџ џџџџџџџџџџџџЪl@@ HџџџџџџџџџџџџџџЪp(` HџџџџџџџџџџџџџџЪvPˆ HџџџџџџџџџџџџџџЪzИ  HџџџџџџџџџџџџџџЪ~xА HџџџџџџџџџџџџџџЪ€pШ HџџџџџџџџџџџџџџЪТ0ш HџџџџџџџџџџџџџџЪXШ HџџџџџџџџџџџџџџЪ № HџџџџџџџџџџџџџџЪBЈ@ HџџџџџџџџџџџџџџЪ˜BBџџџџџџџџџџџџџџЪ˜H@Bџџ џџџџџџџџџџџџЪ˜. Bџџ"џџџџџџџџџџџџЪ˜0h Bџџ#џџџџџџџџџџџџЪ˜4€Bџџ%џџџџџџџџџџџџЪ˜8˜Bџџ'џџџџџџџџџџџџЪ˜,ИBџџ(џџџџџџџџџџџџЪ`рP Hџџ+џџџџџџџџџџџџъ€ џџ џџ-@џџџџџџџџъ€"  џџ џџ.@џџџџџџџџъ€ ˆ џџ џџ0@џџџџџџџџ COUNTBLANK(?)COUNT(?)џџџџ+Рџџџџ`џџџџџџџџџџџџ Рџџџџ JŒiƒђ џџџџџџџџџџџџџџ€`„є џџџџџџџџџџˆўO`„`џџџџџџџџџџиЪ&8`HџџџџџџџџџџџџџџЪ* HџџџџџџџџџџџџџџЪ:(РHџџџџџџџџџџџџџџЪJxа HџџџџџџџџџџџџџџЪV ш HџџџџџџџџџџџџџџЪ`№ Hџџ џџџџџџџџџџџџЪh0 Hџџ џџџџџџџџџџџџЪrhx HџџџџџџџџџџџџџџЪx˜ HџџџџџџџџџџџџџџЪJрИ HџџџџџџџџџџџџџџCOUNTA(?)-COUNTBLANK(?)џџџџSUM(?)ЪX HџџџџџџџџџџџџџџЪ<€0 HџџџџџџџџџџџџџџЪ˜FаBџџџџџџџџџџџџџџЪ˜*јBџџ!џџџџџџџџџџџџЪ˜2H@Bџџ$џџџџџџџџџџџџЪ˜6pBџџ&џџџџџџџџџџџџЪ˜DА Bџџ)џџџџџџџџџџџџъ€мшџџџџ,@џџџџџџџџъ€$ 8џџ џџ/@џџџџџџџџИ0 џџџџh(HџџџџXx№№Иџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРаЈ@ˆ р8џџџџџџџџ@џџџџ `Ш˜€јPАш pџџџџџџџџџџџџџџџџџџџџxџџџџџџџџрџџџџџџџџШџџџџ€8иhPƒр џџџџџџˆ џџџџџџџџџџџџџџ%IF(COUNT(?)>0,AVERAGE(?),"")џџIF(COUNT(?)>1,SSCSTDEV(?),"")( MAX(?)-MIN(?)MIN(?) MEDIAN(?),"")џMAX(?) QUARTILE(?,SKEW(?)?)џKURT(?)QUDEVSQ(?)SKDEVSQ(?)+COUNT(?)*AVERAGE(?)^2SSCSTDEV(?)/AVERAGE(?) PERCENTILE(?,2SUM(IF(?(?)/AV,1.0)) /COUNT(?)E(?,*100&SSCstat,1 ssc-stat.hlpџџSSC-Stat V2.12SSCstat tutorial 1.pdf Booklets.hlp0) SSC_DS_Hdrtori SSC_DS_Count SSC_DS_Mean SSC_DS_Stdev1...nи (џџџџLџџи џџџџџџџџџџъ€$ џџџџ џџџџ1@џџџџџџџџЪ˜ъ РBџџ*џџџџџџџџџџџџH_Stdevџџ1.џџџџџџџџ№ џџџџј И0 џџџџh(HџџџџXx№№Иџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРаЈ@ˆ р8џџџџџџџџ@џџџџ `Ш˜€јPАш pџџџџџџџџџџџџџџџџџџџџxџџџџџџџџрџџџџџџџџШџџџџ€8иhPџџџџа џџџџ8˜ и HџџџџџџџџџџџџџџЪTи Hџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8рџџџџџџџџШџџџџ€8иhPџџџџ 0 №АHXјx џџџџџџџџџџџџ@ џџџџџџџџџџџџ˜џџџџ№џџџџ(И(P`ш8џџџџ€pрџџџџЈџџџџџџџџџџџџША џџџџ џџџџ€@hиhPИШрџџџџџџџџџџџџџџџџxаРџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџˆџџџџ@џџџџИџџџџР0 №АHXјx џџџџџџџџџџџџ@p џџџџџџџџџџџџ˜џџџџ№џџџџ(И(P`ш8џџџџ€pрџџџџЈџџџџџџџџџџџџША џџџџ џџџџ€@hиhPИШрџџџџџџџџџџџџџџџџxаРџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџˆџџџџ0 №АHXјx џџџџџџџџџџџџ@p џџџџџџџџџџџџ˜џџџџ№џџџџ(И(P`ш8џџџџ€pрџџџџЈџџџџџџџџџџџџША џџџџ џџџџ€@hиhPИШрџџџџџџџџџџџџџџџџxаРџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџˆџџџџа0 №АHXјx џџџџџџџџџџџџ@p џџџџџџџџџџџџ˜џџџџ№џџџџ(И(P`ш8џџџџ€pрџџџџЈџџџџџџџџџџџџША џџџџ џџџџ€@hиhPИШрџџџџџџџџџџџџџџџџxаРџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџˆџџџџџџџџˆАџџџџH€џџџџ@x(Xџџџџ№Pџџџџџџџџ8pˆ  €џџџџhPиИˆHшџџџџџџџџШџџџџ`№˜@ џџџџџџџџџџџџџџџџ0џџџџ8џџџџџџџџџџџџџџџџџџџџШx(рџџџџЈјџџџџА џџџџрџџџџИџџџџџџџџа РhџџџџџџџџXџџџџPАџџџџH€џџџџ@x(Xџџџџ№Pџџџџџџџџ8pˆ  €џџџџhPиИˆpшџџџџџџџџШџџџџ`№˜@ џџџџџџџџџџџџџџџџ0џџџџ8џџџџџџџџџџџџџџџџџџџџШx(рџџџџЈјџџџџА џџџџрџџџџИџџџџџџџџа Рhџџџџџџџџџџџџ˜2џџџџџџџџџџџџџџџџ€џџџџˆ џџџџџџџџџџџџџџџџџџџџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџOр˜ 7B$*\Rffff*3442370a09п 0ўЪU€  Module modCommonрG Copyright 2002: Statistical Services Centre, The University of Readingџџр3 Written by Howard Grubb, Martyn Byng, Colin Grayerр> Contains common declarations etc used by more than one moduleЭџџЭџџІ "–р$ Descriptive Stats/ Summary formulae]$Ж COUNTBLANK(?)ђ]$ЖCOUNTA(?)-COUNTBLANK(?)ђ8]$ЖCOUNT(?)ђ]$ЖSUM(?)ђ`]$ЖIF(COUNT(?)>0,AVERAGE(?),"")ђ(]$ЖIF(COUNT(?)>1,SSCSTDEV(?),"")ђP]$Ж MAX(?)-MIN(?)ђˆ]$ЖMIN(?)ђx]$Ж MEDIAN(?)ђА]$ЖMAX(?)ђ ]$Ж QUARTILE(?,ђШ]$ЖSKEW(?)ђи]$ЖKURT(?)ђ№]$ЖDEVSQ(?)ђ]$ЖDEVSQ(?)+COUNT(?)*AVERAGE(?)^2ђ]$ЖSSCSTDEV(?)/AVERAGE(?)ђ@]$Ж PERCENTILE(?,ђ(]$ЖSUM(IF(?ђh]$Ж,1.0))ђP]$Ж /COUNT(?)ђ]$Ж*100ђИр GeneralЅ]$Ж&SSCstatђxџџџџ]$Ж ssc-stat.hlpђр]$ЖSSC-Stat V2.12ђp]$ЖSSCstat tutorial 1.pdfђ]$Ж Booklets.hlpђ0р, Defined names used by Desc Stat and T-tests]$Ж SSC_DS_HdrђШ]$Ж SSC_DS_CountђX]$Ж SSC_DS_Meanђ№]$Ж SSC_DS_Stdevђ€р Unstack options]$ЌђЈ]$Ќђ]$Ќђа]$Ќђ@]$Ќђј]$Ќ ђ ]$Ќ@ђh]$Ќ€ђH]$Ќђ]$Ќђp]$Ќђ˜]$ЌђИ]$Ж1...nђРр( Variables associated with the Data Area] ђр] ђш] ђ] ђ ] ђ8–€]ђр]ђјЖOpen'`­ ` ђ і і Ќ$т 'є є 'Рiџџpџџџџh]$ЌђА џџџџџџџџ€] ђˆ р CJG 23/6/04eŒEeџџџџˆџџџџнЕAttribute VB_Name = "modCommon" ' Modul$e P TCopyright 2002: Statistical Services Centre, The University of Reading–Written by Howard Grubb, Martyn Byng, Colin!ayerƒnt@ains c­ @declar‡oetc usedUmore tРhan onЩаBOption Explicit PrivaG€‰}Pub D‚0e FuncShellExecЁLib "s32.dll" Alias "‰A" _ B (ByV€–hwnd As Lorƒ lpOpe›ƒd Sв FiШ… (”(lpP1€‚metЗ‘Di€rectory ‹nShowCm]Ц%) (C. A€D escri@PveBs/ SummaРformulPae ФMC@dt NoOfBla0nksF›COUNTBLANK(?)œN Non+ Э AР -_um0eric аToˆtalШ SUMP Mean IF(‚ @ >0,AVERAGE,"AŽ3StdevT1,SSCSTDE‚V–RangeˆMAXР -MIN€NMinimuFm‰ г ediJMEDIA2 ax- “-QuРvil)€QUARTIL #,­SkewneBsIBSKEW0K@urtosi)KhURT0CЪ @*SЊQАUВ+х9*Ї9d^2­CV+7/У‡MPercрЁш@PERCENє"PРroportр“$n1ЁeR`N?Ž ­2СЁ,1.0)ЎP. Z3a/х^ 4С*100 GenЭ`•lŒ}€"CaуЋ@Ъz&Рs@Ф Р!ЧHelpЁ ssc-сС.hlpT…д ‚-A V2.1ю3 ф TuрœialPœDFС  Ё tФ@ 1.pdf B€ookletsGeфУŸfinРЫn€цs&ЭЂЂЁ a К€T-tests,#˜strСтdrф€_DS_HdrmСhCountЈтџј!•ШСИЂIшђ№ЁUnPck oтэ cmnIn cludezumкn1\`S№,3 A2ByFaAj 4Rowa8пDuplNЬewа16+Г03Пn1Igbn‘ƒ= 6?Ldas!12_ђMфaxр25?уP= 51яnе1<02П#20F4_bAddP4,09`ЬD{yX„vab(1...1Ÿ1Variabl@œassociр@d withp”e Data ArќeaцрA1g…й7Г9@5lаtOCurrRЕnDi splayеFiюrp‘ЏnР 8fnvДBPaР F• 'CJG 23/6/0 6Ÿ apiLa ha˜>(AІШ’у’DizmЏtБ™@g”qAџsЄЦSДрSа IQЃRe‚= IЅ(0&, у,  , vbNullѓUЂл1)Cк `"ѓqГ EPL…qАrU€€€ џџџџџџџџ@i'pџџџџџџџџџџџџљ1Iq‘(`§џџџџџџџџџџџБ02nrU€€€€~| prU€€€ џџџџџџџџ4.€ џџџџ€Р€ Ш€ џџџџ€ а„"ш„"„&8„*`„,„$Р„ш„„„0„H„`„€„˜„И„а„ш„$„&(„$P„x„ „ А„а„№€ џџџџ€ „„0„H„`„x„„Ј„И„а„ш„„„(„8„P„h„€„„ „А„Р„и„№€ џџџџ€ „((„P„Bp„И€ џџџџџџџџрр Module modTranslateacros\рG Copyright 2002: Statistical Services Centre, The University of Readingр Written by Colin Grayerџџр( Contains strings which need translating Эџџ8Эџџ0р Descriptive Stats]$ЖDescriptive Statisticsђ№DдАџџџџrк1НИяџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(6 џџџџ<џџ< џџ<џџџџџџ Ъ(0Ш HџџџџџџџџџџџџџџЪ2P HџџџџџџџџџџџџџџЪ4X0 HџџџџџџџџџџџџџџЪ>€€HџџџџџџџџџџџџџџЪHШP Hџџ џџџџџџџџџџџџЪLЈX Hџџ џџџџџџџџџџџџЪTаx Hџџ џџџџџџџџџџџџЪZ@ HџџџџџџџџџџџџџџЪ^ј  HџџџџџџџџџџџџџџЪf Р HџџџџџџџџџџџџџџЪnИ HџџџџџџџџџџџџџџЪtH HџџџџџџџџџџџџџџЪ€pH HџџџџџџџџџџџџџџЪњ 0x HџџџџџџџџџџџџџџЪD ˜ˆ HџџџџџџџџџџџџџџЪH Р  HџџџџџџџџџџџџџџЪL ЈР HџџџџџџџџџџџџџџЪN шШ HџџџџџџџџџџџџџџЪR и Hџџ џџџџџџџџџџџџЪV ш Hџџ"џџџџџџџџџџџџЪX 8ј Hџџ#џџџџџџџџџџџџЪ\ ` Hџџ%џџџџџџџџџџџџЪ` ˜ Hџџ'џџџџџџџџџџџџЪb ˆ0 Hџџ(џџџџџџџџџџџџЪf АH Hџџ*џџџџџџџџџџџџЪj X Hџџ,џџџџџџџџџџџџЪl и` Hџџ-џџџџџџџџџџџџЪќ x Hџџ/џџџџџџџџџџџџDescriptive StatisticsTotalMeanЪ (Р Hџџ2џџџџџџџџџџџџNumber of blank valuesStandard DeviationluesЪ`HџџџџџџџџџџџџџџЪ$АHџџџџџџџџџџџџџџЪ0(ш HџџџџџџџџџџџџџџЪ8xxHџџџџџџџџџџџџџџЪD ШHџџџџџџџџџџџџџџЪP№h Hџџ џџџџџџџџџџџџЪX€ Hџџ џџџџџџџџџџџџЪbhА HџџџџџџџџџџџџџџЪjр HџџџџџџџџџџџџџџЪ|р0 HџџџџџџџџџџџџџџЪ‚` HџџџџџџџџџџџџџџЪF X HџџџџџџџџџџџџџџЪJ €А HџџџџџџџџџџџџџџЪP аа HџџџџџџџџџџџџџџЪT јр Hџџ!џџџџџџџџџџџџЪZ H Hџџ$џџџџџџџџџџџџЪ^ p Hџџ&џџџџџџџџџџџџЪd Р@ Hџџ)џџџџџџџџџџџџЪh шP Hџџ+џџџџџџџџџџџџЪn 8p Hџџ.џџџџџџџџџџџџЪў p ˆ Hџџ0џџџџџџџџџџџџЪ џџџџј Hџџ3џџџџџџџџџџџџџџџџЈ8џџџџ €џџџџШ˜ј€РшџџџџˆиџџџџH0PџџџџРhXјpHџџџџџџџџш№@Ирџџџџ`џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџЈџџџџxџџџџџџџџџџџџџџџџџџџџЈˆ(џџџџџџџџ0џџџџ(а ˜рXА8џџџџџџџџаџџџџp ƒј џџџџџџР џџџџџџџџџџџџџџ%Number of non-blank valuesџџџџPercentage of non-blank valuesCumulative% of non-blank valuesџџџџџџџNumber of numeric valuesank vaRangeMinimumStLower QuartileMedianUpper QuartileMaximumuartileSkewnessUpKurtosisMaCorrected sum of squaresKuUncorrected sum of squaresquarCoefficient of Variationof squ PercentileProportion of valuesPercentage of valuesNumber of valuesPe User-DefinedsuBlankCountAllCo %CountAllnedtiCum%AllCoCountTotalMeanStDevRangeMinimumToQ1MedianQ3MaximumfinedSkewnessMeKurtosisMaCSSUSSCVPropPercentCSCountUserDefPrExcel add-in for statisticsCopyright 2004:dd-in f6Statistical Services Centre, The University of ReadingUnited Kingdom˜ `rsity of ReadingUn Kingdom˜ 8џџџџLџџЪ џџџџLџџџџџџџџџџџџџџЪ ˆЈ Hџџ1џџџџџџџџџџџџџџџџџџџџџџџџ  8џџџџ €џџџџШ˜ј€РшџџџџˆиџџџџH0PџџџџРhXјpHџџџџџџџџш№@Ирџџџџ`џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџЈџџџџxџџџџџџџџџџџџџџџџџџџџЈˆ(џџџџџџџџ0џџџџ(а ˜рXА8џџџџџџџџаџџџџp џџџџh џџџџ№џџџџј8џџџџ €џџџџШ˜ј€РшџџџџˆиџџџџH0PџџџџРhXјpHџџџџџџџџш№@Ирџџџџ`џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџЈџџџџxџџџџџџџџџџџџџџџџџџџџЈˆ(џџџџџџџџ0џџџџ(а ˜рXА8џџџџџџџџаџџџџp џџџџР џџџџHџџџџP8џџџџ €џџџџШ˜ј€РшџџџџˆиџџџџH0PџџџџРhXјpHџџџџџџџџш№@Ирџџџџ`џџџџp џџџџџџџџџџџџџџџџџџџџџџџџЈџџџџxџџџџџџџџџџџџџџџџџџџџЈˆ(џџџџџџџџ0џџџџ(а ˜рXА8џџџџџџџџаџџџџp џџџџџџџџ 8џџџџ €џџџџШ˜ј€РшџџџџˆиџџџџH0PџџџџРhXјpHџџџџџџџџш№@Ирџџџџ`џџџџp џџџџџџџџџџџџџџџџџџџџџџџџЈџџџџxџџџџџџџџџџџџџџџџџџџџЈˆ(џџџџџџџџ0џџџџ(а ˜рXА8џџџџџџџџаџџџџp џџџџhџџџџ№џџџџј4џџџџџџџџрџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџџџџџ˜ џџџџџџџџџџџџџџџџџџџџџџџџџџџџOА˜ 7B$*\Rffff*1>4238491cпE0ўЪE€ € џџџџ€ N € џџџџ€ p€ џџџџ€ рЃ]$ЖNumber of blank valuesђс=]$ЖNumber of non-blank valuesђ]$ЖPercentage of non-blank valuesђ0]$ЖCumulative% of non-blank valuesђ(v]$ЖNumber of numeric valuesђPz ]$ЖTotalђXH]$ЖMeanђx]$ЖStandard Deviationђ€]$ЖRangeђ ]$ЖMinimumђШ]$ЖLower QuartileђЈ]$ЖMedianђ№]$ЖUpper Quartileђа]$ЖMaximumђ]$ЖSkewnessђ@]$ЖKurtosisђј]$ЖCorrected sum of squaresђh]$ЖUncorrected sum of squaresђ ]$ЖCoefficient of Variationђ]$Ж PercentileђИ]$ЖProportion of valuesђH]$ЖPercentage of valuesђр]$ЖNumber of valuesђp]$Ж User-Definedђр Summarise]$ЖBlankђ0]$ЖCountAllђ˜]$Ж %CountAllђX]$ЖCum%AllђР]$ЖCountђ€]$ЖTotalђЈ]$ЖMeanђш]$ЖStDevђа]$ЖRangeђ]$ЖMinimumђј]$ЖQ1ђ ]$ЖMedianђ8]$ЖQ3ђH]$ЖMaximumђ`]$ЖSkewnessђp]$ЖKurtosisђ˜]$ЖCSSђˆ]$ЖUSSђР]$ЖCVђА]$ЖPropђш]$ЖPercentђ]$ЖCountђи]$ЖUserDefђ8р About dialog labels]$ЖExcel add-in for statisticsђ]$ЖCopyright 2004:ђp ]$Ж6Statistical Services Centre, The University of Readingђˆ]$ЖUnited Kingdomђ(џџџџ џџџџТГAttribute VB_Name = "modTranslate" ' Mo dule \ `Copyright 2002: Statistical Services Centre, The University of €ReadingKWritten by Colin€ Grayerhntains sЏngs which need tЋIOption Explicit PrivаЬVDesc$rive‚]s 0 Pub€Ans~t6kŒ us‘ NoOfVa lu€~€ЇNumberxblank v‚ NonBC‚ non-P8erc€Д‰ age> !CumulЧIРtve%Є>anŒumV?Tot€‡€=GMeanСƒСStdevС€kndard DHevi/onP RЈ жQ?$ gЃkDi–Co8untсч^vUs€erDefin@* С-ф` !!ЌSumm€ seџ/“A ‡№%*{!ИAllдЄ)%‚ћW‘‡%з …‚ ”>ƒџНƒ)(„@ƒ” ƒ‚ ™Ÿƒtr„Q1” чƒЂƒƒQ3ЕŸ‚Ѓяƒ2o ЯAiЏ>SBќSSџ у є@є Ф?ўVџђџ;ƒW:7;џПВ'Ё:Ÿ'“Q?:!;Б9About №\log laxbelџƒр$†УGExcel addт-Žfor †j!“9пtrї•р Ъ–4:ƒo рmpanyA !‹Ÿ˜`UŸ˜V”˜?r\UKсp›‘_K0–dom` __SRP_18џџџџџџџџџџџџЕJ__SRP_19<,џџџџЗЊmodRegistration DџџџџџџџџiЖ___SRP_dџџџџџџџџџџџџКЄ nrU€€€€~|  (HЁa ™HIбVС q Б qVсV! Qшйф‘ДЁшQщсшБщъQъ ш бYYЩYI 9Zщ љЉZщZ)[q[™[Iэ‰эБэљэ ˜ 7B$*\Rffff*3242370a09*\R0*#13*\R0*#e$*\Rffff*1042384913*\R0*#f$*\Rffff*0?42384913п!ўЪA€ џџџџ€ "€ 0(€ џџџџ„&X„€„„Ј„Lш„ Р€ џџџџ€Р„@€ џџџџ€Ш€а€ џџџџ€ (p€˜„ „А€Р„Ш„ш„„$ „ H„"h„„Ј„Р€И€ џџџџB р€ 4№€ "(€ џџџџ€P€X€`€h€p€ џџџџ x0 ˆИ"?а("ј€ " € 6H € ˜ А &@Ш€ *а  * P€ џџџџX€ џ№(диџџџџЕ(eN 1НэyџџЖџџџџџџџџhџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP> џџџџџџџџџџџџš џџџџџџџџš џџџџ<џџ<џџџџџџh  %Т  HџџџџџџџџџџџџџџSoftware\SSC\SSC-Stat\RegџџџџRegт€ џџџџ@џџџџџџџџъ€ p џџџџ@џџџџџџџџEncSerCname Unregistered.vт€ў x(џџџџ @џџџџџџџџRegistered to р P+ `џџџџџџџџџџџџpџJP џџџџ !Œiƒ џџџџ џџџџp„iƒ џџџџџџџџџџџџ„`„ џџџџlџџџџџ`„" џџџџhџџџџџ`„$ џџџџdџџџџџ`„& ˜ `џџџџџ`„( џџџџ\џџџџџј+*  `џџџџџџџџџџџџ$џJHџџџџAŒiƒ џџџџ џџџџџџџџ„`„Іџџџџrџџџџџ „8 џџџџpџџџ˜ `+Ш@`џџџџџџџџpџkџџџџ џџџџ((PŒP„: џџџџtџџџџџP„< џџџџpџџџџџP„> џџџџlџџџџџ`„( рhџџџџџ+, x`џџџџџџџџџџџџЬўJ€џџџџ!!xŒiƒD џџџџ џџџџ €iƒF џџџџџџџџџџџџ€ „H џџџџtџџџ№€иP„Іџџџџrџџџџџ@„J ј`џџџ џџP„L ˜\џџџџџ`„FџџџџZџџџџџX +. (`џџџџџџџџ€!TџkИ џџџџ™Œiƒ џџџџ џџџџи„iƒ џџџџџџџџџџџџ€P„Іџџџџrџџџџџ`„ъџџџџlџџџџџ N ˆ`џџџџџџџџј"|џ+џџџџџџџџџџЕ„ Licence: to on up to to +0 ш`џџџџџџџџџџџџdџ Ш џџџџ ЬŒiƒR џџџџ џџџџџџџџ„ 4 h`џџџџџџџџџџџџ|џJ(џџџџџџж„iƒ џџџџ џџџџH€iƒ џџџџџџџџџџџџ€+V `џџџџџџџџџџџџ Јџџџџ нŒiƒъџџџџџџџџџџШ€iƒdџџџџџџџџџџџџџџ€`„$џџџџџџџџџџP„Іџџџџџџџџџџ+P Ш `џџџџџџџџА#"џkXџџџџ щŒiƒъџџџџ џџџџx€iƒdџџџџџџџџџџџџ€`„$џџџџpџџџџџP„Іџџџџnџџџџџ+Z  `џџџџџџџџџџџџlџJџџџџ џџџџ љŒ`„тџџџџtџџџџџ T   `џџџџџџџџџџџџXџJ`џџџџџџ „iƒ` џџџџ џџџџ€„iƒџџџџџџџџџџџџ„+@ @ `џџџџџџџџ8Hџkрџџџџ  Œiƒ` џџџџ џџџџ „Iƒf џџџџџџ џџџџџџ„Р`„ ˆ`џџџџџ+6  `џџџџџџџџџџџџДўJ€ џџџџ Œiƒdџџџџ џџџџ  „iƒ–џџџџџџџџџџџџ„`„Іџџџџrџџџџџ`„8џџџџpџџџџџ`„j џџџџlџџџџџ+B џџџџ`џџџџџџџџˆДўkH џџџџ,Œiƒdџџџџ џџџџh „iƒ–џџџџџџџџџџџџ„`„Іџџџџrџџџџџ`„8џџџџpџџџџџ`„j џџџџlџџџџџТ ј (HџџџџџџџџџџџџџџТЬHHџџџџџџџџџџџџџџТ ` ЈHџџџџџџџџџџџџџџfor non-commercial use џџџџъ€ Шџџџџ @џџџџџџџџ computers.d.џ ҘT PBџџџџџџџџџџџџџџ@SSC-Stat, Statistical Services Centre, The University of Readingџџ џџ Public Domain ƒ џџџџџџX џџџџџџџџџџџџџџ%Т А и Hџџџџџџџџџџџџџџ`„ џџџџtџџџџџ€џџџџ(@omainџ`„ џџџџpџџџџџ€џџџџfor commercial use ’т€ Рdџџ џџ @џџџџџџџџџџџџиˆШ` hџџџџџџџџј Pџџџџџџџџx(p џџџџџџџџH џџџџџџџџџџџџџџџџ шџџџџША @   xџџџџџџџџ@а џџџџˆШ` hџџџџџџџџј Pџџџџџџџџx(p џџџџџџџџH џџџџџџџџџџџџџџџџ шџџџџША @   xџџџџџџџџ@а џџџџˆШ` hџџџџџџџџј Pџџџџџџџџx(p џџџџџџџџH џџџџџџџџџџџџџџџџ шџџџџША @   xџџџџџџџџ@а џџџџР`„` џџџџtџџџџџ€џџџџџџџџџџџџomain@„f dџџџ џџ€џџ’(rs.`„` џџџџtџџџџџ€џџџџomain@„f xdџџџ џџ€Т ш№HџџџџџџџџџџџџџџТ H HџџџџџџџџџџџџџџТ Ш Hџџџџџџџџџџџџџџon one computer only.џ`„` џџџџtџџџџџ€@@„f Hdџџџ џџ€(`„` џџџџtџџџџџ€@„f xdџџџ џџ€`„` џџџџtџџџџџ€ј`„dџџџџtџџџџџ€@„f Јdџџџ џџ€p`„dџџџџtџџџџџ€Т А˜ Hџџџџџџџџџџџџџџ`Шџџџџzџџџ џџ useџџџџ @ 2 FЂB zЂ€ ˜0џџ @џџџџџџџџ’`„` џџџџtџџџџџ€џџ@„f Иdџџџ џџ€џџџџ`„` џџџџtџџџџџ€џџpPџџџџџџ`„dџџџџtџџџџџ€џџџџ@„f шdџџџ џџ€@ўџџџџџXџџџ џџ `„dџџџџtџџџџџ€џџџџџџˆ`„dџџџџtџџџџџ€ џџЂ€ ј Lџџ @џџџџџџџџТ ИАHџџџџџџџџџџџџџџТ рhHџџџџџџџџџџџџџџТ 80HџџџџџџџџџџџџџџТ xHџџџџџџџџџџџџџџ@ўџhTџџџџџ `„ џџџџtџџџџџ€ј`„ џџџџtџџџџџ€Т и Hџџџџџџџџџџџџџџт€ џџџџfџџ џџ@џџџџџџџџЂ€ xџџЈ @џџџџџџџџ@ўџШDџџџ џџ џџџџH0  `„dџџџџtџџџџџ€ˆ@ўџ€@џџџџџ p@ўџ<џџџџџ `„dџџџџtџџџџџ€@XH.     : @ўџр,џџџ џџ @ўџџџџџџџџ џџ (`„ џџџџtџџџџџ€ @ўџџџџџџџџџџ А     ў   џџџџџџџџ`„ џџџџtџџџџџ€џџџџјџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџ(џџџџџџџџџџџџџџџџџџџџ`џџџџ(џџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@  0  Ршџџ`@ џџџџxџџџџџ `„` џџџџtџџџџџ€ `„ џџџџtџџџџџ€џџџџ@„f @dџџџ џџ€(`„` џџџџtџџџџџ€(H`„ џџџџtџџџџџ€џџџџ@„f ˆdџџџ џџ€@`„` џџџџtџџџџџ€@„f рdџџџ џџ€`„` џџџџtџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ( (џџџџшџџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ( h`„dџџџџtџџџџџ€џџџџ@„f dџџџ џџ€HH`„ џџџџtџџџџџ€И( `„ џџџџpџџџџџ€`„` џџџџtџџџџџ€џџ`„ џџџџtџџџџџ€џџџџџџџџџџџџа xј џџџџшџџџџPp ˆШИџџџџџџџџh@ џџџџџџџџџџџџ xxР шџџџџ` рџџџџџџџџА џџџџ˜џџџџџџџџ8 @ј Ш Аиџџџџџџџџ( џџџџџџџџџџџџџџ`„dџџџџtџџџџџ€@@„f Pdџџџ џџ€(џџџџ^  h џџџџ `@ `„ џџџџtџџџџџ€џџџџџџџџа xј џџџџшџџџџPp ˆШИџџџџџџџџh@ џџџџџџџџџџџџ xxР шџџџџ` рџџџџџџџџА џџџџ˜џџџџџџџџ8 @ј Ш Аиџџџџџџџџ( џџџџџџџџџџџџ@ўџџџџџ\џџџџџ џџџџ@ўџџџџџXџџџџџ џџџџ`„dџџџџtџџџџџ€џџџџ@ўџџџџџHџџџ џџ џџџџ`B џџџџxџџџџџџџџџ`„dџџџџtџџџџџ€џџџџџџ@@`„dџџџџtџџџџџ€ˆ   џџџџh џџџџџџџџ0џџџџИ џџџџџџџџџџџџџџџџHџџџџџџџџџџџџшџџџџИџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџ0p@@ўџ@jџџџџџ џџ@ўџџџџџhџџџџ `„ џџџџtџџџџџ€(џџџџњX Fџџ џџ @ўџ Xџџџ џџ (@ўџHџџџ џџ @ўџа8џџџ џџ @ўџ0(џџџ џџ џџџџ@ўџџџџџ$џџџџџ џџџџ@ўџџџџ џџ џџџџ@ўџшџџџ џџ џџџџ@ўџhєўџџ џџ џџџџ`„ џџџџtџџџџџ€p@ўџ€фўџџ џџ (@ўџдўџџ џџ Рџџџџ`„ џџџџtџџџџџ€џџџџHџџџџџџџџ`„ џџџџtџџџџџ€@ўџџџџџФўџџ џџ @@ўџџџџџДўџџ џџ (`. џџџџzџџџ џџ`„ џџџџtџџџџџ€x0`„R џџџџtџџџџџ€џџџџџџџџа xј џџџџшџџџџPp ˆШИџџџџџџџџh@ џџџџџџџџџџџџ xxР шџџџџ` рџџџџџџџџА џџџџ˜џџџџџџџџ8 @ј Ш Аиџџџџџџџџ( џџџџџџџџџџџџ џџџџџџN šT  P    џџh"8" `„dџџџџtџџџџџ€џџџџџџџџа xј џџџџшџџџџPp ˆШИџџџџџџџџh@ џџџџџџџџџџџџ xxР шџџџџ` рџџџџџџџџА џџџџ˜џџџџџџџџ8 @ј Ш Аиџџџџџџџџ( џџџџџџџџџџџџџџџџџџџџџџџџа xј џџџџшџџџџPp ˆШИџџџџџџџџh@ џџџџџџџџџџџџ xxР шџџџџ` рџџџџџџџџА џџџџ˜џџџџџџџџ8 @ј Ш Аиџџџџџџџџ( џџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџx"џџџџџџџџџџџџ "џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8"џџџџџџџџџџџџџџџџр"˜@ўџџџџџ\џџџ џџ џџџџ@ўџP"Zџџџџџ џџ@ўџџџџџXџџџџ "P" џџџџ@ўџџџџџTџџџџџ џџџџџџџџP"И"`„` џџџџxџџџџџ€h$P$`„џџџџtџџџџџ€` ў  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜#џџџџџџџџ  џџџџџџXџџАџџџџ˜џџџџџџџџџџџџџџџџP$џџџџџџџџXџџџџџџџџxџџџџџџџџџџџџX%џџџџ %џџџџ№$p%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜$џџџџџџџџџџџџџџџџP$и$И"`P џџџџxџџџџџx$џџџџШ$˜$џџџџр џџџџˆ$@ўџА$lџџџџџ @ўџџџџџjџџџџ ˆ%А$џџ џџџџџџњX @ўџ(џџџџџ@ўџ%Xџџџ џџ џџ@ўџџџџџHџџџ џџ џџ@ўџ@%8џџџ џџ џџџџ№#@ўџџџџџ(џџџ џџ @ўџџџџџ$џџџџџ @ўџџџџџ"џџџџџ џџџџА$џџџџр$џџџџа џџџџџџџџџџџџ џџџџиџџџџџџџџџџџџџџџџџџџџ0 lџџџџџџџџџџџџџџџџџџџџџџџџџџџџ;i73dpj n`єЮ›ЭЊ`Ž@оєSіYФ@оєSіYФfџџџџџџџџџџџџ НoikџџџџPi81џџџџln n`єЮ›ЭЊ`Ž@оєSіYФ@оєSіYФџџџB  `€ Fh€ џџџџ€А€ И€ џџџџШ-р)ј ( 0€ џџџџ@€ џџџџBH€ .P€ џџџџ€€€˜€ џџџџ€ L № 8&AP"?x ˜р€ *ш(8р и   0 8 @P /Xx€ €   АH€ *А.8P ˜€ џџџџ € џџџџB  Ј€ џџџџ€А€И€Ш€а€ џџџџи€ ш 8@(;X$2€Ј€ Р р ш№@[ј 8 @H` x4€˜€ џџџџ € џџџџB Ј€ DА€ џџџџ€ј€ € џџџџ € џџџџ  € 0 аP  p € ˜ А Ш  р  Р ( р ј    € џџџџ € џџџџ" € џџџџ€ * P p  А € 8PpˆЈР€ 6и€ш  0€ џџџџШ € џџџџB  а € џџџџи р ј   € џџџџ € џџџџ"  € џџџџ (  8 € џџџџH € џџџџB  P € џџџџ€X € џџџџ"h  "Ј а и € џџџџр € џџџџB ш € џџџџ€№ € џџџџ    "?(  P "X €     € џџџџЈ € џџџџB А € 4И € >№ € <0 € џџџџ€p € џџџџx  € џџџџ  € џџџџ"  Ј € FА € џџџџ+ј € џџџџ€ џџџџB… € J8€ џџџџ€ˆ€ џџџџ+ Ј ИРШа€ џџџџи€ џџџџB  р€ 2ш€ џџџџ€ €(€0€ џџџџ 8HP hx€ B˜>tр € џџџџ0€ џџџџB 8€ 2@€ џџџџ€x€€€ˆ€ џџџџ8 Ша шј€ J>th Ј€ џџџџИ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџXр Module modRegistration.basrsion р* Routines to validate registration details]ЖSoftware\SSC\SSC-Stat\Regђа  ]ЖRegђј ]ЖEncSerђџџџџџџ]ЖCnameђ џџџџџџ]ђP] ђx] ђp  œІ (–fр- Validate the user's registration informationџџџџр and save it in the RegistryH”|]ђ]ђЈ]ђР]ђи]ђ№  Жœџџџџ  $* ' р(Get rid of all but numerics  " $, '  Ќ$zЖ$Ђ$H'& Ж & $.  " $0 œр Registration number is validр 0 Add disk number to it and store in the registryЖC:\$2 '( X ( X '  ( $6 A4 dџџрр $Invalid - tell the user to try againЗ' zџџ kџџ˜kџџAШр(To set up variables correctlyЗ' iџџP–р@ Removes all non numeric characters from the registration number]ђh]Ќђ€џ ІўЌ  ’  ІЌ$њ'8 8 Ж0 8 Ж9œ * 8 '* kџџ€џ ІўШiџџh– р' Validate the info held in the Registry]ђрђјђ]ђ(рF Get serial number from Registry and subtract the disk number from it. Ж1$@ ': ЖC:\$2 '( : X ( X ': Ж1$@ '< < Ќ$FЖ$Ђ ( $B '< < Ќ$zЖ$Ђ$H'> : > $. œЗ' ]ђи І$ ' р, CJG 4/7/03ceЗ'Шр$ The following changed by CJG 4/7/03 < ' dџџ€ І$ 'ў р, CJG 4/7/03ruЗ'ШІ ,  :       ' e ЌЌ+ Ж' kџџiџџј–@]ђР]ђјђ]ђ(]ђ@ D Ќ œрReg no is too shortЖ', zџџˆkџџ€ЌЌсH pЖ'L џ ІўЌЌ’ L D Ќ ІЌ Ќ$њ'L D Ќ ІЌ Ќ$њX'Fј FЌ FЌ œр Invalid array indexЖ', zџџАkџџЈ D Ќ ІЌ$њX D Ќ ІЌ Ќ$њX+H џЧ`Ж'F џ ІўЌЌ’ F І$H 'F џЧ  L D Ќ$њ'L L ', iџџј–xр> Returns true if the unencrypted registration number is valid.]ђј]ђA@N З'.  $š›Gzjр Subtract version numberџ Іў  Š  ‘’  X 'ъ ъ І$ $P 'ъ ъ  $P 'ъ ъ  $P 'ъЌ ъ ъЌшœЗ'. ЌЌ+ yџџxkџџpџЧhiџџ`–(р$ Licence types encoded in reg number+ Ж Single userЌ+ + Ж Small groupЌ+ + Ж Medium groupЌ+ ЖSiteЌ+ + oџџЈ–ˆЗ'0 R Ж›Gzj R X ZX œЗ'0 kџџ`iџџX–ш  AT   AT oџџ(–h]ђшђ dЌ ›G ъ d'$jџ ІўЌ d’ $ d ІЌ$њ$X  '$џЧ  $'V iџџ–]ђ˜ђАЌ'P ъ'$џ ІўЌ d’ $ d ІЌ$њ$X  '$џЧ  dЌ ›G $ d'$j $ $œ $X 'P kџџаiџџШ–Шр. Called by dlg_Registration when it is loaded.р8 Creates the Instat registry entry if it does not exist.р5 Returns false if user does not privileges to do this]ђ ^  $\ 'т тЌ'Z iџџа– р@ Puts Registration number into Registry under HKEY_LOCAL_MACHINE ^  ` d A@b oџџXІ $їЖ– рD Extracts Registration number from Registry under HKEY_LOCAL_MACHINE]ђ( ^  ` $h '  Жœ f '@ dџџА  '@ kџџ iџџ˜–@ р+ Encodes a text string using a given number]ђР ]ђи ]ђ№ –X 'j Ќ'8џ ІўЌ d’ 8Ќ '8 8 j  ›GЌ'8jр< Add next numeric digit to ascii code of next text character 6 d ІЌ$њ$X  j 8Ќ$њX $F'6 џ ІўШiџџ@– р+ Decodes a text string using a given number]ђˆ ]ђ  ]ђИ –X 'j р$%Convert a negative number to positiveЌ'8џ ІўЌ d’ 8Ќ '8 8 j  ›GЌ'8jрC subtract next numeric digit from ascii code of next text character B d ІЌ$њ$X  j 8Ќ$њX $F'B џ ІўШiџџИ ]ЌђА  T ' џџџџИ ]Ж@SSC-Stat, Statistical Services Centre, The University of Readingђ` џџџџ8ЖRegistration was successfulA@вџџџџ(р! Declarations added by CJG 4/7/03]ђШ]ЌЌђx]ЌЌђ˜]ђј ]Ж Unregistered.ђР]ЖRegistered to ђИ]Ж Licence: ђш]Жfor non-commercial use ђр]Жfor commercial use ђ]Жon one computer only.ђ]Ж on up to ђ8]Ж computers.ђ]Ж Public DomainђА  < Ж. :    '   ' dџџи  ' kџџР  œ   ' dџџ     ў   ' kџџxр End of changes  Ќ$ ' р$ The following changed by CJG 4/7/03 ъЌє' р, CJG 4/7/03Ж Large siteЌ+ р1 Licence names to be displayed - added CJG 4/7/03Ж Single UserЌ+ ЖGroupЌ+ Ж DepartmentalЌ+ ЖSiteЌ+ Ж Large SiteЌ+ р/ Max number of users allowed - added CJG 4/7/03ЌЌ+ ЌdЌ+ ЌшЌ+ ]ЌЌђџџџџИџџџџЗAttribute VB_Name = "modRegistration" ' Modul„e p.bas:Routines to validaІrŠ detailX C onst ЦyKeyuSoftw€are\SSCР-Stat\$ 0”1 SerialNumber1Enc:Cu@stomerтCnы€tSignpatur€€@‚>, A„ical €'vicqCentre, The Univers@ity ofiaPding,V o(nNoI2ЃDim L"nce ”As/r  Arr„ s(0 To 4)  Public c mn|†ЮMess agŠ&Text (' DeclaCys added by CJG @4/7/03C&N`oOfUs€2IРntegerЦ,? - D5^R6?Com@gc€pСBoo0leanŠ€gUnЙУ’er€(€ЈЩ.ЩqџƒF @P ЧAІI „%‹…d: For8NonG&€@ fo€r non-c‡,8useM’ ˜ One€ p@т‚Џon 0one ƒondlyЪ9UpУ7 uЖp6Es7s ‰DomainС/„FР Ё2S€SleA?Њ2FQFunctu „ €3V„~.cJ( ""aрdAaaРрЁc*O F(b)#'G@et rida•aˆll П nu olicГc с5р={`›Ib К!@ C ,к )уRч Case@plaШceSРЫngЁ…рЉp€(1),`о)(Ѓ ЃAР2Т9У€St, ‡ €?ЛхA(фl!'рчч? ЁУis#дчBР Add d`/!"Яс й B"DtoУрdЛ!K‘rфCAaD‡6р= apiсЦfвР("C:\"(‹ -CР$(CL%РSt) + ч lzCс6S@VІ $@оo? И-A.ш Ms@gBox "*w@as sucPns8ful`@a 1El$se In‚~ -8 teА$U7СHtr№y agE+oBЕ|фFaўExаFwђE IfѓЙrрCheck9 €+б5A '0Ss0Sva №‚blа|corrpectl? 5 Tфru$ ‘З Qиriv5 P8__PpULу1У 'p7mАx0" =ѕG<@9=L иpyй& ц# сy N§aŽiх ~3”f`#}BЄ(/f“­С.сd №heldŸcA #!st $, stџ19€ L’'g:a=_ќ' q[˜ё‘TL’ t.#Р6P1subЛctЧђ!‰LЂit.увлP Fа$%(йJрYў1ХJЈ ŸM5šMХM})@Bw4"уŸ(ЩК™`Ћ˜N‰f#,ё@"r(0Sf№jЖY”Ћє UЯj(5SПjО 0-vi’ riС)ьgёИ“= (ЧІ”дА9p_П(УЭЧGБ%'С РfollowАDB|ngЯЛЁ1/У"У=-)rѓГ&4* & "."PvbCјrLf€ uЪѓ$ПЁ>чАpб8‰n5Ыў=ЯЬУЬR`H№‡dС@ЈџчЯh‚ Оџ8xf$(/БВџЕXПп Q3ППѓОТ& ЧлХфžшЖ End IfL А0' ˆof changesdcmnRegistrationText = stJElse^SingleUˆserLTru4regCheck! ONumb*Fa F' The f`ollowQ—d by CJG Р4/7/03u Ѕ€MessageЈrUnxРered & vbCrLfLicenмce€n_‡)…™&€„rForNonCommer0cial~*On‚e€ puterU™Ј""ƒЬ FuncК Private … U9bin eD €Ѓ(stIn6 As StКr€š,€N‡)С6Dim Arr(‚IntegCE+Ai%, РEРlementФ…0Ret$ƒ,AIn8dexС УIf LenE') tG :€u…KEx 4ŒHA'Invalid arr№ay i]Ч*AœJПKТ,‚&Н) &›tЈN@†ЃstЂQќ= Х7Х.#3Gz&"TiФ& ƒ8а31О6d"Рa_ўkVA-QS(By@ NzoЧg,‚wЦm"hB oolead['€0turnРZ Ё iHf t šunрŽr8yptр‘C“cЋ n—ƒЁ `Т<.Iti%У#‡YrLongFќef BD™duЃ 6­ sNot Is eric(b)"O №D' SubСct veќrsРСDƒ Ђ уШ- VcNoУ…=€LBound(Lу% o UЯуЁSc! jLngdMUPnEnca*(@,уСE… (i)dA Ќ!9нРФSignкa :eh (0€šAA€hс<= 10ђ0 ZheЈœс1‹уD@($Namens`'QпaNшoOfAюs@р*ЦEGkЁ >=р 500)Q0{„г!oxm9W:?lP ublicQ$ DM+(@s' Ѕt ypes №2odqа2in 3J'h$(ч` АEˆ u ˆDu91AK"Small@ group?(22Medium#ORƒs(3ƒite(4ТLarm@ˆs'w n‘Рn be displ„ay№ - adq}ъ ZQєJcGъDeparђt}alO/Uc)E9S9Max$ “Ѕqs рowо/Eœ W+1Ѓ ŠэR 82„{*bџР8OCq:ATс+аMЁџž–B;ЁkЇ`‚lŸ_’_ЃџF5;WрFтqpПVC PECфNС) > џђУРБˆEЉWE9o8№ SaveSЙР_al€KУUOnt'-6:C4бIТy(ч†0НrNo№!Cп€y(Custo0Гџс$цtђЯgЏx^Q Ap4, x кq0Ўteќmpсts€сЉ`K@C[ в= С\*џтЋђ…lТЂЖГБkДb+ c’ ,ќ i‘ 4 "Aх(Г•О?)onаПgЇ *ƒDoаXe я…У fq€0#B r_ѓПа4Н-П1ПЕx7œџ@sѕт/ џ ёЕСqVB1™ b3?В# 1&жуiu Cre ер:сяyEnјtrycвLžС-АMАщ0dlg_єтђ wЧС №Щ0loaА]@q'ФЁЁInsјtatБm’№n сЂ)dopn`šexяРцPЌ‚ЅfqѓЁqVЪ ЦpатilАмo`€ЇiЁ<Г Dim Result AРs LongИ(d= VbRegCreateKey(HKEY_LOCAL_MAC HINE,Šgiаstry>)z^p.En8 = (Ј0' End Function Privl Sub SaveInG(ByValiДStringЬ, ueb€' Puts Bad numbe@r into y№ und€ ohƒj1…Set4œ„, `€SEG_SZ|, $ƒywublic†€ Ge tFromžy_ƒIsф™Opy€šƒ‘Defaј= "")ЧJУ' ExtЈracдKf€% Х%лK€u%ƒ˜gNoMУР€„˜Quer9wueн˜EVФIf%"" The?@‘ED SР @ ElќseC  („ @ЉIfУзЌХБ EncodedTexоtD­‡AХЌNƒЂрƒQds a tРF €й@М usAaР givenФГХ& 2^iAInteиgerУAjRР>SbiЁ#Щ Ч= ‚CР(Abs(€U h)Є0j`+0cFo`kР1 To №Len(AФAрj + 1УA`8Xj >‚f )b9 Ё(' Add &na!Рxer@gdigit `yascˆii / ofcё‚&chaЁZХ ш3 Љ& Chr(€Asc(MidB, i, 1))@Cр)тІ, jk‚фNiпD ьDeпDР† Р !–зDџ пDe #пD‹GІпDЮD .'ConveDrt€Yneg`БveeБ 7positрYCС>џIA9"DџIgёѕIsub‚ž‘JBžпJ?тщaш9РJЉиJ- пJкJСШ 0 ќЦ  0 ќЦ  x :Xџ% 1tџCTџTџ^qhџ/TџltџPlhџЎћў1tџ:Xџ% 1pџAѕDџ Dџ§ўTџlpџ  1<џlhџ><џ#@џ 1pџ2Tџ@џ<џ5Dџ?ѕDџ Dџ§ўTџlpџ  F,џџ џ`1lџ/Tџ6Dџ,џџlџltџ Ц”ѕLžћ0˜fєџpzџ8 lpџ*#Tџ*#@џ*#<џ”*#џ*§ч2Tџ@џ<џџ “dS”*§чf”*§ч “f†”*§чЗ/”*#Tџ“(ћ§#@џ*#<џ*§ч2Tџ@џ<џ lpџT єџ˜fєpzџ8*#Tџ”*#@џ*#<џ*#џ*§ч2Tџ@џ<џџ Td 0bpџlџtџ(Tџ@џ<џџDџ,џџ0 ќЦ@  @l Ctџ єpzџtџM\џ@ У,ltџќ3єыЏќ1tџєLфrџєќЫфўcXџ ltџPqlџkrџч@lџ^qlџllџ^qlџCTџTџlџ^qlџ/TџѕllџбllџѕшжФљєџpzџkrџчLžTkrџч0˜(llџѕєр˜d rџdXџZ ((btџTџ$єѕ; ѕ;!ѕ;"ѕ;#ѕ;$ѕL;%ѕL;&ѕL;"ѕL;'ѕL;єѕ0Ђєѕ0Ђєѕ0Ђєdѕ0Ђѓшѕ0Ђє$b 0 ќЦˆ  0 ќЦш  0 ќЦh  шЌ ѕqxџ € ьtpџєnџ€Jфўcjџp?(8џknџчlMXџ@(џ (џ§ў$џ p"џopџk"џыЏtpџ/$џ68џ(џ nџdjџ'€Jѕлopџ€JьЖtpџopџћчэopџШЅ opџшqxџ \Ќ$b $џ8џ(џ0 ќЦШ  0 ќЦ   Ќdl Ctџў’dџ+tџCXџXџѕ€Y\џHџ Hџ`1`џ/Xџ5Hџ l`џћ0S dџќ1xџ]l`џCxџ4d4xџ`џdџtџXџHџ0 ќЦ@   (аl Ctџ lМћў1lџєppџєrџltџJфўchџЪ kpџєЉppџkpџчllџJлLєppџtlxџFФў(8џkrџчtџMXџ@(џ (џ§ў$џ (єўkpџчlџMџ@фў фўќE­чдў дўћяДў`1xџ/$џ68џ(џєўфўфўдўДў rџdhџ, Ша0bxџlџtџ($џ8џ(џєўфўдўДў     %rU€€€ џџџџџџџџl, `§џџџџџџџџџџџ™Б(Љ `ќџџџџџџџџџџџ™$б `§џџџџџџџџџџџ,љ `ќџџџџџџџџџџџЩс00,! `ќџџџџџџџџџџџ™Б0$I `§џџџџџџџџџџџ(q `ќџџџџџџџџџџџљ,™ `ќџџџџџџџџџџџ™Б00,С __SRP_c?џџџџщgmodRegApiџџџџџџџџџџџџЃžs__SRP_4џџџџCџџџџїі__SRP_5џџџџџџџџџџџџ •`ќџџџџџџџџџџџ!(0,щ `ќџџџџџџџџџџџ!(0$ `§џџџџџџџџџџџ,9 `ќџџџџџџџџџџџ9Q,a `§џџџџџџџџџџџ9i,‰ `ќџџџџџџџџџџџ!,Б `ќџџџџџџџџџџџ!nrU€€€€~|   ўџџџ   !ўџџџ#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQўџџџSTUVWXYZ[\]^_ўџџџabўџџџdefghijklmnopqrstuvwxyz{|}~€џџџџџџџџџџџџџџџџџџM˜ 7B$*\Rffff*0?42384913*\R0*#fп4ўЪj€€ џџџџ€ :€ H€ 4`€ ˜€ И€ $Р€ &ш€ $€ :8€ џџџџ€ .x„Ј„И„Ш„и„ш„ј€ џџџџ€ .„<8„0x„ Ј„0Ш„$ј„ „4@€ џџџџ€ "x„  „ А€ џџџџ€ Р„р„№„„„ „ 0„ @„ P„ `„ p„ €„,„>Р„„& € џџџџ€ ,H€ $xH€ € џџџџ€ *ИH€$ш€ џџџџ€ .H€0€ ZH€ џџџџ€ 4ЈH€р€ џџџџ€ ,јH€(€ џџџџ€ ,@H€p€ Zˆ€ џџџџ€ 2шH€Œ$pLџџџџW$K\1НяyџџЖџџœВ @џџoRegOpenKeyExAВ 8RegCreateKeyExAВ \--$bRRegQueryValueExA”d В „џџHџџRegQueryValueExAџџџВ ЌџџpRegQueryValueExAџџџВ дџџ˜џџRegSetValueExAџВ јРџџRegSetValueExAВ џџфџџRegDeleteKeyAџџВ @џџRegDeleteValueAВ dџџ,џџRegCloseKeyђ „џџPGetVolumeInformationAŒ џџџџ џџџџџџџџџџџџџџџџxџџMEpџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(> џџџџ<џџџџ<џџџџџџџџ@ ژr ј€CџџџџџџџџџџџџџџЪ˜^ P€CџџџџџџџџџџџџџџЪ˜v €CџџџџџџџџџџџџџџЪ˜z HBџџџџџџџџџџџџџџЪ˜d ШBџџ џџџџџџџџџџџџЪ˜~ pBџџ џџџџџџџџџџџџЪ˜‚ ˜Bџџ џџџџџџџџџџџџЪ˜† @BџџџџџџџџџџџџџџЪ˜ˆ РCџџџџџџџџџџџџџџЪ˜Œ шCџџџџџџџџџџџџџџЪ˜ ИCџџџџџџџџџџџџџџЪ˜’ BџџџџџџџџџџџџџџЪ˜– 8 BџџџџџџџџџџџџџџЪ˜š 0BџџџџџџџџџџџџџџЪ˜œ `BџџџџџџџџџџџџџџЪ˜  ˆ?CџџџџџџџџџџџџџџЪ˜Є ЈCџџџџџџџџџџџџџџЪє Аи Hџџџџџџџџџџџџџџ+І Аpџџџџџџџџџџџџџџ iƒЈ џџџџџџџџџџ0„iƒЊ џџџџџџџџџџP„iƒЌ џџџџџџџџџџp„iƒЎ џџџџџџџџџџ„iƒА џџџџџџџџџџџџџџ€+Д $pџџџџџџџџџџџџ№џџ$ iƒЈ џџџџџџџџџџ„iƒЊ џџџџџџџџџџ0„iƒЖ џџџџџџџџџџP„iƒИ џџџџџџџџџџp„iƒК џџџџџџџџџџ„iƒЎ џџџџџџџџџџА„iƒМ џџџџџџџџџџа„iƒА џџџџџџџџџџ№€iƒО џџџџџџџџџџџџџџ€+Р HpџџџџџџџџџџџџPџџH iƒЈ џџџџџџџџџџp„iƒТ џџџџџџџџџџ„iƒФ џџџџџџџџџџА„iƒЦ џџџџџџџџџџа€iƒШ џџџџџџџџџџ№„iƒЪ џџџџџџџџџџџџџџ€+Ь ppџџџџџџџџџџџџPџџp iƒЈ џџџџџџџџџџp„iƒТ џџџџџџџџџџ„iƒФ џџџџџџџџџџА„iƒЦ џџџџџџџџџџа€iƒШ џџџџџџџџџџ№€iƒЪ џџџџџџџџџџџџџџ€+Ю ˜pџџџџџџџџџџџџPџџ˜ iƒЈ џџџџџџџџџџp„iƒТ џџџџџџџџџџ„iƒФ џџџџџџџџџџА„iƒЦ џџџџџџџџџџа€iƒШ џџџџџџџџџџ№„iƒЪ џџџџџџџџџџџџџџ€+а  РpџџџџџџџџџџџџPџџР iƒЈ џџџџџџџџџџp„iƒТ џџџџџџџџџџ„iƒЖ џџџџџџџџџџА„iƒв џџџџџџџџџџа„iƒд џџџџџџџџџџ№„iƒж џџџџџџџџџџџџџџ„+и  фpџџџџџџџџџџџџP џџф iƒЈ џџџџџџџџџџp „iƒТ џџџџџџџџџџ „iƒЖ џџџџџџџџџџА „iƒв џџџџџџџџџџа „iƒд џџџџџџџџџџ№ €iƒж џџџџџџџџџџџџџџ„+к  pџџџџџџџџџџџџP џџ iƒЈ џџџџџџџџџџp „iƒЊ џџџџџџџџџџџџџџ„+м  ,pџџџџџџџџџџџџа џџ, iƒЈ џџџџџџџџџџ№ „iƒТ џџџџџџџџџџџџџџ„+о p PpџџџџџџџџџџџџP џџP  iƒЈ џџџџџџџџџџџџџџ„+р  ppџџџџџџџџџџџџА џџp  iƒт џџџџџџџџџџа „iƒф џџџџџџџџџџ№ „iƒц џџџџџџџџџџ „iƒш џџџџџџџџџџ0 €iƒъ џџџџџџџџџџP €iƒь џџџџџџџџџџp €iƒю џџџџџџџџџџ „iƒ№ џџџџџџџџџџџџџџ„Ъј иpHџџ џџџџџџџџџџџџError: Opening Registry Key!Error: Deleteing Key! ќ р `џџџџџџџџџџџџ P џџџџџџ **j„iƒў џџџџџџџџџџp €iƒ џџџџџџџџџџ €iƒ` џџџџџџџџџџџџџџ€`„ џџџџџџџџџџ`„Ј џџџџџџџџџџ+\ `џџџџџџџџџџџџhџJ џџџџ !!”Œiƒў џџџџ џџџџ@€iƒ џџџџџџџџџџџџ€`„ џџџџtџџџџџ`„Ј џџџџpџџџџџ+h Р`џџџџџџџџџkа џџџџ JJЕŒiƒў џџџџџџџџ№€iƒ џџџџџџџџ€iƒ џџџџџџџџџџџџ€`„ џџџџhџџџџџ`„Ј џџџџdџџџџџ`„ а`џџџџџ`„ џџџџ\џџџџџ`„ `Xџџџџџ`„ џџџџTџџџџџ b `џџџџџџџџџџџџиўJџџџџџџ==џ„iƒў џџџџ џџџџ €iƒ џџџџџџџџ@€iƒ џџџџџџџџ`€iƒ џџџџџџџџ€€iƒ џџџџџџ џџџџџџ€`„ џџџџxџџџџџ`„Ј џџџџtџџџџџ`„ џџџџpџџџџџ`„ lџџџџџ`„ џџџџhџџџџџ  ш`џџџџџџџџџџџџ Xџџџџџџ<„iƒў џџџџџџџџџџx€iƒ џџџџџџџџџџ˜€iƒ џџџџџџџџџџџџџџ€`„ џџџџџџџџџџ`„Ј џџџџџџџџџџ+2 џџџџ`џџџџџџџџ@џk(џџџџWŒiƒ џџџџ џџџџџџџџ€`„ џџџџtџџџџџ`„ џџџџpџџџџџ`„ џџџџlџџџџџ`„ АhџџџџџЪ˜n а€CџџџџџџџџџџџџџџЪ˜p €CџџџџџџџџџџџџџџЪ˜t (€CџџџџџџџџџџџџџџЪ˜x xBџџџџџџџџџџџџџџЪ˜|  BџџџџџџџџџџџџџџЪ˜€ №Bџџ џџџџџџџџџџџџЪ˜„ Bџџ џџџџџџџџџџџџЪ˜Š hCџџџџџџџџџџџџџџЪ˜Ž CџџџџџџџџџџџџџџЪ˜” рBџџџџџџџџџџџџџџЪ˜˜ BџџџџџџџџџџџџџџЪ˜ž XCџџџџџџџџџџџџџџЪ˜Ђ €CџџџџџџџџџџџџџџЪі А ј HџџџџџџџџџџџџџџЪњ џџџџˆHџџ!џџџџџџџџџџџџџџџџј џџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ ƒl џџџџџџhџџџџџџџџџџџџџџ%Error: Creating Key!џџError: Querying Value!џџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ џџџџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ Hџџџџџџџџ№ЈАџџџџџџџџ0џџџџxџџџџџџџџџџџџџџџџ@џџџџАџџџџ˜џџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpџџџџџџџџџџџџА(Ш`h џџџџlџџџ џџџџиАˆџџџџџџџџ џџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ џџџџџџџџž І „ о Ю \Р Ь џџ@ўџјPџџџџџ `@ўџџџџџLџџџџџ џџ@ўџџџџџHџџџџџ џџџџp@ўџџџџџ8џџџ џџ @ўџШ(џџџ џџ (@ўџџџџџџџџ џџ ШАџџџџш@ўџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџ`џџџџџџџџHџџџџџџџџџџџџ(xџџџџџџџџџџџџ(џџџџ№џџџџџџџџџџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАир`2 џџџџxџџџџџџџџџџџџџџџ@џџџџF\р џџџџ@ўџџџџџXџџџ џџ џџџџ џџџџаџџџџ@ўџ@Tџџџџџ @ўџˆPџџџџџ @ўџpLџџџџџ @ўџ Hџџџџџ @ўџџџџџDџџџџџ @ўџџџџџ@џџџџџ џџџџџџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ џџџџ€џџџџџџџџџџџџџџџџ№РџџџџИ р џџџџџџџџџџџџxH А џџџџџџџџPа ј@ hр˜Јиџџџџџџџџ0 шА€џџџџˆРџџџџџџџџXАџџџџШ`џџџџ(pџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџша Ј8џџџџ џџџџР"аџџџџЈџџџџџџџџџџџџшџџџџиџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџ € џџџџ€ &8H€`€ џџџџ€ ,pH€ € џџџџ€ &АH€ и€ џџџџH€4р€ џџџџ€ & „(( „"P „ x „"˜ € џџџџ€ DР € 4 € &@ € 8h €   € $Р € ш € $ € 0 € BH € , € 4Р € :ј € D8 € € " ˆ € џџџџ€$˜ € Р € џџџџ€ *р   € џџџџ€ 0  P  `  p € ˆ € џџџџ€ $ И € џџџџ€ а  №  € џџџџ€  8€ џџџџH€ џџџџ€ DP€ 4˜€ &а€ 8ј€ 0€ $P€ x€ $˜€ Р€ Bи€ 2 € 4X€ D€ иB  р€ џџџџ€,ш€&€ џџџџ€ &@:Hh€ џџџџ€ Ј€ &Ш€ №€ € џџџџ€  @€ џџџџP€ џџџџ€ DX€ 4 € &и€ 8€ 8€ $X€ €€ $ € Ш€ Bр€ ,(€ 4X€ .€ DР€ B€ џџџџ€" €&H€p€&€ И€0и€ џџџџ€  6(€ џџџџ€ H h€ x  Ј€ џџџџ€ ,А&9р€ џџџџ€  (€ 8 Xhp€ џџџџ€ $x  Ј Ш€ $р$J€ 0 P `h px€€ * $7а€ ј  (0 8@H€ џџџџ€ P p€ џџџџ€€ џџџџ€ Dˆ€ 2а€ &€ 80€ h€ $ˆ€ А€ $а€ ј€ B€ ,X€ 4ˆ€ .Р€ <№€ 80€ Dh€ А"$ И€ џџџџ€8а€,€,8€.h€.˜€ џџџџ€ Ш6ш€ џџџџ€  ( +8 HX`€ џџџџ€ hˆ " А& и€ $L € H h€ 2x АРШа( №€ $ $;@ € h  ˆ ,+˜ Ш а € џџџџ€ и  ј € џџџџ!€ џџџџ€ D!€ 6X!€ &!€ 8И!€ №!€ $"€ 8"€ $X"€ €"€ B˜"€ ,р"€ 4#€ 0H#€ Dx#€ Р#" Ш#€ џџџџ€*и#€($€ џџџџ€ 0$ P$€ џџџџ€ p$ $  $ А$Р$Ш$€ џџџџ€ (а$ј$€ % 0% @%P%€ џџџџ€ X% x%€ џџџџˆ%€ џџџџB %€ <˜%€ џџџџ€и%€р%€ш%€№%€ џџџџ€ ј%&0&€ H&.lh&˜&€ џџџџ &€ џџџџ€ џџџџ€ џџџџџџџџА&Эџџxр3---------------------------------------------------џџџџџџр-- VbRegMod.Basџџр--- A Visual Basic 32-Bit Module For Accessingр-- The Windows Registry.р--р-- Date: Sunday, May 17, 1998р -- By Custom Software Designers.џџр-- Programmer Raymond L. Kingџџџџр3---------------------------------------------------"i р'-- Windows Registry Root Key Constants.]$Џ€ђЈџџ]$Џ€ђаџџ]$Џ€ђ]$Џ€ђј›]$Џ€ђ(Q]$Џ€ђPр'-- Windows Registry Key Type Constants.]$Ќђ р0) Key is preserved when system is rebootedЌ]$Ќђxр0 Unicode nul terminated string]$ЌђHр0 32-bit number]$Ќђ р0 Unicode nul terminated string]$ЌђШр0 Free form binaryhe u]$Ќђpр0 32-bit number]$Ќђ№р0" 32-bit number (same as REG_DWORD)р-- Function Error Constants.n numb]$Ќђ˜ Re]$Ќђ- Apр-- Registry Access Rights.]$Џђ@ ]$ЏђРъ]$Џђh]$ Š ђшP ]$ Š ђъ]$ЎђИъ]$Ўђ ]$Ў ђрЗ']$Ўђ8']$Ўђkџџ]$Ўђ0iџџ]$ Ž ’  š  œ  ˆ ђ`le u]$ Œ ’  ”  ˜  š  œ  –  ˆ ђX g]$ ž  ˆ ђˆteЌ]$  ”  ˜  ˆ ђ€џџр%-- Windows Registry API Declarations. R р-- Registry API To Open A Key.–шІ–а р$-- Registry API To Create A New Key. dІ '–Ар(-- Registry API To Query A String Value.ІІ–'$рT Note that if you declare the lpData parameter as String, you must pass it By Value. $р.-- Registry API To Query A Long (DWORD) Value. І–$jр&-- Registry API To Query A NULL Value.iџџІ– Calleр&-- Registry API To Set A String Value.рІ–tat reрT Note that if you declare the lpData parameter as String, you must pass it By Value. thisр,-- Registry API To Set A Long (DWORD) Value.І– р -- Registry API To Delete A Key.І– р&-- Registry API To Delete A Key Value.І– р-- Registry API To Close A Key.– І )–p р -- Constants For Error Messages.]$ЖError: Opening Registry Key!ђЈ]$ЖError: Deleteing Key!ђА]$ЖError: Creating Key!ђА ]$ЖError: Querying Value!ђир=-------------------------------------------------------------р--- Procedure : Public Method VbRegDeleteKeyр -- Programmer : Raymond L. Kingр1-- Created On : Sunday, May 17, 1998 11:03:04 AMр-- Module : VbRegModр-- Module File : VbRegMod.basр-- Project : Project1р-- Project File: Project1.vbpр-- Parameters :р<-- RootKey : The Root Key To Open, EG: HKEY_CURRENT_USERр%-- KeyName : The Key Name To Openр--- : Example: MySettings\Settingsр4-- SubKey : The Sub Key Under KeyName To Deleteр=-------------------------------------------------------------рІ– ]ђDА р-- API Return Value]ђDШ р-- Handle Of Keyр#-- Open The Specified Registry Key. ў ­   Ј $І ' р-- Check For An Error.  „ œ є A@в Ј A@о |џџxkџџpр-- Delete The Registry SubKey. Ј ` $к ' р-- Check For An Error.  „ œ і A@вkџџшр-- Close The Registry Key. Ј A@о oџџАр=-------------------------------------------------------------р--- Procedure : Public Method VbRegCreateKeyр -- Programmer : Raymond L. Kingр1-- Created On : Sunday, May 17, 1998 11:03:18 AMр-- Module : VbRegModр-- Module File : VbRegMod.basр-- Project : Project1р-- Project File: Project1.vbpр-- Parameters :р<-- RootKey : The Root Key To Open, EG: HKEY_CURRENT_USERр+-- KeyName : The New Key Name To Createр--- : Example: MySettings\Settingsр=-------------------------------------------------------------р–р ]ђD`р-- Registry API Return Value]ђDxр-- Handle Of Open Keyр-- Create The New Registry Key.І ў ­ і x   ­ Ј  $Д '\ р-- Check For An Error.р If lRtn <> ERROR_SUCCESS Thenр MsgBox CreateErrр End Ifр-- Close The Registry Key. Ј A@о iџџЈ р=-------------------------------------------------------------р.-- Procedure : Public Method VbRegQueryValueр -- Programmer : Raymond L. Kingр1-- Created On : Sunday, May 17, 1998 11:03:29 AMр-- Module : VbRegModр-- Module File : VbRegMod.basр-- Project : Project1р-- Project File: Project1.vbpр-- Parameters :р<-- RootKey : The Root Key To Open, EG: HKEY_CURRENT_USERр%-- KeyName : The Key Name To Openр--- : Example: MySettings\Settingsр(-- ValueName : The Value Name To Queryр=-------------------------------------------------------------рІ–]ђD0р-- API Return Code]ђDHр-- Handle Of Open Key]ђD`р -- The Data]ђDxр-- Long (DWORD) Value]ђDр-- String Value]ђDЈр -- Type Returned String Or DWORDр-- Open The Registry Key. ў ­ ž Ј $І ' р-- Check For An Error.  „ œр MsgBox OpenErr Ј A@о zџџX kџџP р%-- Query Registry Key For Value Type. Ј  ­ ­  $Ю ' р-- Check For An Error.  „ œр MsgBox QueryErr Ј A@о zџџkџџˆр-- Get The Key Value By Type. ъЌKTр-- REG_SZ (String)  Ќ$\' р-- Get Registry String Value. Ј  ­  $Р ' р-- Check For Error.  „ œ 'h dџџЗ 'h kџџ€ЌKTр -- REG_DWORDр#-- Get Registry Long (DWORD) Value. Ј  ­   $Ь ' р-- Check For Error.  „ œ  'h dџџШЗ 'h kџџИnџџАр-- Close The Registry Key. Ј A@о iџџxр=-------------------------------------------------------------р,-- Procedure : Public Method VbRegSetValueр -- Programmer : Raymond L. Kingр1-- Created On : Sunday, May 17, 1998 11:03:42 AMр-- Module : VbRegModр-- Module File : VbRegMod.basр-- Project : Project1р-- Project File: Project1.vbpр-- Parameters :р<-- RootKey : The Root Key To Open, EG: HKEY_CURRENT_USERр%-- KeyName : The Key Name To Openр--- : Example: MySettings\Settingsр'-- ValueName : The Value Name To Openр6-- KeyType : The Key Type, EG: REG_SZ Or REG_DWORDр1-- KeyValue : The Value To Set Under ValueNameр=-------------------------------------------------------------рІ  –Р]ђD р(-- Returned Value From API Registry Call]ђDИр-- Handle Of The Opened Key]ђDар-- Setting A Long Data Value]ђDшр-- Setting A String Data Value]ђDр-- Size Of String Data To Setр-- Open The Registry Key. ў Ќ   Ј $І ' р-- Check For An Error.  „ œ є A@в Ј A@о |џџ kџџ˜р-- Select The Key Type.  ъЌKTр-- REG_SZ (String)  ' р-- Assign Key Value ' р-- Get Size Of Stringр-- Set String Value. Ј  ­ d  $а ' р-- Check For An Error.  „ œр, MsgBox "Error Setting String Value!" Ј A@о |џџ8kџџ0ЌKTр -- REG_DWORD  ' р-- Assign The Long Value.р-- Set The Long Value (DWORD). Ј  ­ |  Ќ$и ' р-- Check For An Error.  „ œЖ!Error Setting Long (DWORD) Value!A@вkџџ0nџџ(р-- Close The Registry Key. Ј A@о oџџ№р=-------------------------------------------------------------р/-- Procedure : Public Method VbRegDeleteValueр -- Programmer : Raymond L. Kingр1-- Created On : Sunday, May 17, 1998 11:03:49 AMр-- Module : VbRegModр-- Module File : VbRegMod.basр-- Project : Project1р-- Project File: Project1.vbpр-- Parameters :р<-- RootKey : The Root Key To Open, EG: HKEY_CURRENT_USERр%-- KeyName : The Key Name To Openр--- : Example: MySettings\Settingsр)-- ValueName : The Value Name To Deleteр=-------------------------------------------------------------рІ –]ђDИр-- API Call Returned Value]ђDар-- Handle Of Opened Keyр-- Open Registry Key... ў ­   Ј $І ' р-- Check For An Error.  „ œ є A@в Ј A@о |џџ8kџџ0р"-- Delete Opened Key Value Name... Ј  $м ' р-- Check For An Error.  „ œ і A@вkџџЈр-- Close The Registry Key. Ј A@о oџџp–шр6 returns the serial number of the specified disk drive]ђH]ђ`]ђx]ђрinitialise the stringsЌџЌ$ F$ \' ЌџЌ$ F$ \' рcall the API function      ЌЌ   $р '  '2 iџџXџџџџPџџџџOЖAttribute VB_Name = "modRegApi" Option ExplicitР '-/j VbЎMod.Bas"A Vi sual ic 32-Bit "ule For Accessing/The W€indows KРistry.Date: Sunday, May 17, 1998By Custom Software De€signersƒ# Programmer Raymond L. KAЎ}™[ Root Ke€Honstant@Pub Д C HKEY_CLASSE@S_ROOT€Ю&HH80 URRENT_COPNFIG 5U(SER 1 DY@N_DATA 6 LOCAL_M@ACHINEI 2kQ СSI 3VLKTypeƒGQLREG_OPTION_NРVOLATIRL!0 'Т\is preserved when system ‘reb€fedL+СEXPAND_4SZ,2EЧ' Unicode nul termфin@Єd РЉJlADWORD4+A'Фb€ФnuАmberP$‚"1S@o$BINARY@3’ ' Free form b ryЂ_BIG_ENDIAN  5Ј ПLIT8TLEg†$  (КsA—a`‚р?b)…HFuncC˜rrр‰k1GERROR_@SUCCESСQ0џЬу@6`РcУ‰EФ” RighЯxSYNCHRONIZMЃa1тwЮ&ADСvTˆROL@ &H2Ё ŒST OARD_RIGHTS_ALc1FŸ_REњA!M(с% Р$JR pWRITšЁ”QUERY_VALŽUd,aSET( !C`TE_L8INKd а„SU,B_`т4аENрUMERAР $„ŒAPNOTIFA^&С!&р ((уЭ#Or ) DGP$#) A Ы(vNрРhD)2Ё =_ўAeSAD №/dїL(Tя ”ддQ Q. plEXEєCUУ$( Бяяўs@rр–(N“Д Џ?p7 =Н… API‚claraQDE‚‡?№To OpdA‘eP„PriўvP_tpŒ%HP`lEx Lib "advapi32.dll" Al i0L"iA" _ (ByV`’h!pAs Long, 3lpS4ubtSрœ—ulљу›s &Тs0SБrpцphkRe№sultгѕTР R—’CreБрA NewџpћПуа ˆ?y ?;р C~/l l`pClasт[d>wžOe8Аecрurity–ЕШо,dwDisp8osiRjT oegЁjQuerP c в А!ueЏ' жo`ѓ"‚Exd?(8(љћ//pВBФP 7*ѓblpdч€М†aAelpcb5CС/ ' Te that if€ you de1;-1e0’p0FuРnction! ‚+ExLib "advapi32.dll" A„liL"Reg‡(A" ‚˜(ŽhKКe€Cs‚>…Б˜N€m‰8РНQ0М“DќelY€HР*QйDƒ С4šC† bCSubAПЦЂHŠ,ЂrУ#Bs .‡ 5r^/Clos@Ыў Р<\[B Fа,а—JVqGetVolumeInformaТ] kerneіl…[ЂX e\Б $ЄlpRootPa|thZЄ&…"Bиuff{nƒASizЂŠInteаger,k  ƒcSerialNu mb C`lpMaximumComponentLe0ngthХШFileSystemрFlags'Х{SЊnЋЅЁnBConstants For Err MessagesBublic AЂ Open  ш= ":"`ЖС`D!" PЩc^ cA1Cre`Ё+bQueryПыBсbhBx-5C€ProcedBuрУ : Method VbЏ АCРцg€Чm CрRaymondр L. K€CУd OnA Sunday, May 17, 1998 11:03: 04 AMcMo dule :?@jЁ@@‚`.b asу@ject;dЄ1kРroС!1.vbpф%с>s`C!nРФ Th ERR`OR_SU‘ nБ MsgBo^xЅI3 k(Ж /0#@špQE@8Ifџ‘1!“BІРпѓ&В, Cџ џ џ џџ ѓ 3Mб П т Ћ чu Я! A ЄЉп/,b2 PCoPяiPCMP іgoPoP€&ѓoPlP18oP0-oP"RџoPoP`RoP!RoPф oPџE=б5ѓF0oPoP3ЧбасJNewвЅPŸѓbDЯPngЬPџЏ№VMFЩЂMџџL`R іLz‡_L№нџТ q8Ц7пLƒ=бйLџЧLвKЂ'(F2…23џV`ВF+ 0ŽŸMe“MvbNullSZ, REG_OPTION_N0VOLATILўE†ž2NaqйQS1Ž,ТOE}E' EџŠE–R3 ’E`ЏEЏEпA("!У  wUЃEЅ!џE%1Ж- '-- Procedure : Public Method VbRegQueryValueРgrammer`Raymond L. KingDCrea@ted OnDSunday, May 17, 1998 11:0€3:29 AM3рModul„‡yг Fi :•0.basУjeмct9o 1 < пro1.vb p„afeters€ RootK„ey'The   To Open, EG: HKEY_CURRENT_USER#€Name:  ƒ‚/: Example: MySettљ€Ѕs\ƒ‚С„,ƒ+§‚ …,д ѓ+Р DFunctionЭ _ Ф-(ХJAs Lo8ng,AI$St2r€1, .) €VariantСDim lRztРŒ ABAЉAPI Retur n Cod@Ђ = hAV Š HaфndРŠOfBkС$`CdataiD@Ц УV"‚(DWАORD)6E sG ?>Р%.BFRtьyp@ˆЭ-TAУ9€ЯёDOr ТСЁ‚–шistry­С8.ABP=KgСРGExig, 0&€ WREAD,: С()aС Check For An Error b If4<> ERROR_SUCаCESS!n G € MsgBoxт.  Clos*eЁ5(† `^it– ЅLAE ‰If!џa!‚ZІТc-С%ŒтЂExNULўLТ HPC€$ -d"Bщп п ХТџтxўGetт ERROR_SUCCESSPn…! Msg Box " J "" A€џУ7HЦN ПЌ@Cancel_CрPkСt!HelpЬGeЖtЁР.с [t@AфIDb w с,g Я#Ё!N`9StЉVŽDW3@NumaќLoAeH @khh!(­ c"' get rid of sС–sС !uRe€‰$ceЋC, "œ(1<), DdA т = ,F ЃIf NoЩeg {id Р…&h(€No, РСA ) ThedpЁ@'Inval`-  tellТfu ŠCсhСkagaiШCa`MsgBox (" k—that you typ! Єis iЃ ." & vbCrL8f _Ѓe& œ"P@ƒрЩF",рtEx€ЖmТw"!EdxiрŸubуDIfcЃhRjHџџџџџџџџџџ SPџџџџSџџџџSџџџџSџџџџ6"џџџџ<0џџ<џџ<џџ<џџ< џџ<$џџ<(џџ<4џџ<8џџ<<џџ<џџџџџџš0{4D9183E3-C5EE-11D8-B659-0004768BFDFA}{4D9183CC-C5EE-11D8-B659-0004768BFDFA}ШШ < @`џџџџџџџџџџџџdџJџџџџџџџџЄ ” 8 џџџџ`џџџџџџџџџџџџxџJџџџџџџџџЈ”€ўџАџџЈџџ€џџџџџџџџ%ўџџџџџџџџџиџџАџџџџџџџџ %џџџџџџџџ@ƒўџџџџџџџџџџџџџџџџџџџџџ%‚ ЪџџџџўџџџHџџўџџџџџџџџџџџ%џџџџЈџџџџџџџџ@џџџџџџџџ@џџџџџџџџ@џџџџџџџџ@џџџџџџџџ@џџџџџџџџ@џџџџџџџџ@ИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџџџџџИў @   B Нџџџџ xџџџ џџ % џџџџptџџџџџ @ўџpџџџџџ @ўџlџџџџџ @ўџhџџџџџ @ўџdџџџџџ џџџџ(џџџџџџџџџџџџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџ(џџџџxџџџ џџ РъџџџџXџџџџџџџџ€џџџџџџџџ@џџџџџџџџАџџџџџџџџџџџџ №TЌЄџџџџџџџџџџџџџџџџџџџџџџИ˜ 7B$*\Rffff*3342370a09пж4к8џџџџ< фta(„1Н*xџџˆЖџџџџџџџџџџџџб$o(ХиЖYv‹§њ“$o(ХиЖYv‹§њJ$o(ХиЖYv‹§ња$o(ХиЖYv‹§њџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџV<@џџ (@рЄ ў @ (@x Ж   Ж,   Ж. B (@  D (@D7oџџ0–@ џџA@r2EEoџџџџџџџџџџяБAttribute VB_Name = "dlgAbout"  јBas|0{4D9183E3-C5EE-11D8-B659-0004768BFDFA}JCCJ dGlobalŠSpacoFalse ŠCreatablPredeclaIdгTru BExpo se0TemplateDeriv–Customiz‹D' Help ‚Ё window Op tion €;lihcit P.2 Sub UserForm_Initialize() ' PopuE the l abels€*th items from moduˆs€шng.ba0s ƒlblTitle.CaC= SSCStatZЦDesјcriBH € Copyrigh†t‹ † & "@& РCompa”ny,ХUK.@€С)@(RegiР aСIШcmnI@Messag€s 0 EndСNRbt€nOkay_CZkQСƒ-Unload MrU€€€ ˜;)"Q"y"Ё"џџџџ"4)™Qжжжџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 8љЙ!кккЈ§џџ`I џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<9Yaџџџџџџџџџџџџњџџџ`  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@)™!вввџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџD)™AдддџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH)™iеееџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџb W 0 ќЦ ( 0 ќЦ@  <8PrU€€€ џџџџџџџџT$ `Єџџџџџџџџ$A `ЈџџџџџџџџnчЖ€0* pH‚dфSSCStat ?0$istical functions and dialog0s - ZFServices Centre@~!ˆtai sc l €funcЊo sadˆdi%og5h -S)GS@erv1cЋ ECn-rЂ=‚‚y† ‚˜ 7PB ‚<‚stdole>‚ ^dolE€* €^\€*\G{00020А430-C 0046}#2.0#0#C:\WINDO_VBA_PROJECTџџџџџџџџџџџџV†dirџџџџџџџџџџџџc• __SRP_0 џџџџIRЂ__SRP_1џџџџџџџџџџџџœђv)dlgDenest1:42370998џџ•dlgDenestџџˆЁА^)modSave1342384913џџRmodSaveџџ‡GиџџџџШœ+dlgLookup1=42370998џџdlgLookupџџvюр)dlgOneProp2342384bc3џџЋdlgOnePropџџЊШџџџџџџџџаџџџџшџџџџ№џџџџџџџџјњAџџmodProportion2442384bd8џџњmodProportionџџљЋиџџџџGџџdlgTwoProp3342384d78џџЏdlgTwoPropџџ§ЋШџџџџџџџџаџџџџшџџџџ№џџџџџџџџ(яWџџdlgSummarise2142370998џџŸdlgSummariseџџс=@.uџџmodMoments1?4238491cџџt modMomentsџџбвX dlgUnstackTwoWay2342370998џџw dlgUnstackTwoWayџџ,ЋpК5џџdlgColumnPlot2442370998џџ‰dlgfџџџџџџџџџџџџЛ‰oXZџџџџВi48џџџџ[] n`єЮ›ЭЊ`Ž =эSіYФ =эSіYФCompObjџџџџџџџџџџџџАpColumnPlotџџЦDˆˆTџџmodChart2542370998џџі modChartџџ–H п$dlgDataArea2642370998џџЕdlgDataAreaџџуИхmodColumn1142384913џџ& modColumnџџ%џџџџиџџџџшџџџџаyžmodSheet1242384913џџ  modSheetџџ#шgQmodCommon3442370a09џџр modCommonџџМям$modTranslate1>4238491cџџј modTranslateџџИярmodRegistration3242370a09џџ modRegistrationџџэyHџџџџиџџџџ0kN modRegApi0?42384913џџl modRegApiџџяyHQ\џџdlgRegistration2>42370998џџЯdlgRegistrationџџ*x`ŠџџdlgAbout3342370a09џџЫdlgAboutџџxк џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџHџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџˆџџџџаџџџџИџџџџџџџџшџџџџ0џџџџџџџџрџџџџШџџџџџџџџјџџџџ@џџџџ(џџџџpџџџџXџџџџ џџџџџџџџPџџџџ8џџџџ€џџџџhџџџџАџџџџ˜џџџџ`џџџџHџџџџџџџџxџџџџРџџџџЈџџџџ№џџџџи{—e­§зЖXv‹§њџџџџ}—e­§зЖXv‹§њџџџџ—e­§зЖXv‹§њџџџџ—e­§зЖXv‹§њџџџџƒ—e­§зЖXv‹§њџџџџ…—e­§зЖXv‹§њџџџџ‡—e­§зЖXv‹§њџџџџ‰—e­§зЖXv‹§њџџџџ‹—e­§зЖXv‹§њџџџџ—e­§зЖXv‹§њџџџџ—e­§зЖXv‹§њџџџџ‘—e­§зЖXv‹§њџџџџ“—e­§зЖXv‹§њџџџџ•—e­§зЖXv‹§њџџџџ——e­§зЖXv‹§њџџџџ™—e­§зЖXv‹§њџџџџ›—e­§зЖXv‹§њџџџџ—e­§зЖXv‹§њџџџџŸ—e­§зЖXv‹§њџџџџЁ—e­§зЖXv‹§њџџџџЃ—e­§зЖXv‹§њџџџџЅ—e­§зЖXv‹Ќ     ў !"#$%&'()*+,-./01ўџџџ3456789:Re=K?@ABCDEFGHIJ<LMNOPQўџџџfT`VWXYZ[\]^_Sabcdўџџџž˜h~jklmnopqrstuvwxyz{|gЈ€Ьamџ  ф*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.3#0#c:\Program Files\Microsoft Office 2000\Office\EXCEL9.OLB#Microsoft Excel 9.0 Object LibraryИ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\stdole2.tlb#OLE Automationк*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SYSTEM\FM20.DLL#Microsoft Forms 2.0 Object Libraryф*\G{0CE13760-64A7-11D5-B656-0004768BFDFA}#2.0#0#c:\windows\TEMP\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\MSO97.DLL#Microsoft Office 8.0 Object Libraryє*\G{00024517-0000-0000-C000-000000000046}#1.0#0#c:\Program Files\Microsoft Office 2000\Office\REFEDIT.DLL#Ref Edit ControlР*\G{8B19C0B5-802A-11D5-B656-0004768BFDFA}#1.0#0#c:\windows\TEMP\VBE\RefEdit.exd#Ref Edit ControlEРF&  џџ~Statistical functions and dialogs - Statistical Services Centreџџ˜ 7Bџџџџџџџџџџ џџ% " џџ! џџџџџџ1Н& Sheet10842370998џџ Sheet1џџНЩџџ Sheet20942370998џџ Sheet2џџ НЩџџ Sheet30:42370998џџ Sheet3џџ Н0ЩџџThisWorkbook0;42370998џџThisWorkbookџџ НHЩџџmodMain204238491dџџ modMainџџН0џџџџxџџџџјџџџџ(џџџџ`8R#dlgUnStack0=42370998џџqdlgUnStackџџJШxђ(џџdlgXYPlot0>42370998џџ…dlgXYPlotџџй$S?џџstats_functions0?42370998џџвstats_functionsџџвРЈ•"џџdlgStack1042370998џџ{dlgStackџџЇРЏџџmodUtility1042384913џџhmodUtilityџџНџџџџиE7$modUnStack154238491cџџРmodUnStackџџЙџџџџшџџџџаџџџџиџџџџ№yџџmodStack1342370998џџfmodStackџџ{Й‹/џџ&dlgDescriptiveStats224238491dџџ›&dlgDescriptiveStatsџџœZ ЂaџџdlgTwoTtest1542370998џџЇdlgTwoTtestџџgO8КMџџdlgBoxPlot1642370998џџdlgBoxPlotџџZƒP_џџmodTtest1742370998џџаmodTtestџџaщhЪ*dlgOneTtest1842370998џџЃdlgOneTtestџџ"Ю€Њ1џџdlgQQPlot1942370998џџ‘dlgQQPlotџџШ˜§њџџџџЇ—e­§зЖXv‹§њџџџџЉ—e­§зЖXv‹§њџџџџЋ—e­§зЖXv‹§њџџџџ­—e­§зЖXv‹§њџџџџЏ—e­§зЖXv‹§њџџџџБ—e­§зЖXv‹§њџџџџГ—e­§зЖXv‹§њџџџџЕ—e­§зЖXv‹§њџџџџЗ—e­§зЖXv‹§њџџџџЙ—e­§зЖXv‹§њџџџџЛ—e­§зЖXv‹§њџџџџН—e­§зЖXv‹§њџџџџП—e­§зЖXv‹§њџџџџС—e­§зЖXv‹§њџџџџУ—e­§зЖXv‹§њџџџџХ—e­§зЖXv‹§њџџџџџџџџh€–Ўџp €џas „џb€џByVal"€џConst=€џDim@€џDoD€џElseE€џElseIfH€џendifL„ џErrorT€џForU„ џFormat^€џGoto_€џifmLeft‚Name…€џNot•€џPublic€џResumeБTextВ€џthenГ€џtoД€џTrue Excel€+ VBAїтWin16С~Win32MacГВVBA6­# SSCStatьїstdole“`MSFormsCOfficeuˆ џRefEdit† Sheet1ш €џ_Evaluateй Sheet2щ Sheet3ъ ThisWorkbook|у modMainЊ WorksheetMenuš ChartMenu­ Ќ(Auto_OpenV  BuildSSCMenuІп Ќ(Auto_Closew€ RemoveSSCMenuџ/ ExcelMenuЉњSSCMenueMenuItemj SubMenuItem0VInsertPositionЇѓja ApplicationЅ* CommandBars ControlsЬKCaptionxAddїrmsoControlPopupl)Before‰о Temporary–л Ќ( SSCCaption3< AddMenuItemЮHItemType!i BeginGroup‰Ж€џAddInsю‰ Ќ( SSCStatName~ЅPath2Ќ( SSCStatBookletsЅ‡€џDeleteИxMyMenuH(ItemNameЫ[ActionнRmsoControlButtonnѕ MyMenuItemCIOnAction„  Ќ(DataEntryHelpљЮЌ( GetHelp*АЌ(UnStackDialogShowІCheckRegvЯ dlgUnStackКГShowѕЌ(UnStackTwoWayDialogShowЖ dlgUnstackTwoWayЕУЌ(StackDialogShowf' dlgStack‚ЃЌ(LookupDialogShowУ< dlgLookup<Ќ(DataManagementHelpkЌ(XYStackDialogShowрё dlgXYPlot3^Ќ(ColumnPlotDialogShowож dlgColumnPlotТЌ(BoxplotDialogShow'š dlgBoxPlot™%Ќ(QQplotDialogShow˜Б dlgQQPlotТwЌ(DenestDialogShowJ2 dlgDenestЩЩ Ќ(GraphicsHelpХЋЌ(DescriptiveDialogShowg} dlgDescriptiveStatstрЌ(SummariseDialogShowяB dlgSummarise ‘Ќ(OneTtestDialogShowќЁ dlgOneTtestV[Ќ(TwoTtestDialogShowпв dlgTwoTtest0Ќ(OneProportionDialogShowPˆ dlgOnePropK€Ќ(TwoProportionDialogShow‘л dlgTwoPropзЌ(StatisticsHelpeЮЌ(DataAreaDialogShowŒо dlgDataAreaЇU Ќ(GeneralHelpZ%Ќ(GoodPracticeHelpŽЌ(TutorialcCNotYetImplemented  Ќ(TutorialPDFЗ\ Ќ( apiLaunchFileљЊЌ( SSCStatTutorialPDFPЅЌ(AboutSSC:o Ќ(AboutSSCStatЎЌ("regCheckRegistrationNumberчW dlgAboutwШ Ќ(Registrationє dlgRegistration… RegChecked%iMsgBox—RDefaultSheetNameœТNoOfVars2,UserForm_activateZsUpdateColumnNames_ Ќ( cmnDataAreaorЌ(InitialiseOutputRangeюurefRangeVиoptRange К optNewSheetщ optNewBookQYЌ(utRestoreControls=„ Ќ(UnstackSaveЅЗ chkCopyDataЩschkColumnNamesОchkFactorNamesЗBchkSortГˆ optSortByNameљEoptSortByFactorГхchkIgnoreMissingЦ€chkIgnoreFactorMissingлQ lstVariable‹šlstBy ЇDataAreaЩ Ќ(InitNamesЉHЌ(PutColumnNamesIntoListbox&(FactorэКlstVariable_ChangeтЌ(SetSelectionOrders™Ќ(NumberSelected:^btnOKd›EnabledлЊValueфK lstBy_Changeё chkSort_ClickfraSortњoVisibleЖгoptRange_Click­НtxtWorkbookNameСФlblWorkbookNameўбoptNewSheet_Click9SoptNewBook_Click‘б btnHelp_Clickк HelpContextIDu"btnCancel_Clickeу btnOK_Clickа" „џDestinationаЛRangeк  NoOfFactors†zRowFacЗ$„џOptionsЇ“ Ќ(OutputRange2ЬџtxtWorksheetName9‘ Varsц  Ќ(ItemsInBox)ЉcolfacЂЌ( cmnIncludeColumnNamešЌ( cmnIncludeFactorNameN)Ќ( cmnSortColumns\VЌ( cmnSortColumnsByFactorM:Ќ( UnStackм„ IgnoreMissingmFIgnoreFactorMissingЎfЌ(utSaveControls$O strByColour{ј NoOfXVarsСy NoOfYVarsФ ChartTypeListбщchkTrend_ClickUШlstXvarуиAddItem‡  Ќ( DummyXvarL:lstYVarЪ‡AddChartTypeToListЈ cboChartTypeћ( xlXYScatter)ЇxlXYScatterLinesNoMarkersvЦxlXYScatterLinesbSxlXYScatterSmoothNoMarkersšЊxlXYScatterSmoothŒ ListIndexїQ Ќ(XYPlotSaveD†chkByjзchkTrendіActiveWorkbookЂMultiUserEditingwaBoxћyControlˆВCodeњН ListCount6lstYvar_ChangeS lstXvar_Clickx2 chkBy_ClickЧICancelButton_ClickЄXVarsМkYvarsЖMarkersж Ќ(OutputRangeЌА NewXYBySeries%(ByColourЫU TrendlineШћCopyDataђ XDestination• YDestinationФ#XColumnsYColumnsŽ(i`XName‡=YNamesэХ FactorNameЊР NoOfXColumnsї NoOfYColumnsQFactorsAsLabelsbd UnstackFactorэт CarryFactorЏg DummyFactorДu SmallNumber+NA\^ Ќ(GetColumnName5œ NonNumericю:SortЌCellsOffsetшЊ €џCurrentRegion|” EntireColumnє•Hidden]ц Ќ(MakeChartиReplacef stats_functionsuI Ќ(PowerTransтVxoLambdaё™NrowѕMNcolѓ§ Make2DArrayЩ[IsNullЏФResulturLn^Ќ(ZSlope‚›ylNumњКMMultВ TransposeзРDen1ƒMInverseџ Ќ(RInterceptЧresfitЯ!ResLine­№Ќ(RSlopeц PartArray _StartОFinishXŽxpartЪЩ MedianPart]^Median*nenlg^nsn^mxN^myK^Count0vSlopeе# Intercept6D ResLineFit,1new_x. vals Data;IsArrayœ•Make2D 2tempRЊlstCarryE  FillOrderBox5 cboOrderDataв1cboOrderFactorг cboOrderRowЊН Ќ(StackSaveŽe chkStackDataZM txtStackName#XchkStackFactorl  txtFactorNameJ chkMatchСLchkOmit§etxtOmitД chkTrailingqCchkCarry?‘ComboBoxЗ\IndexёПchkCarry_ClickD7 lblOrderRowFchkStackData_ClickPcboOrderData_Changeђ™chkStackFactor_Click<[cboOrderFactor_Change5ЃOldIndex?NewIndexЏѓcboOrderRow_Change ZkbjunkGOutRangeё NoOfCarriesmЂOrderєACarryY—Ќ( StackŠ modUtilityщл Ќ( NextField<ЏMessageŸѕPosдФ Delimiter~vbTabc9StartPosGФEndPosbНFieldLenйЂSpace ю ContextIdВ HelpFileТ Ќ( SSCStatHelp–HelpfЌ( AllDataInColumnžАMaxRow+† €џActiveSheet%N €џUsedRangeШ‰Row‰ЯRowsЁUЌ( RemoveTrailingBlanksœаMyRangeс- Ќ( SigFigFormatџЬNumberЃ-SigFigsЭ IsNumeric$* Ќ( FlagErrorіЎErroŠ DescriptionО  Ќ( ReplaceString  ThisString2ы Oldstringаž NewStringс+Fieldќ3Ќ( FindNamedRange‰„џAddressЇХNonameБƒNamesЮПRefersToˆЌ Ќ( ValidRangeJмri InvalidRangeьЋ Ќ( DecimalNumberzŽStr—е modUnStackдFactors[ч RowFactors6FactorAsVarName…fMissing|NoOfRowsэ` NoOfColumns[мNoOfFactorCombinationsфщNoOfRowFactorsСFFactorColumnNoemRowNoThisFactorCombinationБT ThisRangeName&FFactorCombinationListъч NextFreeRow RowFactorAddressКт FactorValueP CurrentCellЁ$ SortRangecDataCellЭШDataCellAddresst OutputColumns's ColumnNamewЛ RangeStartRow•‹ AreaOffsetЎU NewColumnW…NoOfOutputRowsІп ThisRangeКћ FreeRowFound~ћ SortByFactorэџSortKeyёПHeader’MSortRowsЃ MatchFound( RowHasDataFLastRoww„ LastRowUsedOV DuplNewRowо, DuplNewColumnHa DuplIgnoreOЂDuplLastK}DuplMaxд[DuplMinђ\CountOccurrencesІ OrigColNameчи ThisColName§–SerialNoчЎIncludeColumnNameDIncludeFactorNameј% DatavalueW ThisFactorЖ• ReportErrorХ€ IsMissing˜э Ќ( cmnSortRows:„Ќ( cmnCountKы Ќ( cmnDuplNewRowЫйЌ( cmnDuplNewColumnLЂ Ќ( cmnDuplIgnore§N Ќ( cmnDuplLastp^ Ќ( cmnDuplMaxw` Ќ( cmnDuplMin•a CalculationhНxlManualщŸ Ќ(SelectRange3‚Ќ(GetColumnAddress UAreasќK EntireRowїNextRow58UCase5 externalДwFormulaqY€џColumn i„џColumnsp9key1OИ Orientationw xlSortColumns }ValнтTrim@яkey2PИkey3QИ xlSortRows:=AutoFit&  xlAutomatic@ modStack9  MaxFactorNoьЄ Ў(! VarStructureЖНOutputFactorCol5тOutputFactorValue+ StackDataAа StackNameь‡ StackFactorpMOrigColumnNamev” MatchColumns Omit5ј OmitValueoTrailingBlanksЊпVarInfoЫ NoOfVarNamesДzNoOfFactorNamespVarRange<ь FactorRange…Т CarryRange‡Pos2еЩVnameЌVarNameYcFNameRћFValueз§ DataSheet StackSheetїRThisdataytvmnrowsoэnvarsДИtotrows8ЈThisVarkЌ DataColumny>NoOfStackColumns6сNoOfFromColumnsй‡NoOfFactorColumns}I LastNonBlankYH StackStart™ƒ FromStartTФRowFactorStartрwDefaultSigFigsЩ^ ExtraWidthД\ DataColumnsа‰ CurrentRowSmcboPropЄ cboConditionXЌ(DescriptiveSaveіЖ chkVariableњ§chkCountp chkNonBlankl– chkNumerici‡chkMeanЫЎchkStdevаchkTotal; chkAdditionalОаchkRangeР chkMaximumѓМ chkMinimum\П chkMedianъ chkQuartilesn chkSkewness:жchkSSнйchkCVзchkPercentilesБќchkProportionsŸЮtxtPercentilesЁdtxtProportionsFtxtOther‘ chkPercentvЅchkCumul{шchkVariable_ClickЎEnableStatistics3Ю FactorOnlyИЫchkNonBlank_Click›chkAdditional_ClickžБ fraAdditional‰wchkPercentiles_ClickšchkProportions_ClickѓС DataRangeMP txtSigFigsA%SetupDescriptionkпStartRowќЮColumnsToInsertэ7 ColumnData DescStatsѕ2Percent^ц PercentNumberцCondkП NonBlankRangeMInsertжrxlShiftToRight0 Ќ(!strDescStatЋ Ќ( strDescStatHdrбЌ( strDescStatCountЪAddRow7К Ќ(!strNoOfValues;ыЌ( NoOfBlanksFormulaЎЌ(!strNoOfNonBlankЖ@Ќ( NoOfNonBlankFormulaE9ReferenceStyle9xlR1C1†pЌ(!strPercentNonBlankУ~Ќ(!strCumulNonBlankќ­Ќ(!strNoOfNumericd:Ќ( NoOfNumericFormula’ЬЌ(!strTotalМ  Ќ( TotalFormulaШЌ( strDescStatMean3шЌ(!strMeanўЈ Ќ( MeanFormula^>Ќ( strDescStatStdevУЖЌ(!strStdevQ– Ќ( StdevFormulayЌ(!strRangeAŽ Ќ( RangeFormulaЬN Ќ(!strMinimumƒЈЌ( MinimumFormulaШЇЌ(!strLQЦ`Ќ( QuartileFormulaњы Ќ(!strMedian>” Ќ( MedianFormulaj$Ќ(!strUQb Ќ(!strMaximumІЌ( MaximumFormulažP Ќ(!strSkewnessўіЌ( SkewnessFormulaЂ3 Ќ(!strKurtosisTЌ( KurtosisFormulaѕГЌ(!strCssё Ќ( CssFormula5žЌ(!strUssQ Ќ( UssFormulaП Ќ(!strCV~_ Ќ( CVFormula#Ќ( PercentFormulai+ Ќ(!strPercentileXЌ( ProportionFormula1=4Ќ( ProportionFormula2>4Ќ( ProportionFormula3?4 Ќ(!strProportion5ыЌ( ProportionFormula4@4 Ќ(!strPercentage”,Ќ(!strCount—їAsArray–— AutoFormatˆФxlRangeAutoFormatClassic15FontUBoldƒљItalic!CopyЦП PasteSpecialОKPaste xlPasteValuesз"ClearуЭ ThisFormulaю^ FormulaArrayЮ  NumberFormatеR SampleHeading‡L HeaderRange…cCellЏ‰ Ќ(TwoTtestSave$у optTwoColumns о optOneColumn] optSummary. cboSample”g cboSample1 cbosample2cboByœJtxtMean‚_txtStdevчГtxtSizemtxtMean2uЄ txtStdev2›уtxtSize2тЊ chkUnequalGS chkPairedVtxtCIЈ cboColumn1эЭ cboColumn2юЭcboColumn1_ChangesфcboColumn2_Changeх ShowBoxes‚К CountRange MeanRange’ StdevRangeЂoptOneColumn_Click8RcboSample_ChangeЅP cboBy_Change1”optTwoColumns_Click”cboSample1_Change”cboSample2_Change<optSummary_Click‰txtMean_ChangeYtxtStdev_Change!UtxtSize_ChangeЃRtxtMean2_Change+чtxtStdev2_Change(ПtxtSize2_ChangeзпchkPaired_ClickЗІchkUnequal_Clickт lblSample1Ђр lblSample2Ѓр lblFactorўБlblMeanЊюlblStdev ­lblSize•Љ lblSummaryu lblSummary2ў; ColumnLength;ДColumn1N9Column2O9 DifferenceиСDiffЭcCol1ПCol2П Ќ(MakeTTable$uPaired‹3UnequalVariancesпй Ќ(BoxPlotSaveJЖ chkOutlierєchkJoinT”chkOutlier_ClicktfUseFactorNamesћVarNamesёž FactorNames:uBoxPlotњіOutliers~„ JoinMedians%{ DisplayMeans8\OutlierMultiple-СExtremeMultipleeиstrBaseЄstrLowerWhiskerє strLowerBoxЗШ strUpperBoxk~strUpperWhiskerРa strOutlierЈЭ strExtremeN1ncolsПVrow1UtheRangebzBoxChartёz ChartRangeGQ1Л^Q2М^Q3Н^MinimumMaximum OverallMinimum"КMinRange‚‰IQRЎŸ LowerOutlier<і UpperOutlierjT LowerExtremeтY UpperExtremeOИThisRow™EvaluateКTWorksheetFunctionѓ&AverageSЩ ChartObjectsH ActiveChart PlotVisibleOnly  SetSourceData“aSourceGЖPlotByч$xlRows– ChartType?xlColumnStackedmpHasTitle{ ChartTitle_ˆSizeюћ HasLegendB…SeriesCollection;:Border™ ColorIndexгуxlColorIndexNone‰BInterior;фErrorBarХ>include`ЖxlErrorBarIncludeMinusValuesIjxlErrorBarTypePercentЈAmountiColor2FxlErrorBarIncludePlusValuesR‚xlLineWP xlLineMarkersaЊ MarkerStyleШxlMarkerStyleDash;dMarkerForegroundColor;— LineStyleŒwxlNoneшћxlMarkerStyleStarE\xlMarkerStyleDiamondYВMarkerBackgroundColorFіPlotArea“’Weight1ЩxlThinМw xlContinuous[ћAxesгbxlValueXValuesbэ€џActivate—| AxisTitleїMarkerBackgroundColorIndexРMarkerForegroundColorIndexЯлSmoothцт Ќ(DenestSave!ѕDenestоnbinsUq DensityChartКSD_ChrK~SpinnersЈV SmallChangeХ LinkedCellTDisplay3DShadingюЩ xlPrimaryuц modSaveмM Ќ(DataAreaSave[х CollectionщWЌ(UnstackTwoWaySaveТ Ќ(LookupSave;НЌ(ColumnPlotSave?  Ќ(SummariseSaveБ‰Ќ(OneProportionSaveш Ќ(TwoProportionSave<§SaveddЩ arrObjects‘У objElement9TarrayobjElement†rRemoveЯБIsObject‹ЏTypeNameјѕ SaveControlKVarутColl)ПCtrlФкKeyЇЈCtrlTypebњSelNoљЋSelectedYЃ€џList*“PreviousWorksheet–ARestoreControl = NoOfLookupsC: NoOfDatasg? HeaderRowI* FirstDataRow lstColumns_Click^{SetupColumnsListоS lstData_ClickЧdlstData№љ lstLookupL$ lstColumnsЁ5 refLookupŒњЌ(NextFreeColumnr{GapЊ’lstData_Change­btnDisplay_clickЖЁ LookupTable] LookupRangeЖxColName€‘ ExpandToRightHq Ќ(FindHeaderRow  DataIndex% LookupIndexŽ+DoLookupр LookupAddress'ж DataAddressШ DataLength2™Commandд] xlToRight|ЪchkArrayi‹ FullRange@ў FullEndColumnим ThisEndColumnТФchkExactr chkNormalЊР chkSimpleэћoptMaxЋ optMinЩ optEqualŽа optGreaterщloptLessџЏ txtSuccessбy txtTrialsœtxtSuccessValueГtxtSuccess_ChangeеtxtTrials_Change$N fraSuccessPШ optMax_ClickrЖ optMin_Click >optEqual_Click‰9optGreater_Clickr: optLess_Clickƒ Column2RangevјSuccessCondition}жЌ(MakeProportionTable~OExactŒ NormalпиSimpleу modProportionR1р^R2с^P1–^P2—^SjZstatЅЁ ZstatAddressЊcZvalue‘УaXccЧ\PooledPщPooledQъNormInvЊtxtSuccessValue_Changev txtSuccess2ГI txtTrials2Є‚txtSuccess2_ChangeЂtxtTrials2_Change„ЕColumn3P9Column4Q9Column5R9Column6S9 Column3Rangeэ Column4RangeЃ% Column5RangeY< Column6RangeS strVariable. CurrentCol SetupSummaryЛ FactorValuesу0 FactorFoundtсFactorColumnCount@Ж DestAddress InsertColumn КParseColumnHeader. AddColumnЮуЌ(!strSummNoOfValuesQіЌ(!strSummNoOfNonBlankзzЌ(!strSummPercentNonBlankY?Ќ(!strSummCumulNonBlankžЌ(!strSummNoOfNumericSд Ќ(!strSummTotalC_ Ќ(!strSummMeanп0 Ќ(!strSummStdevиT Ќ(!strSummRangeШLЌ(!strSummMinimum§ Ќ(!strSummLQe5 Ќ(!strSummMedianЛ Ќ(!strSummUQВ6Ќ(!strSummMaximum”Ќ(!strSummSkewness pЌ(!strSummKurtosisДы Ќ(!strSummCssлv Ќ(!strSummUssз Ќ(!strSummCV4Ќ(!strSummProportionKіЌ(!strSummPercentageЊ7 Ќ(!strSummCountЖColumnToInsertйфDestAddrЅѓ modMomentswvSSCMean} CellRange6tЌ(SSCVarЭ,MeanФ@ResidSumРKSqDiffї‰Ќ(SSCStdev”њSqr(е chkSortRowsA optDuplNewRowVmoptDuplNewColumneЦ optDuplIgnoreHђoptFirst…'optLastœšlstCarry_ChangeўloptDuplIgnore_Click=Ї fraExcept_optDuplNewColumn_ClickЛБoptDuplNewRow_ClickЖО ShowLines– Frame2_ClickxlColumnClustered№rxlBarClusteredQЧxlArea xlPieЏxlRadar&с chkStackedf chk100Percent— chkShowPointsДEcboChartType_ChangeйнchkStacked_ClickлсxlColumnStacked100‡_ xlBarStackedd@xlBarStacked100i†xlLineMarkersStacked­ѓxlLineMarkersStacked100еŒ xlLineStackedxlLineStacked100Ы6 xlAreaStackedЬxlAreaStacked100ѕxlRadarMarkers—Ъ xlDoughnutoo Directionс&LinesКЮTop5кXYGChart,gXdataм…Ydata3а XColumnNameѓ XFactorValuesлЎ YColumnName6 YFactorValuesШРPtrŒХ MultipleYs{ЕMincўWMaxcЈ.ColH DataSeries6WSeries]‚RedЮGreenИBlueЦъ Charactersrg IgnoreAxesМц modChartюЌ Trendlines@šxlLinearУLegendѕPPoints xlDiamondї MarkerSize&~ShadowƒўrefDataa0txtCurrentAreaIoptCurrentFirstYя optNoStandard-ЊoptStandardFirstT[ optNoCurrentфžbtnAppend_Click3 CurrentData7жOldPosd|SelStartчZ SelLengthўФЌ( cmnExpandDataAreaЈ– chkExpandяKЌ( cmnIgnoreDataAreav_Ќ( cmnIgnoreCurrentAreaˆqЌ( cmnDisplayDataAreaFirstv‰ modColumnі5 Ў(!NameArrayTypeiѓ RangeNameе HeaderAddresso2 HeaderSuffix6ColumnNoЯ NameArray ArrayLength0DummyDMaxColъ5MaxRowSelected†MaxColSelectedёN WorkbooksBь vbExclamation…ШProtectContentsеЫProtectзfuserinterfaceonly§N RangeIsEmptyфоSetupColumnNames0IsEmpty љcnt+Reply / LastDataRowю! NameObject ОThisName$, ShortNamer QuestionAskedЬE NextRangeˆNextcczэFindColumnInNameArrayЇsvbYesNovbYesa? GetColumnIdИРAppendToNameArray‚.RowRange^БOldBookТВNewBook,ThisBook-3OldSheetЉ(NewSheetк  ThisSheetќФЌ(BookNameFromRange­3Ќ(SheetNameFromRange?uEndSub:ЮFindColumnByName[:FullNameаžRight  OldAddress~œ NewAddressˆFindColumnByAddress:ФAlphabet’‚mdIsFactorx;CommentIndicatesFactorgCommentHsSelectionOrder›З€џTag&иMaxVar…™ NextSelectionд\ MinSelectionћР LastSelectionЧІ modSheet п Ќ(SheetExists4эfoundЩ+ WorksheetsМјЌ(GetSheet–ч SheetName6нwhatсCSheet[ж targetnamemexistsƒ] vbOKCancelx?vbDefaultButton2ДСvbCancel'ю DisplayAlertsєіSheets RangeBoxu! RangeOptionъщ SheetOptionєˆ BookOption‡dProtectStructurefзRngUЯ OutputAddress^џWb…_WorkbookkWs–_ WorksheetСў CurrentSheeteBookNameaпЌ(FindBookвe Ќ(FindSheet™BookљљInStrRevФˆ modCommonUб Ќ( ShellExecute˜"hwnd/С lpOperation8˜lpFile‡х lpParametersZ lpDirectoryЕenShowCmdžЗ shell32.dll+ˆFileNamejУRetValЭ; vbNullStringЎТ modTranslateЊ+Ќ(!strUserDefined1ьЌ(!strSummUserDefinedс…Ќ(!strDescriptiond№ Ќ(!strCopyrightmњ Ќ(!strCompany=WЌ(!strUK b modRegistrationZ RegistryKey­‹ SerialNumberдП CustomerNameцy strSignatureQLicenceo ArrLicencesfЌ("cmnRegistrationMessageЊжЌ("cmnRegistrationTextsи ConfigText“xЌ("regValidateRegistrationсЂRegNonџRegText3RegSt,DateStZ^RegNum'  RawRegTextбr DiskNumber[a NumericOnlyШOUnCombineDateNumE+ValidRegѓЈ ValidDateјБЌ(#apiDiskSerialNumber “ SaveSerialNum у EncodedTextж= CharacteriCstNumЋLstTextР‡RawTextŠtЌ("GetFromRegistry?М DecodedText&“stInput‹stDateнArr u NumElementsRetЮЌ("DefineValidLicencesьн UnEncryptз#RegDaterТSaveInRegistryg5Encrypt[Asc!uЌ("CreateRegistryEntryxвЌ(#VbRegCreateKey‘ЄЌ(#HKEY_LOCAL_MACHINE”кSubKeyЮP Ќ(#VbRegSetValueЕ‚Ќ(#REG_SZгdDefaultОыЌ(#VbRegQueryValueEе NumStringˆс modRegApizЌ(#HKEY_CLASSES_ROOTљ$Ќ(#HKEY_CURRENT_CONFIGxрЌ(#HKEY_CURRENT_USERЪ Ќ(#HKEY_DYN_DATAАч Ќ(#HKEY_USERSiІЌ(#REG_OPTION_NON_VOLATILE&ћ Ќ(#REG_EXPAND_SZф  Ќ(#REG_DWORD Ќ(#REG_BINARY(>Ќ(#REG_DWORD_BIG_ENDIANPСЌ(#REG_DWORD_LITTLE_ENDIAN;Ц Ќ(#ERROR_SUCCESSjr Ќ(#ERROR_REG$ Ќ(#SYNCHRONIZEŽ Ќ(#READ_CONTROLАџЌ(#STANDARD_RIGHTS_ALL’пЌ(#STANDARD_RIGHTS_READзОЌ(#STANDARD_RIGHTS_WRITEe<Ќ(#KEY_QUERY_VALUEк Ќ(#KEY_SET_VALUEтбЌ(#KEY_CREATE_LINK‹Ќ(#KEY_CREATE_SUB_KEY4Ќ(#KEY_ENUMERATE_SUB_KEYSw Ќ(#KEY_NOTIFY–ЋЌ(#KEY_READT€Ќ(#KEY_ALL_ACCESS<‡ Ќ(#KEY_EXECUTEщ Ќ(#KEY_WRITE„Š RegOpenKeyEx2|hKey …lpSubKeyп ulOptions[ samDesired(Є phkResult4 advapi32.dll}0RegCreateKeyExєйReserved\сlpClassƒ2 dwOptionsЄlpSecurityAttributesЄŸlpdwDispositionYERegQueryValueExStringŽ№ lpValueNameў) lpReserved‹PlpTypeЈѕlpDatah0lpcbData”4RegQueryValueExLongьRegQueryValueExNULL8МRegSetValueExStringє§dwType‰ЋlpValueŒУcbDataƒiRegSetValueExLongз RegDeleteKeyкщRegDeleteValueИ+ RegCloseKeylІGetVolumeInformation˜blpRootPathNameЄlpVolumeNameBufferВ_nVolumeNameSize–зlpVolumeSerialNumberIѕlpMaximumComponentLength)ЏlpFileSystemFlagsЦ,lpFileSystemNameBuffer5nFileSystemNameSizeœ kernel32.dll]Ќ(#OpenErr‰Ў Ќ(#DeleteErrдЛ Ќ(#CreateErrJЩЌ(#QueryErrсЌ(#VbRegDeleteKeyœІRootKeyЗТKeyNameуЭlRtnjУ ValueNameЖ lCdataЗЧlValueм…sValue—$lRtypeDKeyType9лKeyValueєflSizeЂoЌ(#VbRegDeleteValue+:strDrivek› SerialNumgBResЮtemp1LCTemp2MCSingleUserRegNowЇ Commandlineџ SavedValuesеЉDefaultDirectoryг, Form_Load{Successо| txtRegTextŠ?fraRegNoV†txtRegNo_Change#btnOkayEшtxtRegNo,žtxtRegText_ChangeZV btnOkay_Click'@vbCrLfЏЌUserForm_Initialize5clblTitleвlblDescription Ю lblCopyrightйlblRegistrationщїUserFormN €џџџInitializeгN€џClickŠуItemзz€џ_DefaultjТ„џVersionЁХ€џџџ_B_var_Version%Щ VersionNoЃ lblFactorListDк btnCancelIV lblVarListџLFrame1ЙbtnHelpёaFrame2ЙLabel2Ž,Label3,Frame3Й€џChangeЃЧ _B_var_Chr\; _B_var_SpaceљБ _B_var_UCaseaЮ _B_var_StringгŠ _B_str_Chrm# _B_str_StringŸ _B_var_LeftQс _B_var_Midэp _B_var_Right9йLabel1,txtExplanationіЩ€џџџ_B_var_btnOkayHм€џџџ_B_var_fraRegNoп]UserForm_Clickлј _B_var_Datev Label4, €џџџ_B_var_VarsR† €џџџ_B_var_colfacK’ €џџџ_B_var_RowFac`Ÿ _B_var_TrimmT _B_var_StrЈ’Label5‘,Label6’,Frame4ЙLabel10@Label8”,Label9•, €џџџ_B_var_IfPђ €џџџ_B_var_ConstgmsgQЕ €џџџ_B_var_msgbr€џџџ_B_var_NextRowЙ; _B_var_Error)Ÿ €џџџ_B_var_CellяIsErrorUпSSCDate DateStringEф CancelButtonђlblVariableList/; refSample1ƒT refSample2„T refSamples,refBy_ј lblConfidence”Ф lblColumnsм‚ btnDisplayЙ4Frame5Й CheckBox1‹УLabel7“,TextBox1ІS btnAppendлLLcЌ(CBSDate9А€џџџ_B_var_SSCDateє €џџџ_B_var_GoTo8<StdErrorЏ €џџџ_B_var_ElseIfqm MaxColumnsš€џџџ_B_var_MaxColumnsИMessageDisplayedŒ €џџџ_B_var_On6ѓ EndOfLoopГ" €џџџ_B_var_CallЗй €џџџ_B_var_forjL Ќ( cmnDuplAddІ DuplAddoptDuplAdd_Clickƒ‡ Frame3_Click—Ц optDuplAdd(W selectionoderмД€џџџ_B_var_selectionoderzˆslecetionorderp €џџџ_B_var_slecetionorderџЁ€џџџ_B_var_i Ђ NoOfUserscˆ ArrNoOfUsersЭу LicenceNames#ѕ CommercialъњstrUnregistered№ѓstrRegisteredToА strLicenceнstrForNonCommercialUsehstrForCommercialUse=вstrOneComputerъ)strUpToР strComputersльstrPublicDomain†• cmnSingleUserш SingleUser,; €џџџ_B_var_SetCJGŠ~autoopenй*€џџџ_B_var_autoopenb Ќ( SSCStatPathР1MyPathЮdMynameŒиerroQ[NotFoundA џџY!Я$KџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџбЁ џџџџџџџџџџџџџџџџџџї  џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџm #/џџџџџџi џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџг*u :' (qс Aџџџџџџw'џџџџџџ{-џџџџџџџџџџџџџџџџџџ…1џџџџџџ‰4љ !M6џџџџџџ‘8џџџџџџ•) "Wg C› <џџџџџџŸ?џџџџџџЃ+С IћЇ >ЋFџџџџџџЏGџџџџџџSEџџЕDџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџWЫ%7=XZЌRAРР(AФщ€€€P@„@D2И@@  @ P0€@ dElA(ф)}P†сf Иm vxJ š‹2 p€‚2тV1P ! ™4WS\SYSTEM\ƒ12.tlb#OLE Autom&aЕD‚ЫMSForms>A€ MSFEr”m3€DD452EE1-E08F-101A-8-02608C4D0BB4"FM20.DLL#Micro soft Т @. Object Library/є;€!1РФ?‚9Ш?ƒСШ?00}#0Т?Ž#Р €50€ rРBCE13760-64A7-11D5-B656A4768BFDFA6c:\w€indows\€W@P\VBE\DO.8exd`7€с.E р….Р`ŒM ДСЯC…XOff@ЙC…O@‚f5Фž Т,†РС,2DF8D04C-5BFAcB-BDЄE5Р,AA@„4Р2cPROGRAM FILES\MICROSOFT OFFICE‚\„MSO97 iсƒ# 8.0Li"€ƒZRefEdit…уGR@XfEСlрt3zРТ,YА4517с*Y19Р,Program€ Files\ЇF2€@\c\RE`FEDIT"@ ‘a Co „olŸIП BрB’I80‘`Є8B19C0РB5-8023”IџІŽI ‚I`j@ @(EРЂFEAGТЌ&т1НŒSheetD1GŒShр2eQ—1Ј2ЎUт HЂ1˜Щ@К‹",b Н""V+Ђш 2э 2щ 2Yэ 2џ с ѕ 3еэ 3щ 3э 3џ т ь СЗThisWorkbookGД T *AЯWтЅˆkbрok нэ2њ a lAъmodMainGEBЗmРdM лim`нbЛ2Џ8ˆR-=Н!b<%=  dlgUn5€ѓcр ё€kg6U@ƒtc2›2Ÿa zkђ(yJШ' е бlgXYPlo0tGсТX(YPo /-j2o€tS€Š§й$Ѕ€ss_ЖŒG Ц tŠs_а\]‰тns2юŒПІ•` Н вРЛсєlg”бТY9 2?џЏЩџЇ1! )UtilityGЋ2!c+U€iаip^y4›г#Ÿy_фE7пН“л#5ћЙ,5npЁЗ,q “'л™yпЙљп‘0иГнO5г=‹/{I№cА=DescriptiveРtsG&UІ"D`ds`;rp‰p­"v# tа.OMC2O ЕiOs‘?Ђa? œZ& Ё lgTw oTtes0AЖ ЈTw€>TP er9њЭ2Б21ЭфКM? gO? S/pXBoxcJ—PB xяˆJ)—s&dђ›пф_пZƒпv&фџ>3$‰Д(2y&7dЪ*aщŸ.6O,neD7O@deПЉХ9Э? ЊpФ)]Q"Ю_%bQQёdQQŸdc™diЩv)ПШvИDenв+m‘7nв7~tрQmcyi^QˆЁХƒSшaveй…Sа…?е…ЇГdSave2modSaveDˆH(1œ+#$P,‡Gr!( @ dlgLo€okupG@lgLФokupM L2&‡)‡vTю"d ‡ xl€gOneProˆFˆOnуPœrE‹2•IFњAFЊ‘F €>modEortpionG€ЛEoбItiKn€&2OGOљЋ#‘кФ@TwoMKT~w$NKD IKK O#яRWO#§ЋQK СjlgSummari`seGABoSmРЋaKisi@rЭ 2к O&.ruO&с=Q&СIРqM€omentsGТŠУЮM@Im@#nty@%K УIQ O#Г€ЭкбвCmEйCH€Unstackc@WayG FIUХРИs@"ac€мCfZW@їyРб2вy№‚К5/',r:СYр‚ColumnPЈlot#`d‚:C€'Ђl;nP o@<N#`Wo)ˆTiяЦD1;`' ;C8har@a$Ѓ5Cšhр&ri2qI/п$/–HЋ9 с6lgDataAРreaG"#ЊD€t`AР]eр4Œ2˜ЏхљЏуё!сИс!т5уИѕ"o u@pЁ”ЪуИ“Яяyžя%Ѓ"CыЩd.Sheeъ2Sѕр2eрmt Ziщ2gi/gQ/#2FmоmсЖ!кGA‘o€m#к_&С-!Хям№CМя1!Ёœ TranАslatЄЂCTРCъab~l€Dtр"ЃЂщЇЃЂѕŸ рИŸ 0р*Re@gistraѓmЃAp=dRрgpmIrт 5nn2p†O…qƒП kNП эŽyS™‰S Api-ѕcAp‰iР$фР `ЇyiQ\яПс0P#MAmtтПЗ€t _ ŠРЩНe*xџ?15А 0About7ГAњb@uіP5s7=fк№бU$  6џџ‹}`*„(Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРya™aСa bQbbБbџџС€a  џџџџШ;џџџџщ&й'џџс€a ISџџџџ№<џџџџџџˆa С џџџџИ:џџџџIiЉйљ)Iq‰ЉйЁЩщџџ)ˆa ISџџџџШ/џџџџJyKyLYM‰MЙM‰NЙNOyP1QIRqR™RСRщRSџџQџџџџџџџџџџџџqƒ€a щџџџџ‘Сџџ™™Б‘i 9 Ё Sheet1Sheet2Sheet3 ThisWorkbookmodMain dlgUnStack dlgXYPlotstats_functionsdlgStack modUtility modUnStackmodStackdlgDescriptiveStats dlgTwoTtest dlgBoxPlotmodTtest dlgOneTtest dlgQQPlot dlgDenestmodSave dlgLookup dlgOneProp modProportion dlgTwoProp dlgSummarise modMomentsdlgUnstackTwoWay dlgColumnPlotmodChart dlgDataArea modColumnmodSheet modCommon modTranslatemodRegistration modRegApidlgRegistrationdlgAboutSSCStatяРF@C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLLVBA бџџџџ љ‰0РF8c:\Program Files\Microsoft Office 2000\Office\EXCEL9.OLBExcel ёџџџџ™@0РFC:\WINDOWS\SYSTEM\stdole2.tlbstdole џџџџ1yPс.E р….`ŒM ДC:\WINDOWS\SYSTEM\FM20.DLLMSForms щщ Q ``7с ЇdеЖVv‹§њc:\windows\TEMP\VBE\MSForms.exd С щщ Q pLај-њ[НхЊDоR 2C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\MSO97.DLLOffice ‰ џџџџБ ! €EРFBoxplotDialogShow 9c:\Program Files\Microsoft Office 2000\Office\REFEDIT.DLLRefEdit ‘ ‘  ‰ ЕР‹*€еЖVv‹§њc:\windows\TEMP\VBE\RefEdit.exd љ ‘ ! ‰    Auto_Open Auto_Close BuildSSCMenu RemoveSSCMenu AddMenuItem DataEntryHelpUnStackDialogShowUnStackTwoWayDialogShowStackDialogShowLookupDialogShowDataManagementHelpXYStackDialogShowColumnPlotDialogShowQQplotDialogShowDenestDialogShow GraphicsHelpDescriptiveDialogShowSummariseDialogShowOneTtestDial“K*mPџџџџ##%%  ""    !!rU€%€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~D Йh„‘MюХиЖYv‹§њ  фZџџџџ& џџџџџџџџџџџџЙ џџџџџџџџџџџџб џџџџџџџџџџџџщ џџџџџџџџџџџџˆa qaр =9#й љ Ai‰БсAqЁбЙ 9i‘Щљ)Y‘Щё!Aq‘Ббљ!A9)ƒџџџџџџџџџџџџџџAƒџџџџџџџџџџџџџџaџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЉ€a ISџџџџр/џџџџ SЁSЙSбKйOсG T1TYTyTџџЩ€a ISџџџџи<џџџџqoџџщџџџџџџџџџџџџџџџџџџџџ ƒџџџџџџџџџџџџџџ)ƒџџџџџџџџџџџџџџYƒџџџџџџџџџџџџџџyџџџџџџџџџџџџџџџџџџџџџџ™ƒџџџџџџџџџџџџџџЙƒџџџџџџџџџџџџџџйџџџџџџџџџџџџљ€a  d f@<ј/бb!cAcqc@џџџџџџџџџџџџ1ƒ€a  &џџџџEAqйј љž™љСљщљњAњщFGAGqG™GСGџџQ€a ISџџџџˆ=џџџџ1џџџqƒ€a  (џџџџЁјEA‰ЌБЌсЌ­qйј љ9љiљС­ž™љСљщљњAњщFGAGqG™GСGџџ™ƒџџџџџџџџџџџџџџЙˆa ISџџџџ=џџџџ1‡I‡a‡Йџџсƒџџџџџџџџџџџџџџ ƒџџџџџџџџџџџџџџ9џџџџџџџџџџџџџџџџџџџџџџaƒџџџџџџџџџџџџџџ€a a$џџџџ<џџџџй[ \1\a\‰\Й\щ\!]Q]q]Ё]Щ]1^i^™^Й^џџЁ€a ISџџџџ(<џџџџ й`љ`aQaogShowTwoTtestDialogShowOneProportionDialogShowTwoProportionDialogShowStatisticsHelpDataAreaDialogShow GeneralHelpGoodPracticeHelpTutorial TutorialPDFAboutSSC AboutSSCStat RegistrationCheckRegNotYetImplemented GetFromRegistry EncodedText DecodedText 2Software\SSC\SSC-Stat\Reg Reg EncSer Cname" €SSC-Stat, Statistical Services Centre, The University of ReadingregValidateRegistration NumericOnlyregCheckRegistrationNumberUnCombineDateNumValidRegDefineValidLicences ValidDate SaveSerialNumEncrypt UnEncryptCreateRegistryEntrySaveInRegistry && Щ}*c/зЖXv‹§њЭ}*c/зЖXv‹§њЪ}*c/зЖXv‹§њ{}*c/зЖXv‹§њЬ}*c/зЖXv‹§њ"žŒ—АдЮП-Њ?@аlblRegistration!ш-ЌЂ6Я€SЊ` њ yџџџџџџџџQ @С{lЏЮŸFЊWJObtnOkayШ[qJ—І eР‹UserFormЫ}*c/зЖXv‹§њ F3Dynamic џџџџ џџџџЉPlblTitlelblDescription lblCopyrightUserForm_Initialize btnOkay_Click T $Worksheet Menu Bar Chart Menu BarРFйРFЙсџџџџеРF РF РFCaption &Window РF COUNTBLANK(?) .COUNTA(?)-COUNTBLANK(?) COUNT(?) SUM(?) 8IF(COUNT(?)>0,AVERAGE(?),"") /COUNT(?) :IF(COUNT(?)>1,SSCSTDEV(?),"") MAX(?)-MIN(?) MIN(?) MEDIAN(?) MAX(?) QUARTILE(?, SKEW(?) KURT(?) DEVSQ(?) <DEVSQ(?)+COUNT(?)*AVERAGE(?)^2 ,SSCSTDEV(?)/AVERAGE(?) PERCENTILE(?, SUM(IF(? ,1.0)) *100 &SSCstat ssc-stat.hlp SSC-Stat V2.0 ,SSCstat tutorial 1.pdf Booklets.hlp SSC_DS_Hdr SSC_DS_Count SSC_DS_Mean SSC_DS_Stdev 1...n ShellExecute shell32.dll ShellExecuteA 'A'p apiLaunchFile  &General "&Define Data Area $DataAreaDialogShow *&Overview of SSC-Stat GeneralHelp &Tutorial (PDF) TutorialPDF &Help on &Data Entry DataEntryHelpWРF \ *&Good Practice Guides GoodPracticeHelp 8&Statistical Services Centre AboutSSC &About SSC-Stat AboutSSCStat &Registration Registration &Manipulation &UnStack "UnStackDialogShow "UnStack(&Two-Way) .UnStackTwoWayDialogShow &StackOnAction ] StackDialogShow &Lookup LookupDialogShow &Help $DataManagementHelp &Visualisation "X-Y &Scatter Plot "XYStackDialogShow (&Category-Value Plot (ColumnPlotDialogShow &Boxplot "BoxPlotDialogShowControls 0&Normal Probability Plot QQPlotDialogShow "&Density Estimate DenestDialogShow GraphicsHelp &Analysis .&Descriptive Statistics *DescriptiveDialogShow &&Summary Statistics &SummariseDialogShow &One-Sample tType $OneTtestDialogShow &Two-Sample t $TwoTtestDialogShow ,One-Sample &Proportion .OneProportionDialogShow ,Two-Sample P&roportion .TwoProportionDialogShow StatisticsHelpЙИVBE6.DLL 9;џџџџ… Ш РFAddBeginGroupуЩ9ƒBзЖXv‹§њуЩ9ƒBзЖXv‹§њуЩ9ƒBзЖXv‹§њžтЩ9ƒBзЖXv‹§њуЩ9ƒBзЖXv‹§њв‹BьЮž Њ`ѓ txtSigFigs"в‹BьЮž Њ`ѓlstByLabel8refRange@7с ЇdеЖVv‹§њ Щ=џџџџџџџџ‰ Label9 ”?ЯFѕЮ›ЮЊ`ŽFrame3btnOKRв‹BьЮž Њ`ѓoptRange optNewSheet optNewBookBв‹BьЮž Њ`ѓchkRangetxtWorkbookNamelblWorkbookNametxtWorksheetNameуЩ9ƒBзЖXv‹§њ @џџџџ џџџџЉ( btnCancelFrame12в‹BьЮž Њ`ѓcboProp cboConditionFrame2 chkVariablechkCount chkNonBlank chkNumericchkMeanchkStdevchkTotal chkAdditionalbtnHelp chkMaximum chkMinimum chkMedian chkQuartilesLabel1 chkSkewnesschkSSchkPercentileschkProportionstxtPercentilestxtProportionschkCV chkPercent chkCopyDatachkCumulchkSortchkBytxtOtherFrame4 fraAdditional lstVariableLabel10UserForm_activatechkVariable_ClicklstVariable_Change chkBy_Click lstBy_ChangeEnableStatisticschkNonBlank_ClickchkAdditional_ClickchkPercentiles_ClickchkProportions_ClickoptRange_ClickoptNewSheet_ClickoptNewBook_Click btnHelp_ClickbtnCancel_Click btnOK_Click FlagErrorSetupDescriptionAddRow  8< 1 C:\ 8Error: Opening Registry Key! *Error: Deleteing Key! (Error: Creating Key! ,Error: Querying Value! RegOpenKeyEx advapi32.dll RegOpenKeyExA БJсJ8RegCreateKeyEx RegCreateKeyExARemoveTrailingBlanks БJЉKXRegQueryValueExString RegQueryValueExA БJЙLxRegQueryValueExLongRegQueryValueExNULLRegSetValueExString RegSetValueExA БJёM˜RegSetValueExLong RegDeleteKey RegDeleteKeyA БJщNИRegDeleteValue RegDeleteValueA SigFigFormat БJБOи RegCloseKey RegCloseKey БJЁPјGetVolumeInformation kernel32.dll GetVolumeInformationA qQЁQVbRegDeleteKeyVbRegCreateKeyVbRegQueryValue VbRegSetValueVbRegDeleteValueapiDiskSerialNumber    NextFieldGetHelpAllDataInColumnFРF ReplaceStringFindNamedRange ValidRange DecimalNumber 0 licence, registered to  hUnregistered. Non-commercial single machine use only 9;џџџџ` h 9;џџџџ ˆ 9;џџџџ Ј 9;џџџџ_ Ш ,  9;џџџџ ш 9;џџџџ^  9;џџџџi ( 9;џџџџx H 9;џџџџ h 9;џџџџ1 ˆ Single user Small group Medium group Site Large site InitNames RangeIsEmptySetupColumnNames FindHeaderRowAppendToNameArrayFindColumnByNameFindColumnInNameArrayFindColumnByAddress GetColumnIdGetColumnAddress GetColumnNamePutColumnNamesIntoListboxЦYl†ЯЋ|ЊРЯCommentIndicatesFactorSetSelectionOrder ItemsInBoxNumberSelected ,, !џџi TЦDСW Proportion3в‹BьЮž Њ`ѓ Percentage Count Count < <= > >= = <> SheetExistsGetSheetInitialiseOutputRangeNextFreeColumn OutputRange OutputRange2FindBookкРF FindSheetиРFSheetNameFromRangeBookNameFromRange SelectRangeutSaveControls€gФЄŸIЛxЊ8<Л SaveControlutRestoreControlsRestoreControlUsedRangeRowRows LLH  $(,048<gФЄŸIЛxЊ8<ЛЉdљbџџџџ Object 9;џџџџ2 x 9;џџџџO ˜ лРF 6There are no workbooks openProtectContents "userinterfaceonlyProtect Range Cells`РF ColumnColumnsCurrentRegion , 9;џџџџS Ш 9;џџџџ. ш HiddenexternalAddress TDo you want to treat the first row of data & as column headers? Value Column_ Value_Name $ [ ! ' 9;џџџџХ  ( )AddItem ListBoxListCountSelectedListIndex 9;џџџџk ('DРFEnabledФYl†ЯЋ|ЊРЯTextCв‹BьЮž Њ`ѓ DescStatв‹BьЮž Њ`ѓ ""UnStack#=ћќњ hЇ8+3qЕРG?,2qЯ”ЊЇLа‰oБoџџџџ 9;џџџџE `‰o€ \The output range that you specified is invalid 9;џџџџ зРF   a ,All data in the sheet   will be lost Delete 9;џџџџ0 А $A$1ListИfФЄŸIЛxЊ8<Л optSummary Missing :Formula =IF(ISNUMBER( ), =IF( ="", Select 9;џџџџP а 9;џџџџ­ № 9;џџџџe  ,Descriptive Statistics ,Number of blank values 4Number of non-blank values <Percentage of non-blank values >Cumulative% of non-blank values 0Number of numeric values Total Mean $Standard Deviation Minimum Lower Quartile Median Upper Quartile Maximum Skewness Kurtosis 0Corrected sum of squares 4Uncorrected sum of squares 0Coefficient of Variation Percentile (Proportion of values (Percentage of values Number of values User-Defined Blank CountAll %CountAll Cum%All StDev Q1 Q3 CSS USS CV Prop Percent UserDef 6Excel add-in for statistics Copyright 2002: lStatistical Services Centre, The University of Reading United Kingdom NamesRefersTo R[ ]C/SUM( )*100 SUM(R[ ]C2:R[ ]C)/SUM( 1) 3) 0% %  ?EntireColumnFontBold ItalicFormulaArrayNumberFormat 0 0.0 # E+00 #DIV/0!SSCMeanSSCVarSSCStdev 9;џџџџf ` TextBox ComboBox RefEdit CheckBox OptionButton Error UnstackcуЩ9ƒBзЖXv‹§њgуЩ9ƒBзЖXv‹§њdуЩ9ƒBзЖXv‹§њ˜тЩ9ƒBзЖXv‹§њfуЩ9ƒBзЖXv‹§њ lblVarListLabel2Label3fraSortchkColumnNameschkFactorNames optSortByNameoptSortByFactorchkIgnoreMissingchkIgnoreFactorMissingeуЩ9ƒBзЖXv‹§њыжƒсDзЖXv‹§њ Б‹џџџџ џџџџЉА lblFactorListUpdateColumnNames chkSort_Click Д 9;џџџџ/ РTag Colour Gradation Variable PlotSSCDate /Щ/кf6YзЖXv‹§њЭ/кf6YзЖXv‹§њЪ/кf6YзЖXv‹§њz/кf6YзЖXv‹§њЬ/кf6YзЖXv‹§њЫ/кf6YзЖXv‹§њ 9џџџџ џџџџЉP CBSDateЫZІЄEYзЖXv‹§њшжƒсDзЖXv‹§њPжƒсDзЖXv‹§њъжƒсDзЖXv‹§њЭZІЄEYзЖXv‹§њ џџџџ џџџџЉр Label5Label6 SetupSummary InsertColumn AddColumnParseColumnHeader  8@ ,, !~џџi @TЦDСW Summary RC[ ]/SUM( SUM(R2C[ ]:RC[ ])/SUM( %бZІЄEYзЖXv‹§њ§жƒсDзЖXv‹§њњжƒсDзЖXv‹§њVжƒсDзЖXv‹§њќжƒсDзЖXv‹§њ optNoCurrentoptCurrentFirst btnAppendгZІЄEYзЖXv‹§њ Щ”џџџџ џџџџЉ8  chkExpandrefDatatxtCurrentArea optNoStandardoptStandardFirstbtnAppend_Click x @The Data Area address is invalid.[ІЄEYзЖXv‹§њ8[ІЄEYзЖXv‹§њ/[ІЄEYзЖXv‹§њ~ZІЄEYзЖXv‹§њ7[ІЄEYзЖXv‹§њ0[ІЄEYзЖXv‹§њ cboSampletxtMean Љ—џџџџ џџџџЉx *[ІЄEYзЖXv‹§њ=[ІЄEYзЖXv‹§њ+[ІЄEYзЖXv‹§њxZІЄEYзЖXv‹§њ<[ІЄEYзЖXv‹§њ,[ІЄEYзЖXv‹§њ )™џџџџ џџџџЉИ  4ABCDEFGHIJKLMNOPQRSTUVWXYZЛR9фYзЖXv‹§њЧжƒсDзЖXv‹§њФжƒсDзЖXv‹§њDжƒсDзЖXv‹§њЦжƒсDзЖXv‹§њНR9фYзЖXv‹§њ ёšџџџџ џџџџЉј  refSamplelblMeanlblStdevlblSize optOneColumntxtStdevtxtSize lblConfidencetxtCIchkTest txtTestValue cboColumncboColumn_ChangecboSample_ChangeoptOneColumn_ClickoptSummary_ClicktxtMean_ChangetxtStdev_ChangetxtSize_Change ShowBoxes <<р<K’KT Sample 1 OneTtest =COUNT( =AVERAGE( =SSCSTDEV( -1 - One-Sample t MakeTTable  of difference ,Number of observations Offset $Degrees of freedom 2Pooled standard deviation &Difference of means Standard error % CI T statistic &P-value (one-sided) &P-value (two-sided) =sqrt( * =(( + )^2)/( /( -1)+ -1)) -2 =sqrt((( -1)* +( )/ *SQRT(1/ +1/ TINV( )* =( 0.00 &=ROUNDUP(TDIST(ABS( ,1),4) 0.0000 ,2),4)ЋR9фYзЖXv‹§њ cboColumn1 DDifference of mean from test valueЫR9фYзЖXv‹§њЛжƒсDзЖXv‹§њИжƒсDзЖXv‹§њ@жƒсDзЖXv‹§њКжƒсDзЖXv‹§њ lblSample1 lblSample2 lblFactor lblSummary lblSummary2 refSample1 refSample2refByЭR9фYзЖXv‹§њ iЊџџџџ џџџџЉP optTwoColumns cboSample1 cbosample2cboBytxtMean2 txtStdev2 chkUnequal chkPairedtxtSize2 cboColumn2cboColumn1_ChangecboColumn2_Change cboBy_ChangeoptTwoColumns_ClickcboSample1_ChangecboSample2_ChangetxtMean2_ChangetxtStdev2_ChangetxtSize2_ChangechkPaired_ClickchkUnequal_Click << <јЖžwžwРЖžw’žwT Sample 2 TwoTtest =" ","",IF( =" ","", ))  -  Paired t Two-Sample t && ѕЗT›л)№YзЖXv‹§њу›л)№YзЖXv‹§њU›л)№YзЖXv‹§њ:›л)№YзЖXv‹§њт›л)№YзЖXv‹§њV›л)№YзЖXv‹§њ qБџџџџ џџџџЉ` H›л)№YзЖXv‹§њЖ›л)№YзЖXv‹§њI›л)№YзЖXv‹§њ›л)№YзЖXv‹§њЕ›л)№YзЖXv‹§њJ›л)№YзЖXv‹§њ ЙВџџџџ џџџџЉ0 ,, !<џџi @TЦDСWР›л)№YзЖXv‹§њE›л)№YзЖXv‹§њ Med :Too many factor levels found.   DSome factor levels will be ignoredP›л)№YзЖXv‹§њи›л)№YзЖXv‹§њQ›л)№YзЖXv‹§њ0›л)№YзЖXv‹§њз›л)№YзЖXv‹§њR›л)№YзЖXv‹§њ Жџџџџ џџџџЉ€ЅсzZcзЖXv‹§њЉсzZcзЖXv‹§њІсzZcзЖXv‹§њZсzZcзЖXv‹§њЈсzZcзЖXv‹§њЇсzZcзЖXv‹§њ aЗџџџџ џџџџЉ8aсzZcзЖXv‹§њ›л)№YзЖXv‹§њП›л)№YзЖXv‹§њcсzZcзЖXv‹§њ YИџџџџ џџџџЉШeсzZcзЖXv‹§њТ›л)№YзЖXv‹§њŽ›л)№YзЖXv‹§њ›л)№YзЖXv‹§њС›л)№YзЖXv‹§њLabel4chkTrendgсzZcзЖXv‹§њ йЙџџџџ џџџџЉ CancelButtonlstXvarlstYVar cboChartTypechkTrend_ClickAddChartTypeToListlstYvar_Change lstXvar_ClickCancelButton_Click NewXYBySeries Min 88Ш@яЎ ’#в‹BьЮž Њ`ѓ Data Points only Lines only *Lines and Data Points Curves only ,Curves and Data Points Data Points XYPlot #N/A MakeChart‘сzZcзЖXv‹§њм›л)№YзЖXv‹§њЎ›л)№YзЖXv‹§њ4›л)№YзЖXv‹§њл›л)№YзЖXv‹§њ“сzZcзЖXv‹§њ йПџџџџ џџџџЉp chkStacked chk100Percent chkShowPoints Frame2_ClickcboChartType_ChangechkStacked_Click 88д@ "$’ Column Bar Line Point Area Pie Radar Column Chart Bar Chart Line Chart Point Chart MIN( Area Chart Pie Chart Radar ChartqсzZcзЖXv‹§њЪ›л)№YзЖXv‹§њ’›л)№YзЖXv‹§њ"›л)№YзЖXv‹§њЩ›л)№YзЖXv‹§њsсzZcзЖXv‹§њ ‰Хџџџџ џџџџЉА chkOutlierchkJoinchkOutlier_ClickBoxPlot   Boxplot ,  Base LW LB UB UW Outlier Extreme Max =MIN( QUARTILE( ,1) MEDIAN( ,3) =QUARTILE( =MEDIAN( =MAX( <0, ,0) <0,IF( <0,( )/100, /100),0) ),0) >=0, >=0,IF( >=0,(CopyChartObjectsPlotVisibleOnly chkSortRows Source PlotBySetSourceDataChartTypeHasTitle Boxplot of ChartTitle  by SizeHasLegend  SeriesCollection BorderColorIndexInteriorinclude AmountErrorBar ColorMarkerStyle *MarkerForegroundColorLineStyle *MarkerBackgroundColorPlotArea WeightAxes "HasMajorGridlines "HasMinorGridlinesMinorUnitMajorUnitMinimumScaleCrossesAt "TickLabelPosition 9;џџџџL РyсzZcзЖXv‹§њЮ›л)№YзЖXv‹§њ–›л)№YзЖXv‹§њ&›л)№Yз‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—ўџџџ™š›œŸслЕЂЕЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийкўџџџмнопрцїуфхўџџџчшђъыьэюя№ётѓєѕі>šљћБќ§ў§џџџЖXv‹§њЭ›л)№YзЖXv‹§њ{сzZcзЖXv‹§њ дџџџџ џџџџЉQQPlot ˆuсzZcзЖXv‹§њЬ›л)№YзЖXv‹§њA›л)№YзЖXv‹§њ$›л)№YзЖXv‹§њЫ›л)№YзЖXv‹§њwсzZcзЖXv‹§њ ‰еџџџџ џџџџЉP <<р<’ѓTжРFXValues4MarkerBackgroundColorIndex4MarkerForegroundColorIndexTrendlines Colour plot  of xРF  against MРFAxisTitleCharactersTРFpРFMinMaxkРFMarkerSize ShadowAбР ‡fзЖXv‹§њк›л)№YзЖXv‹§њЊ›л)№YзЖXv‹§њ2›л)№YзЖXv‹§њй›л)№YзЖXv‹§њOptMaxoptMinCбР ‡fзЖXv‹§њ aлџџџџ џџџџЉРlstCarryoptDuplNewColumn optDuplIgnore optDuplNewRowoptFirstoptLast fraExceptlstCarry_ChangeoptDuplIgnore_ClickoptDuplNewColumn_ClickoptDuplNewRow_Click ф && Є\ю%бР ‡fзЖXv‹§њ™бР ‡fзЖXv‹§њ&бР ‡fзЖXv‹§њкаР ‡fзЖXv‹§њ˜бР ‡fзЖXv‹§њ'бР ‡fзЖXv‹§њ соџџџџ џџџџЉH›бР ‡fзЖXv‹§њBбР ‡fзЖXv‹§њваР ‡fзЖXv‹§њšбР ‡fзЖXv‹§њ Frame3_ClickoptDuplAdd_Click НҘžЄfзЖXv‹§њќТ˜žЄfзЖXv‹§њОҘžЄfзЖXv‹§њrҘžЄfзЖXv‹§њћТ˜žЄfзЖXv‹§њПҘžЄfзЖXv‹§њ Iсџџџџ џџџџЉX optDuplAdd шTe5!pзЖXv‹§њXe5!pзЖXv‹§њUe5!pзЖXv‹§њјd5!pзЖXv‹§њWe5!pзЖXv‹§њVe5!pзЖXv‹§њ бтџџџџ џџџџЉАyл$F­зЖYv‹§њ}л$F­зЖYv‹§њzл$F­зЖYv‹§њ/л$F­зЖYv‹§њ|л$F­зЖYv‹§њ{л$F­зЖYv‹§њ 1фџџџџ џџџџЉСYl†ЯЋ|ЊРЯ .œњlI­зЖYv‹§њœњlI­зЖYv‹§њœњlI­зЖYv‹§њЬ›њlI­зЖYv‹§њœњlI­зЖYv‹§њœњlI­зЖYv‹§њ Йхџџџџ џџџџЉ( SSC-Stat V2.1жy)Ф.ЎзЖYv‹§њлy)Ф.ЎзЖYv‹§њзy)Ф.ЎзЖYv‹§њŒy)Ф.ЎзЖYv‹§њкy)Ф.ЎзЖYv‹§њиy)Ф.ЎзЖYv‹§њ Iчџџџџ џџџџЉ8Ÿy)Ф.ЎзЖYv‹§њ Unregistered. Registered to   Licence: .for non-commercial use &for commercial use *on one computer only. on up to   computers. Public DomainL'єіМзЖYv‹§њš'єіМзЖYv‹§њ™'єіМзЖYv‹§њ )ыџџџџ џџџџЉh&_'єіМзЖYv‹§њіy)Ф.ЎзЖYv‹§њ' œœlaHM(,E’iƒ0џџp„’џџL’џџ Single User Group Departmental Large Site' œœl’0’L 4Ф’—'єіМзЖYv‹§њ›'єіМзЖYv‹§њ˜'єіМзЖYv‹§њpy)Ф.ЎзЖYv‹§њѕy)Ф.ЎзЖYv‹§њa'єіМзЖYv‹§њ Y№џџџџ џџџџЉј& ,, !џџi TЦDєDLАFLСW' œœl’0’L єž~’vљLцїФиЖYv‹§њ{љLцїФиЖYv‹§њwљLцїФиЖYv‹§њ,љLцїФиЖYv‹§њzљLцїФиЖYv‹§њxљLцїФиЖYv‹§њ Aѓџџџџ џџџџЉx& fraSuccess`љLцїФиЖYv‹§њ SSC-Stat V2.11' œœlc~€’ђ0ђ’L]$Ќ <@’ђљLцїФиЖYv‹§њŒљLцїФиЖYv‹§њ^љLцїФиЖYv‹§њљLцїФиЖYv‹§њ_љLцїФиЖYv‹§њ љLцїФиЖYv‹§њŽљLцїФиЖYv‹§њFrame5 CheckBox1Label7TextBox1optMaxoptEqual optGreater txtSuccess txtTrialsoptLesstxtSuccessValue сѓџџџџ џџџџЉЈ* txtSuccess2 txtTrials2txtSuccessValue_ChangetxtSuccess_ChangetxtTrials_ChangetxtSuccess2_ChangetxtTrials2_Change optMax_Click optMin_ClickoptEqual_ClickoptGreater_Click optLess_Click 88 <<џџ’ SSC-Stat V2.12 ,, !€џџi TЦDџџџџџџџџ:eСW TwoProp )/FINV( =R[-1]C/R[-2]C `Please specify a value for the success condition ,1,0) =0,0,if( =0,1,0)) =0,if( =1,1,0),0) =SUM( $Paired Proportions ,Two-Sample ProportionsMakeProportionTable Number of trials +1)/( +1+( &Number of successes .Proportion of successes *Number of differences 2Difference of proportions (Exact) (Normal approx.) (Simple approx.) Test statistic =0,0, +1)*FINV( ,2* -2* +2,2* ))) =1,1,( *( ^2) *(-2* ^2 SQRT(( )^2-4* )/(2* /(2* *SQRT( *(1- (ABS( )-0.5) /SQRT( -(( )^2)/ )-1)/SQRT( (1- *SQRT(( )+( )/( )/SQRT( *(1/ ,0,НљLцїФиЖYv‹§њ\љLцїФиЖYv‹§њ (=ROUNDUP(1-NORMDIST( ,0,1,true),4) *=ROUNDUP((1-NORMDIST( ,0,1,true))*2,4) PowerTransZSlope RInterceptRSlope PartArray MedianPartResLine ResLineFit Make2DArray =NORMSDIST(-ABS( ))*2 Copyright 2004:ZљLцїФиЖYv‹§њОљLцїФиЖYv‹§њ[љLцїФиЖYv‹§њљLцїФиЖYv‹§њ йџџџџ џџџџЉи.chkExact chkNormal chkSimple 88є<Р’ OneProp *One-Sample Proportion 8Standard error of difference SQRT(>љLцїФиЖYv‹§њАљLцїФиЖYv‹§њ?љLцїФиЖYv‹§њљLцїФиЖYv‹§њЏљLцїФиЖYv‹§њ@љLцїФиЖYv‹§њ Iџџџџ џџџџЉш.bљLцїФиЖYv‹§њРљLцїФиЖYv‹§њcљLцїФиЖYv‹§њ"љLцїФиЖYv‹§њПљLцїФиЖYv‹§њdљLцїФиЖYv‹§њ Љџџџџ џџџџЉ/6љLцїФиЖYv‹§њЋљLцїФиЖYv‹§њ7љLцїФиЖYv‹§њљLцїФиЖYv‹§њЊљLцїФиЖYv‹§њ8љLцїФиЖYv‹§њ ёџџџџ џџџџЉ / 88Ш@ pk…’t—$o(ХиЖYv‹§њL$o(ХиЖYv‹§њš$o(ХиЖYv‹§њ˜$o(ХиЖYv‹§њ aџџџџ џџџџЉ3юƒ‘MюХиЖYv‹§њ' œœl’0’L ”ЁO’˜&G!ХиЖYv‹§њœ&G!ХиЖYv‹§њ™&G!ХиЖYv‹§њN&G!ХиЖYv‹§њ›&G!ХиЖYv‹§њš&G!ХиЖYv‹§њ џџџџ џџџџЉ1|&G!ХиЖYv‹§њЦљLцїФиЖYv‹§њoљLцїФиЖYv‹§њ(љLцїФиЖYv‹§њХљLцїФиЖYv‹§њ~&G!ХиЖYv‹§њ Yџџџџ џџџџЉ1›$o(ХиЖYv‹§њ' œœl’0’L S{’-—"ХиЖYv‹§њ-—"ХиЖYv‹§њ-—"ХиЖYv‹§њЬ-—"ХиЖYv‹§њ-—"ХиЖYv‹§њ-—"ХиЖYv‹§њ џџџџ џџџџЉ№2' œœl’0’L М|’–$o(ХиЖYv‹§њ  MyPath' œœlИЅy’џџ0џџџџџџџџџџ’L| @yz’WЖb.ХиЖYv‹§њ[Жb.ХиЖYv‹§њXЖb.ХиЖYv‹§њ Жb.ХиЖYv‹§њZЖb.ХиЖYv‹§њYЖb.ХиЖYv‹§њ Yџџџџ џџџџЉ5OЖb.ХиЖYv‹§њЮ$o(ХиЖYv‹§њ$o(ХиЖYv‹§њH$o(ХиЖYv‹§њЭ$o(ХиЖYv‹§њQЖb.ХиЖYv‹§њ6„‘MюХиЖYv‹§њ Ёџџџџ џџџџЉˆ9 ,, ! џџi TЦD} &Y#СW' œœl LДM’…0’1L-B ’ЎХ0ХиЖYv‹§њєХ0ХиЖYv‹§њЏХ0ХиЖYv‹§њЅХ0ХиЖYv‹§њѓХ0ХиЖYv‹§њАХ0ХиЖYv‹§њ Щ"џџџџ џџџџЉ€:шƒ‘MюХиЖYv‹§њ7„‘MюХиЖYv‹§њщƒ‘MюХиЖYv‹§њАƒ‘MюХиЖYv‹§њ сџџџџ џџџџЉј; ,, !АGџџi kTЦD˜G `СW„‘MюХиЖYv‹§њS„‘MюХиЖYv‹§њ„‘MюХиЖYv‹§њОƒ‘MюХиЖYv‹§њR„‘MюХиЖYv‹§њ „‘MюХиЖYv‹§њ ‰%џџџџ џџџџЉx= 88є<`ѓџџ”sN’ѓ Std. error"„‘MюХиЖYv‹§њg„‘MюХиЖYv‹§њ#„‘MюХиЖYv‹§њРƒ‘MюХиЖYv‹§њf„‘MюХиЖYv‹§њ$„‘MюХиЖYv‹§њ ‰'џџџџ џџџџЉа= 88 <С{ЮŸFЊ’в‹pX Yф9h сх9x qч9ˆ Qы9˜ №9Ј iѓ9И ј9ШExactNormalSimplexLambdayFinishnew_xDataNrowNcol 9и q9ш б9ј 9 99 9( 998 ‰9HMyname 9X 9h ё"9x $9ˆ Б%9˜ Б'9Ј%CompObjџџџџџџџџџџџџ6pi52u{ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџIНoz|џџџџCPўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqLFР€€€€#€б 40р~Remember original data column names5€ЅTahoma@4FР€€€€ €ЏO1р~Sort columns5€ЅTahoma@PFР€€€€%€б 40р~Remember original factor column names,|5€ЅTahoma@PFР€€€€'€ъї0р~Ignore cases with missing factor valdlgUnStackіОN`фSіYФ@оєSіYФfџџџџџџџџџџџџŽOoMWџџџџ‘єi18џџџџџџџџQ n`єЮ›ЭЊ`Ž`фSіYФ =эSіYФ€24btnHelp)j%$е€##Frame2@ ѓ(х €4h chkCopyData’4%(х €8lstVariable –$х€8lstBy@C–ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgUnStack Caption = "UnStack" ClientHeight = rU€€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  aџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ   џџџџ џџџџџџџџџџџџџџџџ     џџџџ ?Statistical functions and dialogs - Statistical Services Centre ExcelMenuMyMenuItemNameActionItemType BeginGroupRegNoRegTextstInputstDateRegDateNumTextSubKeyValueDefaultNumber Ё) Ёљ Щ9(hwnd lpOperationlpFile lpParameters lpDirectorynShowCmdFileName Ё =8Options ЁQ=H ё= =X Ёa>h ЁЙ>x ЁA?ˆ 1@9˜ ЁС@ЈHeaderFormulaAsArrayFormathKeylpSubKey ulOptions samDesired phkResultReservedlpClass dwOptionslpSecurityAttributeslpdwDisposition lpValueName lpReservedlpTypelpDatalpcbDatadwTypelpValuecbDatalpRootPathNamelpVolumeNameBuffernVolumeNameSizeSortlpVolumeSerialNumberlpMaximumComponentLengthlpFileSystemFlagslpFileSystemNameBuffernFileSystemNameSizeRootKeyKeyName ValueNameKeyTypeKeyValuestrDriveMessagePos Delimiter ContextIdHelpFile БсSИStartMyRangeSigFigs ThisString Oldstring NewStringNameAddressDummy ThisRange DataRange HeaderRow FirstDataRow ColumnName HeaderAddressSelectedColNamei i ^ШBoxFactorVars SheetNameNewSheetRangeBox RangeOption SheetOption BookOptionGapNewBook OutputAddressDefaultSheetNameBookName Бсaи Б)bш ™љbјSaved arrObjectsVarCollIndexFactors RowFactors DestinationCopyDataFactorAsVarName IgnoreMissingIgnoreFactorMissingMissing NonNumeric CellRange Œ9DataArea DateString a9 Љ9( NoOfFactors FactorNames FactorValues ё”98 ˜9H Q™9X ›9h NoOfColumnsConfidenceLevelPairedUnequalVariancesTest TestValue ‘Њ9x MaxColumns ™Б9ˆ сВ9˜ AЖ9Ј ‰З9И И9Ш К9иCodeXVarsYvarsTopByColourMarkers Trendline ChartTypeXColumnsYColumnsXNameYNames FactorName Direction ChartTitleLeft Р9шLines БХ9ј DataColumnsVarNamesOutliers JoinMedians DisplayMeans 1д9 Бе9 ‰л9( п98 qс9H љт9VBFrameџџџџџџџџџџџџж@dlgStackщc@оєSіYФ@оєSіYФfџџџџџџџџџџџџлKobhџџџџо 5880 ClientLeft = 45 ClientTop = 330 ClientWidth = 6150 HelpContextID = 210 StartUpPosition = 1 'CenterOwner TypeInfoVer = 139 End $  \џџР}z*”-Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF МŠ(ѕ€7<btnOK@${*,€OK~Щ{w€ @ЅTahoma@(€Cancel@Щ{u€ЅTahoma@$(€ј      !"#$%&'()*+,-./0123456789:;<=ўџџџ?@ABЋDEFGHQJKLMNOPCRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€§џџџfџџџџџџџџџџџџНoPRџџџџ—Pi44џџџџSU n`єЮ›ЭЊ`Ž =эSіYФ =эSіYФCompObjџџџџџџџџџџџџ•pCompObjџџџџџџџџџџџџpfџџџџџџџџџџџџщomoџџџџCompObjџџџџџџџџџџџџpi63џџџџџџџџf n`єЮ›ЭЊ`Ž@оєSіYФ@оєSіYФfџџџџџџџџџџџџїщoegџџџџцCompObjџџџџџџџџџџџџфpCompObjџџџџqџџџџ'aVBFrameџџџџџџџџџџџџ)<dlgXYPlotaœt@оєSіYФўSіYФfџџџџџџџџџџџџ.ЇF РŠ0ѕ €2<lblFactorListoj)((€Factor(s) to unstack by” Ј 4Ѕ(€Cancel@ž{u€ЅTahoma@$(€Column(s) to unstackП Ј 4Ѕ,€OK~ž{w€ @ЅTahoma@(€Help{ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€edded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgStack Caption = "Stack" ClientHeight = 6615 ClientLeft = 45 ClientTop = 330 ClientWidth = 6165 HelpContextID = 220 StartUpPosition = 1 'CenterOwner TypeInfoVer = 192 End (H  @џџU}*r)Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEH€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  /Р€џџ#}г(< Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€4txtWorksheetNameSO$х€ 8€refRangeSд,х€(4txtWorkbookNameSЪ(ѕ€)28Label2@с#(ѕ€*2<Label3@сž0ѕ€+2<lblWorkbookNameс$е€,#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  /Рџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€-XoptRange…Ї(х €.XoptNewSheet…i(х €/ToptNewBookF… {џu€ЅTahoma@HFР€€€€€сfџџџџџџџџџџџџ щoЄІџџџџCompObjџџџџџџџџџџџџpi125 ŸЋЉ n`єЮ›ЭЊ`Ž ЇTіYФ ЇTіYФfџџџџџџџџџџџџЧЙo\^џџџџФЄCompObjџџџџџџџџџџџџТpCompObjџџџџ`џџџџдaues5€ЅTahoma@DFР€€€€€ъ,0р~Ignore missing data valuesD5€ЅTahoma@@H  6€€џџ}i(фUnstack optionsRу ‘ЮуЊKИQDBTahoma†,х€$lchkColumnNamesjдž$х€%TchkSortє J$е€0#fraSortЛP,х€3pchkFactorNamesjдi4х€5pchkIgnoreFactorMissingMє €,х€6dchkIgnoreMissingє lўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq0FР€€€€€ИФ1р~By name5€ЅTahoma@4FР€€€€ €м0р~By factorђF5€ЅTahoma@(H  2€џџ}шRу ‘ЮуЊKИQDBTahomad‚,х €1PoptSortByNameojj…,х€2ToptSortByFactorŒ„А0р~Values only (linked by default)5€ЅTahoma@`#€*  5€ЅTahoma@`#€*  5€ЅTahoma@Ќ,ѕ €:8btnCancel'}šj%,ѕ €28lblVarList}яЌ(ѕ€7<btnOK@ #j%$е€#Frame1@д@(ѕ‚ƒ„…†‡ˆ‰Š‹ŒўџџџЭ’“”Џ–ўџџџ˜™š›œўџџџžŸ ЁЂЃўџџџЅўџџџЇЈЉЊўџџџЌ­ЎўџџџЪБўџџџГДЕЖЗИЙКўџџџМНОПРСўџџџУўџџџХЦўџџџШЩўџџџЫЬўџџџЮЯабвгўџџџеўџџџзийкўџџџмн прстухўџџџчшщъыьэюя№ёђѓєѕіўџџџјљњћќ§ўџi121 џџџџ} n`єЮ›ЭЊ`ŽўSіYФўSіYФCompObjџџџџџџџџџџџџApfџџџџџџџџџџџџWщo~€џџџџRўџџџўџџџ  ўџџџ  ўџџџўџџџўџџџўџџџўџџџ!"#$%&ўџџџ(ўџџџ*+,-ўџџџ/0a2345[7ўџџџ9:;ўџџџ=>?@ўџџџBўџџџDEFGHўџџџJKLMNOўџџџQўџџџSTUVўџџџXYZўџџџ\]^_`ўџџџbcdefghўџџџjўџџџlmnopўџџџrstuvwxyz{|ўџџџ~€osyџџџџ1„i46џџџџџџџџw n`єЮ›ЭЊ`Ž@оєSіYФ@оєSіYФfџџџџџџџџџџџџ<ovxџџџџ8аColumn(s) to stackM‹ Ј5€ЅTahoma@8FР€€€€ €Ѕ ї0р~Row factor(s)oj5€ЅTahoma@(€HelpЩ{u€ЅTahoma@HFР€€€€€сА0р~Values only (linўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqHFР€€€€€У1р~Create stacked data column(s) n5€ЅTahoma@ @€H€,€HStack@5€ЅTahoma@LFР€€€€"€‘о1р~Create factor(s) from column namesJ5€ЅTahoma@@€H€,€HFrom5€ЅTahoma@@GР€€,€€€€к 0р~Match column namesM7€ @ЅTahoma@@FР€€€€€ G0р~Omit cells with value:M5€ЅTahoma@€H€,H5€ЅTahoma@DGР€€,€€€€‹ -0р~Include trailing blanks7€ @ЅTahoma@( €Output order*У5€ЅTahoma@A€H€,qH5€ЅTahoma@A€H€,qH5€ЅTahoma@A€H€,qH5€ЅTahoma@ (€Row factor(s):jqо5€ЅTahoma@( €Default name"s5€ЅTahoma@@H  Z€ €џџ%}э(o Stack optionma@(ѕ€2<Label2@д(ѕ€"7<btnOK@д"@&,ѕ €#:8CancelButtonc@&(ѕ€(24btnHelpђ@&$е€.#Frame2@д]$е€4#Frame1@­Х$х€~T chkBy@<i(х €h chkCopyDataдњ%$х€-8lstYVarд{(ѕ€118lstBy@I{$х€}4sojRу ‘ЮуЊKИQDBTahoma|Ž(х €@hchkStackDataдЉ(х €A@txtStackNameLУ,х€BlchkStackFactorjдZ,х €C<txtFactorNameojLZ(ѕ€D1dchkMatchmѓ $х€E`chkOmitд $х€F4txtOmit ,ѕ €G1hchkTrailingдж(ѕ€U2<Label4@Л5(х €V8 cboOrderDataЛФ,х€W8 lstXvarˆ sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgXYPlot Caption = "X-Y ScatterPlot" ClientHeight = 6015 ClientLeft = 45 ClientTop = 330 ClientWidth = 6105 HelpContextID = 310 StartUpPosition = 1 'CenterOwner TypeInfoVer = 85 CompObjџџџџџџџџџџџџВpi141 СЭЫ n`єЮ›ЭЊ`ŽpTіYФpTіYФfџџџџџџџџџџџџХјoЪЬџџџџР, cboOrderFactorjЛh,ѕ €X18 cboOrderRowЛџ,ѕ €Y0@ lblOrderRowо‘(ѕ€Z2< Label6@™6ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  TР€џџ#}г(" Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€J4txtWorksheetNameSO$х€L8€refRangeSд,х€M4txtWorkbookNameSЪ(ѕ€N28Label2@с#(ѕ€O2<Label3@сž0ѕ€P2<lblWorkbookNameс$е€Q#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  TРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€RXoptRange…Ї(х €SXoptNewSheet…i(х €TToptNewBookF… {џked by default)5€ЅTahoma@`#€Џ  5€ЅTahoma@`#€Џ  5€ЅTahoma@ End $  sџџЅ}+*a$Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF <(ѕ€7<btnOK@ #d!,ѕ €:8btnCancelme.˜d!$е€+#Frame2@~Й,е €3!fraAdditionalKў*Z$х€9TchkBy@0i(ѕ€>24btnHelp'd!$е€B#Frame1@ИˆfџџџџџџџџџџџџqЫo„†џџџџ}ˆi43џџџџџџџџˆ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџˆЩРF Œ(ѕ€2@Label1@дд ( €Y variable(s)ojь Ї5€ЅTahoma@( €X variable}EЇ5€ЅTahoma@,€OK~ž{w€ @ЅTahoma@(€Cancel@{u€ЅTahoma@(€Help{u€ЅTahoma@4FР€€€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq( €Chart type}Ї5€ЅTahoma@A€H€,и,5€ЅTahoma@<FР€€€€€L0р~Show trend line(s)M5€ЅTahoma@@H  2Р €џџ}&іChart optionsojRу ‘ЮуЊKИQDBTahoma„ƒ(ѕ€/2<Label4@ЇЈ(х €08cboChartType2 Z$х€2\chkTrendXy {џ(х €gh chkCopyDataaЙp!,х €(` chkAdditionalK~$е€l# Frame4@ю’(х €sT chkVariableaюi(ѕ€@18lstBy@Џ(х €*8lstVariableaяЏ,€OK@{w€ @ЅTahoma@(€Cancel@ž{u€ЅTahoma@4FР€€€€ €П ,0@By factor(s)5€Ѕўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€CompObjџџџџџџџџџџџџPpCompObjџџџџ‚џџџџiaVBFrameџџџџџџџџџџџџkFdlgDescriptiveStats(џџџџџџџџŠўSіYФўSіYФЅTahoma@@H  |Р€џџ#}г(V Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€r4txtWorksheetNameSO$х€t8€refRangeSд,х€u4txtWorkbookNameSЪ(ѕ€v28Label5@с#(ѕ€w2<Label6@сž0ѕ€x2<lblWorkbookNameс$е€y#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  |Рџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€zXoptRange…Ї(х €{XoptNewSheet…i(х €|ToptNewBookF… {џ €П ,0р~By factor(s)5€ЅTahoma@HFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@`#€x  5€ЅTahoma@`#€“ Є 5€ЅTahoma@`€x ‹ 5€ЅTaho‚ƒ„…†‡ўџџџ‰Š‹ŒŽўџџџ‘’“”•–—˜™šўџџџœўџџџžŸ ЁЂЃЄЅІЇЈЉЊЋЌўџџџЎЏАБВГДЕЖЗИЙКЛМНОПўџџџСўџџџУФХЦЧШўџџџЪЫЬЭЮўџџџабвўџџџдежзўџџџйўџџџлўџџџнопўџџџстуўџџџхўџџџчўџџџщъыьэўџџџя№4ђѓєѕіїјљњћќ§ўџTahoma@(€Help{u€ЅTahoma@HFР€€€€€]{0@Values only (linked by default)5€ЅTahoma@@FР€€€€€ы ї0@Additional statisticsy d5€ЅTahoma@4FР€€€€ €‚ м1@Variable(s)s5€ЅTahoma@`#€*  5€ЅTahoma@`#€* ; 5€ЅTahoma@DH  r€€џџ}CStandard statisticsRу ‘ЮуЊKИQDBTahomaXˆ$х€V\chkStdevw $х€WLchkMeanw $х€XPchkTotalwј(х €YXchkNonBlanksw $х€ZTchkCountw(х €j\chkNumerickswў(ѕ€q1TchkCumulwЇ ,ѕ €r1TchkPercentkswЎo‡‰џџџџЈCompObjџџџџџџџџџџџџ›pi51…–Œ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџќ<FР€€€€€ п1@Standard deviation5€ЅTahoma@,FР€€€€€z њ1@Mean5€ЅTahoma@0FР€€€€€ ї1@Total@5€ЅTahoma@8FР€€€€€M љ1@No of non-blanks5€ЅTahoma@4FР€€€€ €h Т1@No of blanks5€ЅTahoma@<FР€€€€€œ ї1@No of numeric values5€ЅTahoma@4FР€€€€ € ј0@Cumulative%s5€ІTahoma@4FР€€€€ €Ж м0@% non-blanks5€ІTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq(H  p€1}wR"Ш(х €4PchkMedianctiю0(х €5TchkQuartilesюP(х €6\chkSkewnesssяq $х€7XchkSS@я~ $х€8\chkCV@я;$х€SPchkRangeю5(х €TPchkMaximumssю>(х €UPchkMinimumssю],х€[TchkPercentilesя˜,х€\T chkProportionsя+tѕ €]14 ?€txtPercentiles НEnter one or more numbers between 0 and 100 separated by spacesЄх €^4 y€txtOtherгЖEnter a valid Excel formula, with a ? character indicating where the column data are to be inserted, e.g. COUNTIF(?,">20)(ѕ€_2@ Label1@ нdѕ €c14 -€txtProportions­ЫEnter one or more numbers separated by spaces@,ѕ €d18cboConditionэз(ѕ€p14cboPropЗ ї0FР€€€€€ь 0@Median@5€ЅTahoma@4FР€€€€ €ь м0@Quartilestks5€ЅTahoma@<FР€€€€o‹џџџџ­”CompObjџџџџџџџџџџџџРpi66џџџџџџџџ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџТН€“ 0@Skewness/Kurtosis0 5€ЅTahoma@8FР€€€€€“ м0@Sums of squares5€ЅTahoma@<FР€€€€€б ,0@Coeff. of variation 5€ЅTahoma@0FР€€€€€і ,0@Range@5€ЅTahoma@0FР€€€€€",0@Maximum5€ЅTahoma@0FР€€€€€! ї0@Minimum5€ЅTahoma@4FР€€€€ €ўм0@Percentilesa5€ЅTahoma@4FР€€€€ €EF0@Proportionsa5€ЅTahoma@€H€,f,5€ЅTahoma@€H€,,5€ЅTahoma@ (€Other function:‹Т5€ЅTahoma@€H€,Р ,5€ДTahoma@A€H€,С,5€ЅTahoma@@€œ `5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq@H  iР€џџ1}г( Output optionsRу ‘ЮуЊKИQЈBTahoma@‡,х€C4txtWorksheetNameSO$х€E8€refRangeSд,х€F4txtWorkbookNameSЪ(ѕ€G28Label8@с#(ѕ€H2<Label9@сž0ѕ€I2<lblWorkbookNameс$е€J#Frame3@Ÿд sџ€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:oвЇ5€ЅTahoma@( €Book name::oЇ5€ЅTahoma@(H  iРџџ}Ш Rу ‘ЮуЊKИQo‘џџџџЩPi74џџџџ•“ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџЯщo’”џџџџгDBTahoma„ƒ$х€KXoptRange…Ї(х €LXoptNewSheetk…i(х €MToptNewBooktk… {џ8FР€€€€€“ м0ЭqExisting range5€ЅTahoma@8FР€€€€ €g {1ЭqNew worksheetK5€ЅTahoma@4FР€€€€ €” 0ЭqNew workbook5€ЅTahoma@CompObjџџџџџџџџџџџџиpCompObjџџџџџџџџџџџџкpi108 Žš˜ n`єЮ›ЭЊ`ŽўSіYФўSіYФfџџџџџџџџџџџџмѕўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqDH  o€€џџ}ž(<Presentation optionsRу ‘ЮуЊKИQрATahoma„ƒ$х€mTchkSortq(х €n<txtSigFigsnsЎ(ѕ€o2DLabel10…цo—™џџџџрдCompObjџџџџџџџџџџџџфpCompObjџџџџ›џџџџцaVBFrameџџџџџџџџџџџџшX4FР€€€€ €3 А1@Sort columns5€ЅTahoma@@€H€,€џ,4@5€ЅTahoma@$(€Number of Sig. Figs. 5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgDescriptiveStats Caption = "Descriptive statistics" ClientHeight = 5280 ClientLeft = 45 ClientTop = 330 ClientWidth = 6120 HelpContextID = 410 StartUpPosition = 1 'CenterOwner TypeInfoVer = 165 End (H  „@џџv}•*E*Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEfџџџџџџџџџџџџ+ќoЈЊџџџџ&4CompObjџџџџџџџџџџџџ$pCompObjџџџџЌџџџџLaРF!шЁ,ѕ €.:8btnCancel'}™(€Cancel@{u€ЅTahoma@,€OK~{w€ @ЅTahoma@@FР€€€€€C,1р~Samples in two columns:5€ЅTahoma@A€H€,Р ,5€ЅTahoma@A€H€,Р ,5€ЅTahoma@( €Sample 1:'}ЪЈ5€ЅTahoma@( €Sample 2:'}ЪЇ5€ЅTahoma@@FР€€€€€ї0р~Samples in one column:M5€ЅTahoma@A€H€,П ,5€ЅTahoma@A€H€,Р ,5€ЅTahoma@ ( €using factor:ojЇ5€ЅTahoma@8FР€€€€€“ ї0р~Summary values:5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@i63АМЖ n`єЮ›ЭЊ`Ž ЇTіYФрЮTіYФfџџџџџџџџџџџџnНoЕЗџџџџhPi71џџџџИК n`єЮ›ЭЊ`Ž ЇTіYФрЮTіYФ€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@(€MeanЪЈ5€ЅTahoma@ ( €Std deviationoj<Ј5€ЅTahoma@(€SizeЪЈ5€ЅTahoma@€H€$Р {5€ЅTahoma@€H€$Р {5€ЅTahoma@€H€$П {5€ЅTahoma@(€Help€€сА0р~Values only (linked by default)5€ЅTahoma@`€* › 5€ЅTahoma@Й(ѕ€C7<btnOK@Z#Д,ѕ €D:8btnCancel'}щГ(ѕ€E24btnHelpxГ$е€J#Frame1@T(х €VhchkCopyData1І(х €H8lstVariable a sџdlgTwoTtestL=žўSіYФ ЇTіYФfџџџџџџџџџџџџю‹oЇџџџџё`i85џџџџџџџџЁ n`єЮ›ЭЊ`Ž ЇTіYФ ЇTіYФTahoma@(€Sample 1іЇ5€ЅTahoma@(€Sample 2іЇ5€ЅTahoma@HFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@'(ѕ€/7<btnOK@ #',х €0`optTwoColumnsojдд,ѕ €118cboSample1}т,ѕ €318cbosample2}тф,ѕ €40<lblSample1}іO,ѕ €5fџџџџџџџџџџџџНo Ђџџџџ Pi121 џџџџЃЅ n`єЮ›ЭЊ`Ž ЇTіYФ ЇTіYФCompObjџџџџџџџџџџџџ p0<lblSample2}іi(х €6`optOneColumnдь ,ѕ €718cboSample'}ть (ѕ€818cboBy@тg ,ѕ €90@lblFactor'}qg (х €:X optSummary}ю‰(ѕ€;14 txtMean (ѕ€>14 txtStdev ™(ѕ€?14txtSize (ѕ€@14 txtMean2Ц,ѕ €A14txtStdev2'}Ц(ѕ€B14txtSize2Цњ(ѕ€C04lblMean(ѕ€D0@lblStdev(ѕ€E04lblSizeњ,ѕ €M18€refSample1}т,ѕ €N18€refSample2}тф,ѕ €O18€refSample'}ть (ѕ€Q24btnHelp('(ѕ€R18 €refBy@тg $е€U#Frame1@я$е€}#Frame4@}T,ѕ €‚18cboColumn1}у ;{u€ЅTahoma@€H€$Р {5€ЅTahoma@A€H€,VF5€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5,ѕ €ƒ18cboColumn2}А;,ѕ €F08lblSummary} ‰,ѕ €G08lblSummary2с‰(х €„h chkCopyDataќ' sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgTwoTtest Caption = "Two-sample t" ClientHeight €ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  |Р€џџ#}г(< Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€r4txtWorksheetNameSO$х€t8€refRangeSд,х€u4txtWorkbookNameSЪ(ѕ€v28Label5@с#(ѕ€w2<Label6@сž0ѕ€x2<lblWorkbookNameс$е€y#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@VBFrameџџџџџџџџџџџџNHdlgBoxPlotџџџџџџџџЏ ЇTіYФрЮTіYФfџџџџџџџџџџџџT[oЎДџџџџW(H  |Рџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€zXoptRange…Ї(х €{XoptNewSheet…i(х €|ToptNewBookF… sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq0FР€€€€€П ,0р~Paired@5€ЅTahoma@<FР€€€€€“ 0р~Unequal variancesИM5€ЅTahoma@,(€Confidence level: xxxx %]D: Ї5€ЅTahoma@@€H,€O,95~5€ЅTahoma@(H  Р}x И„(х €~PchkPairedђFŸо(х €\chkUnequalFŸc0ѕ €2LlblConfidenceojŸ$х€€<txtCI@у‘ sџЅTahoma@A€H€,VF5€Ѕ = 6135 ClientLeft = 5445 ClientTop = 330 ClientWidth = 6180 HelpContextID = 430 StartUpPosition = 1 'CenterOwner TypeInfoVer = 118 End (H  L@џџa}`*љRу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF ИŠ(ѕ€(7<btnOK@ #р,€OK~ž{w€ @ЅTahoma@CompObjџџџџџџџџџџџџfpfџџџџџџџџџџџџ|щoЙЛџџџџwCompObjџџџџџџџџџџџџup / ўџџџ ўџџџўџџџўџџџўџџџ!"#ўџџџ%ўџџџ'()*ўџџџ,-.ўџџџ0123ўџџџ56789:;<=>?@ABCDEFGHIJKўџџџMўџџџOPQRSўџџџUV…XYZ€\ўџџџ^_`aўџџџcdeўџџџgўџџџijklmўџџџopqrstўџџџvўџџџxyz{ўџџџ}~ўџџџi56џџџџџџџџВ n`єЮ›ЭЊ`Ž ЇTіYФ ЇTіYФfџџџџџџџџџџџџbљoБГџџџџ]CompObjџџџџџџџџџџџџ[p€ €П ,0р~By factor(s)5€ЅTahoma@HFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@`#€* ­ 5€ЅTahoma@`#€* ­ 5€ЅTahoma@,ѕ €):8btnCancel'}™п,ѕ €*2DlblVarList}Їд(ѕ€.24btnHelp(п$е€8#Frame2@uЇ$е€?#Frame1@д$х€KTchkBy@є v(х €Lh chkCopyDataЧХ(ѕ€=18lstBy@{(х €+8lstVariableЇ{ sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgBoxPlot Caption = "Boxplot" ClientHeight = CompObjџџџџНџџџџŒaVBFrameџџџџџџџџџџџџŽ?dlgOneTtestgџџџџРрЮTіYФpTіYФfџџџџџџџџџџџџ“›(€Cancel@{u€ЅTahoma@$(€Variable(s) to plotП Ј5€ЅTahoma@(€Help{u€ЅTahoma@4FР€€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€; 0р~Display outliers5€ЅTahoma@4FР€€€€ € a0р~Join medians5€ЅTahoma@8FР€€€ 4350 ClientLeft = 45 ClientTop = 330 ClientWidth = 6150 HelpContextID = 320 StartUpPosition = 1 'CenterOwner TypeInfoVer = 97 End (H  ’@џџg}`*cRу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРFј‘,ѕ €Z:8btnCancel'}~(€Cancel@{u€ЅTahoma@,€OK~{w€ @ЅTahoma@@FР€ЅTahoma@`€* › 5€ЅTahoma@,ѕ €>:8btnCancel'}š™,ѕ €?2@lblVarList}в?(ѕ€C24btnHelp)™$е€H#Frame1@дT(х €ThchkCopyDataЧp(х €@8lstVariableвч sџўџ џџџџMicrosoft Forms 2.0 FormEmb€ €ь {0р~Display meansoj5€ЅTahoma@<H  ;Р €џџ}g Р Plot optionsRу ‘ЮуЊKИQDBTahoma€ƒ(х €9XchkOutlierFдЇ$х€:TchkJoinд$х€;XchkMeanд" {џўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  JР€џџ#}И(" Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€@CompObjџџџџџџџџџџџџОpCompObjџџџџЮџџџџжaVBFrameџџџџџџџџџџџџиFdlgQQPlotџџџџџџџџбpTіYФР—TіYФ4txtWorksheetNameSO$х€B8€refRangeSд,х€C4txtWorkbookNameSЪ(ѕ€D28Label2@с#(ѕ€E2<Label3@сž0ѕ€F2<lblWorkbookNameс$е€G#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  JРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€HXoptRange…Ї(х €IXoptNewSheet…i(х €JToptNewBookF… {џedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgQQPlot Caption = "Normal probability plot" ClientHeight = 4485 ClientLeft = 45 ClientTop = 330 ClientWidth = 6150 HelpContextID = 330 StartUpPosition = 1 'CenterOwner TypeInfoVer = 45 End (H  V@џџ%}•*Rу ‘ЮуЊKИQ€€€€ї1р~Sample in one column:ІM5€ЅTahoma@A€H€,П ,5€ЅTahoma@8FР€€€€€“ ї0р~Summary values:5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@(€MeanЪЈ5€ЅTahoma@$(€Standard deviationMь Ј5€ЅTahoma@(ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgDenest Caption = "Density estimation" ClientHeight = 4500 ClientLeft = 45 ClientTop = 330 ClientWidth = 6180 HelpContextID = 340 StartUpPosition = 1 'CenterOwner TypeInfoVer = 37 End oПЩџџџџ–Рi125 џџџџџџџџУ n`єЮ›ЭЊ`ŽрЮTіYФрЮTіYФfџџџџџџџџџџџџЋНoТФџџџџЅP lblStdevЩь (ѕ€m0< lblSizeЩg ,ѕ €v18€refSample'}ЕЇ(ѕ€x24 btnHelp /$е€}# Frame1@ћ,,ѕ €‰18cboColumn'}; л$е€#Frame4@˜(х €’hchkCopyDataЧW sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgOneTtest Caption = "One-Sample t" ClientHeight = 4410 ClientLeft = 45 ClientTop = 330 ClientWidth = 6150 HelpContextID = 420 StartUpPosition = 1 'CenterOwner TypeInfoVer = 103 End (H  T@џџ-}`*чRу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEi133 џџџџХЧ n`єЮ›ЭЊ`ŽрЮTіYФрЮTіYФCompObjџџџџџџџџџџџџЃpfџџџџџџџџџџџџЙщoЦШџџџџДVBFrameџџџџџџџџџџџџ:IdlgLookupмЯыР—TіYФр8'TіYФfџџџџџџџџџџџџ@ћoъєџџџџCLdlgDenestџџџџџџџџоР—TіYФР—TіYФfџџџџџџџџџџџџпoнчџџџџˆi74џџџџџџџџс n`єЮ›ЭЊ`ŽР—TіYФР—TіYФ €Sample sizeЪЈ5€ЅTahoma@€H€$П {5€ЅTahoma@(€Help{u€ЅTahoma@A€H€,‚ Gўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇfџџџџџџџџџџџџопoакџџџџсˆi72џџџџџџџџд n`єЮ›ЭЊ`ŽpTіYФpTіYФfџџџџџџџџџџџџэН5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  ŒР€џџ(}г(! Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€~4txtWorksheetNameSO$х€€8€refRangeSд,х€4txtWorkbookNameSЪ(ѕ€‚28Label2@с#(ѕ€ƒ2<Label3@сž0ѕ€„2<lblWorkbookNameс$е€…#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTaho$  OџџU}•*Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРFlŽ(ѕ€2<Label1@юЙ( €Data columnь Ї5€ЅTahoma@ (€Columns to copyEЇ5€ЅTahoma@,€OK~ž{w€ @ЅTahoma@(€Cancel@{u€ЅTahoma@(€Help{u€ЅTahoma@((€Display lookup cma@(H  ˆРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€†XoptRange…Ї(х €‡XoptNewSheet…i(х €ˆToptNewBookF… sџ5€ЅTahoma@HFР€€€€€w,ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqHFР€€€€€ь С0р~Test sample mean against valueq5€ЅTahoma@,(€Confidence level: xxxx %]D: Ї5€ЅTahoma@@€H,€O,95~5€ЅTahoma@@€H€,€Щ,0р~5€ЅTahoma@(H  ‘Р}(y Д„$х€hchkTest‘I0ѕ €‘2LlblConfidenceojЌ/$х€<txtCI@№Х(х €Ž<txtTestValue‘ sџ0р~Values only (linked by default)5€ЅTahoma@/(ѕ€[7<btnOK@я"/(х €``optOneColumnЇЇ,ѕ €a18cboSample'}ЕЇ(х €dXoptSummary}Їі(ѕ€e14txtMeanЕq(ѕ€f14txtStdevЕь (ѕ€g14txtSizeЕg (ѕ€k04 lblMeanЩq(ѕ€l0D5€ЅTahoma@`€* 5€ЅTahoma@`#€“  5€ЅTahoma@,ѕ €2@lblColumns}bŸ(ѕ€17<btnOK@>#В,ѕ €2:8CancelButtonЭВ(ѕ€724btnHelp\В$е€:#Frame1@ќn(х €IHbtnDisplay}]5(х €J8 €refLookup'}e—(ѕoгеџџџџчPi80џџџџжи n`єЮ›ЭЊ`ŽpTіYФpTіYФCompObjџџџџџџџџџџџџхpfџџџџџџџџџџџџћщ‚ƒ„ўџџџ†‡ˆ‰Š‹ўџџџўџџџ‘’ўџџџ”•Ъ—˜™š›œžŸ ЁЂНЄўџџџІЇЈЉЊўџџџЌ­ЎЏАБўџџџГўџџџЕЖЗИўџџџКЛМўџџџЩПўџџџСТУФўџџџЦЧШўџџџўџџџЫЬЭЮЯабвгдеўџџџзўџџџйклмнўџџџпртуфџцўџџџшщъыьўџџџюя№ёђѓўџџџѕўџџџїјљњўџџџќ§ўўџџџi58џџџџџџџџю n`єЮ›ЭЊ`ŽР—TіYФР—TіYФfџџџџџџџџџџџџPНoэяџџџџJPi66џџџџ№ђ n`єЮ›ЭЊ`ŽР—TіYФР—TіYФРF<‡(ѕ€=7<btnOK@ #š,€OK~ž{w€ @ЅTahoma@(€Cancel@{u€ЅTahoma@ (€Variable to plotП Ј5€ЅTahoma@(€Help{u€ЅTahoma@HFР€€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€oзйџџџџіCompObjџџџџџџџџџџџџєpCompObjвлџџџџaVBFrameџџџџџџџџџџџџ NH€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  SР€џџ#}г(V Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€I4txtWorksheetNameSO$х€K8€refRangeSд,х€L4txtWorkbookNameSЪ(ѕ€M28Label2@с#(ѕ€N2<Label3@сž0ѕ€O2<lblWorkbookNameс$е€P#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  SРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€QXoptRange…Ї(х €RXoptNewSheet…i(х €SToptNewBookF… {џ€€сА0р~Values only (linked by default)5€€2< Label2@‚и$х€N\ chkArrayC (х €Oh chkCopyDataŠ$х€F8lstDataЂ,ѕ €G18 lstLookup'}2ќ (х €88lstColumns}bFўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgLookup Caption = "Lookup" ClientHeight = 4fџџџџџџџџџџџџНoртџџџџPi82џџџџух n`єЮ›ЭЊ`ŽР—TіYФР—TіYФCompObjџџџџџџџџџџџџpCompObjьѕџџџџtaVBFrameџџџџџџџџџџџџv=dlgOneProp~ јр8'TіYФр8'TіYФfџџџџџџџџџџџџ{‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•ўџџџ—ўџџџЖВЇЅžŸ ЁЂЃ–ЉЙ§џџџЊ}И­ЦЎЏ™тЄГД›ЗЪЮ˜КЛНОРФСТУШбЧЩЯЫХЬЭМіавжгдезлийкмнопршсуёфцѕэъыАьюяє№ђїѓщћњхљќўџ500 ClientLeft = 45 ClientTop = 330 ClientWidth = 6180 HelpContextID = 230 StartUpPosition = 1 'CenterOwner TypeInfoVer = 85 End (H  Ё@џџž}•*„%Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРFtŽ,ѕ €`:8btnCancelyLk"(ѕ€a7<btnOK@r#k"(х €b`optOneColumnЇЇ,ѕ €c18cboSaDBTahoma8KEРFв‹BьЮž Њ`ѓEРF<‡,ѕ €2@lblVarList}  (€Variable to plotП Ј5€ЅTahoma@,€OK~ž{w€ @ЅTahoma@(€Cancel@{u€ЅTahoma@(€Help{u€ЅTahoma@HFР€€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqfџџџџџџџџџџџџ,щoфцџџџџ'CompObjџџџџџџџџџџџџ%pCompObjпшџџџџ8a€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  UР€џџ#}г(< Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€K4txtWorksheetNameSO$х€M8€refRangeSд,х€N4txtWorkbookNameSЪ(ѕ€O28Label2@с#(ѕ€P2<Label3@сž0ѕ€Q2<lblWorkbookNameс$е€R#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  UРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€SXoptRange…Ї(х €TXoptNewSheet…i(х €UToptNewBookF… {џfџџџџџџџџџџџџiщo,.џџџџdCompObjџџџџџџџџџџџџbpi128 &71 n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФCompObjџџџџџџџџџџџџHpfџџџџџџџџџџџџ^щoёѓџџџџYCompObjџџџџџџџџџџџџWpўџџџўџџџўџџџ    ўџџџ30ўџџџўџџџ !"#$ўџџџ&ўџџџ()*+ўџџџ-./ўџџџ12ўџџџ4567ўџџџ9ўџџџ;<=>?ўџџџABkDEFGbIўџџџKLMNOўџџџQRSTUVўџџџXўџџџZ[\]ўџџџ_`aўџџџcdefghijўџџџlmnopqrsўџџџuўџџџwxyzўџџџ|}~€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@fџџџџџџџџџџџџŒo46џџџџˆдCompObjџџџџџџџџџџџџ†pi162 3;9 n`єЮ›ЭЊ`Ž `0TіYФ `0TіYФ@H  MР€џџ,}г(< Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€;4txtWorksheetNameSO$х€=8€refRangeSд,х€>4txtWorkbookNameSЪ(ѕ€?28Label3@с#(ѕ€@2<Label4@сž0ѕ€A2<lblWorkbookNameс$е€B#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м1р~Existing rangej5€ЅTahoma@8FР€€€€ €g {0р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  EРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€CXoptRange…Ї(х €DXoptNewSheet…i(х €EToptNewBookF… {џolumns >ШЏu€ЅTahoma@€H€$g •5€ЅTahoma@( €Lookup tableEЇ5€ЅTahoma@<FР€€€€€т,0р~Use a formula array5€ЅTahoma@HFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@`€* ƒ ‚ƒ„…†‡ўџџџ‰Š‹ŒŽ‘’“ўџџџ•–—˜™šўџџџœžŸ ЁЂўџџџЄўџџџІЇЈЉЊЋўџџџ­ЎЏАБВГДўџџџЖўџџџИЙКЛМНўџџџПРСТУўџџџХЦЧўџџџЩЪЫЬўџџџЮўџџџаўџџџвўџџџдежзиўџџџклмнопрстуфхцчшщъыьэўџџџя№ёђѓєѕіїјљњћќ§ўџmpleyLЕЇ(х €dXoptSummaryLЇі,ѕ €e14txtSuccessLЖ,ѕ €g14txtTrialsyLЖь (ѕ€h0DlblMean"q(ѕ€j0@lblSizeOь (ѕ€o24 btnHelpk"(е €r# fraSuccessLЇь $е€y# Frame3@њЪ$刓# Frame1@ф(х €Ёh chkCopyDataJ]" sџoї§џџџџˆьi114 џџџџџџџџћ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџ”‰oњќџџџџ›№(€Cancel@{u€ЅTahoma@,€OKB{w€ @ЅTahoma@@FР€€€€€ї1ЫBSample in one column:s >5€ЅTahoma@A€H€,П ,5€ЅTahoma@8FР€€€€€“ ї0ЫBSummary values:5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@$(€Number of successes:“ Ј5€ЅTahoma@ (€Number of trialsDЈ5€ЅTahoma@(€Help{u€ЅTahoma@HFР€€€€€ъF0ЫBValues only (linked by default)5€ЅTahoma@HH  †Р€џџ(}1 Condition for successs >Rу ‘ЮуЊKИQDBTahoma†$х€s`optMax@дд$х€tdoptMin@д$х€uPoptEqualдJ(х €vToptGreater„д $х€wToptLessд+0ѕ€x14txtSuccessValueР Ъ sџ@FР€€€€€й1ЫBMaximum, or larger value5€ЅTahoma@DFР€€€€€ѓ0ЫBMinimum, or smaller valueŠk5€ЅTahoma@0FР€€€€€ƒ,0ЫBEqual@5€ЅTahoma@4FР€€€€ €у{0ЫBGreater than5€ЅTahoma@4FР€€€€ € {0ЫBLess than2„5€ЅTahoma@€H€,{5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqDH   Р€џџ}]:Confidence intervalRу ‘ЮуЊKИQDBTahoma4‡0ѕ €}2LlblConfidenceХnЇР$х€~<CompObjџџџџџџџџџџџџЃpi121 љ џ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџЅЕoўџџџџЌ8txtCI@ы q$х€PchkExactдд(х €\chkNormalyLд{(х €‘`chkSimpleyLд"$х€ hchkTest№ (х €Ÿ<txtTestValue# N  sџ,(€Confidence level: xxxx %Šk: Ї5€ЅTahoma@@€H,€O,95B5€ЅTahoma@0FР€€€€€” a1ЫBExact@5€ЅTahoma@<FР€€€€€U {0ЫBNormal approximation5€ЅTahoma@@FР€€€€€{0ЫBSimple normal approx.xx 5€ЅTahoma@HFР€€€€€y г0ЫBTest sample mean against valuek5€ЅTahoma@@€H€,€Щ,0.55€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq@H  žР€џџ#}г(< Output optioCompObjџџџџџџџџџџџџЕpi147 џџџџџџџџ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџЗНoџџџџОPnsMRу ‘ЮуЊKИQDBTahoma@‡,х€”4txtWorksheetNameSO$х€–8€refRangeSд,х€—4txtWorkbookNameSЪ(ѕ€˜28Label2@с#(ѕ€™2<Label3@сž0ѕ€š2<lblWorkbookNameс$е€›#Frame4@Ÿд sџ€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:kЇ5€ЅTahoma@(H  žРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€œXoptRange…Ї(х €XoptNewSheet…i(х €žToptNewBook„… sџi155 џџџџ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџФщoџџџџШCompObjџџџџџџџџџџџџЭp8FР€€€€€“ м0ЫBExisting rangeM5€ЅTahoma@8FР€€€€ €g {1ЫBNew worksheet“M5€ЅTahoma@4FР€€€€ €” 0ЫBNew workbook5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmCompObjџџџџџџџџџџџџЯpCompObj џџџџбaVBFrameџџџџџџџџџџџџгNdlgTwoPropџџџџџџџџ р8'TіYФр8'TіYФbedded ObjectForms.Frame.1є9Вqўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgOneProp Caption = "One-sample Proportion" ClientHeight = 5445 ClientLeft = 45 ClientTop = 330 ClientWidth = 6180 HelpContextID = 440 StartUpPosition = 1 'CenterOwner TypeInfoVer = 158 End (H   @џџ]}ф-–'Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF€™,ѕ €Z:8 btnCancel„Вa$(ѕ€[7< btnOK@#&a$,х €\`optTwoColumnsKЇд,ѕ €]18cboSample1„Е,ѕ €^18cbosample2„ЖЪ,ѕ €_0< lblSample1„ЩO,ѕ €`fџџџџџџџџџџџџй#o џџџџю„i124 џџџџџџџџ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџБ0<lblSample2„ЪO(х €a`optOneColumnЇь ,ѕ €b18cboSample„Еь (ѕ€c18cboBy@Еg ,ѕ €d0@lblFactor„Dg (х €eXoptSummary„Ї‰,ѕ €f14txtSuccess„Е,ѕ €h14 txtTrials„Е€,ѕ €i14txtSuccess2,ѕ €k14 txtTrials2„€(ѕ€l0DlblMean"(ѕ€n0@lblSize"€,ѕ €o08lblSummary„Е],ѕ €p08lblSummary2](ѕ€y24btnHelpAa$(е €|#fraSuccess„М>$е€Ž#Frame1@Е$е€š#Frame4@МŠ(х € hchkCopyDataЕF$ sџ(€Cancel@{u€ЅTahoma@,€OKN{w€ @ЅTahoma@@FР€`#€*  5€ЅTahoma@`#€*  5€ЅTahoma@`#€*  5€ЅTahoma@ њ,ѕ €:8btnCancel'}ž.,ѕ €28lblVarList}Књ(ѕ€7<btnOK@ ž.$е€ #Frame1@КТ#(ѕ€624btnHelpќž.$е€7#Frame2@яw(ѕ€@2@ Label4@IЧ$е€€€€C,1‘NSamples in two columns:5€ЅTahoma@A€H€,Р ,5€ЅTahoma@A€H€,Р ,5€ЅTahoma@( €Sample 1:„ЪЈ5€ЅTahoma@( €Sample 2:„ЪЇ5€ЅTahoma@@FР€€€€€ї0‘NSamples in one column:F5€ЅTahoma@A€H€,П ,5€ЅTahoma@A€H€,Р ,5€ЅTahoma@ ( €using factor:KЇ5€ЅTahoma@8FР€€€€€“ ї0‘NSummary values:5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@€H€,і,5€ЅTahoma@$(€Number of successesР Ј5€ЅTahoma@ (€Number of trials Ј5€ЅTahoma@(€Sample 1іЇ5€ЅTahoma@(€Sample 2іЇ5€ЅTahoma@(€Help{u€ЅTahoma@HFР€€€€€сА0‘NValues only (linked by default)5€ЅTahoma@HH  ŸР€џџ,}p^ Condition for success:jRу ‘ЮуЊKИQDBTahoma,‡$х€‡`optMax@дд$х€ˆdoptMin@д$х€‰PoptEqualдJ(х €ŠToptGreater„дЪ$х€‹ToptLessдq0ѕ€Œ14txtSuccessValueв Ъ$е€œ#Frame5@—џџџ† sџ@FР€€€€€g 1‘NMaximum, or larger value5€ЅTahoma@DFР€€€€€Ѕ 0‘NMinimum, or smaller value]D5€ЅTahoma@0FР€€€€€ƒ,0‘NEqual@5oџџџџ №i156 џџџџ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџщoџџџџи€ЅTahoma@4FР€€€€ €у{0‘NGreater than5€ЅTahoma@4FР€€€€ € {0‘NLess thanŒk5€ЅTahoma@€H€,y{5€ЅTahoma@(H  ŸРџџ}щŒRу ‘ЮуЊKИQDBTahoma„ƒ(х €PCheckBox1Œk#k(ѕ€ž2LLabel7@#?$х€Ÿ<TextBox1Ж   sџ0FР€€€€€П ,0‘NPaired@5€ЅTahoma@,(€Confidence level: xxxx %]D: Ї5€ЅTahoma@@€H,€O,95N5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqCompObjџџџџџџџџџџџџpCompObjџџџџџџџџџџџџpi142 " n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџ Н@H  ™Р€џџ#}4+W Output optionsRу ‘ЮуЊKИQDBTahoma@‡,х€4txtWorksheetNameSO$х€‘8€refRangeSд,х€’4txtWorkbookNameSЪ(ѕ€“28Label5@с#(ѕ€”2<Label6@сž0ѕ€•2<lblWorkbookNameс$е€–#Frame3@Ÿд sџ€H€,S{5€ЅTahoma@€oџџџџ'Pi150 џџџџ n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџ-щoџџџџ1H€$S{5€ЅTahoma@€H€,S{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:„Ї5€ЅTahoma@(H  ™Рџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€—XoptRange…Ї(х €˜XoptNewSheet…i(х €™ToptNewBookk… sџ8FР€€€€€“ м0‘NExisting range5€ЅTahoma@8FР€€€€ €g {1‘NNew worksheetK5€ЅTahoma@4FР€€€€ €” 0‘NNew workbook5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqCompObjџџџџџџџџџџџџ6pCompObjџџџџџџџџџџџџ8pi154 џџџџџџџџ  n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџ:аўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq(H  tР}nŒŒƒ(х €tPchkPairedŒk#k0ѕ €q2LlblConfidenceK#?$х€r<txtCI@Ж   sџ0FР€€€€€П ,0‘NPaired@5€ЅTahoma@,(€Confidence level: xxxx %]D: Їo!џџџџ>иCompObjџџџџџџџџџџџџBpCompObj#џџџџDaVBFrameџџџџџџџџџџџџFM5€ЅTahoma@@€H,€O,95N5€ЅTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgTwoProp Caption = "Two-sample Proportion" ClientHeight = 5745 ClientLeft = 45 ClientTop = 330 ClientWidth = 6660 HelpContextID = 450 StartUpPosition = 1 'CenterOwner TypeInfoVer = 93 End (H  Е@џџР}м)a$Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF <(ѕ€7<btnOK@д"G,€OK~{w€ @ЅTahoma@ўџџџ   ўџџџ ўџџџўџџџўџџџўџџџўџџџ!"#$%&ўџџџ()*+,ўџџџ./0ўџџџ2345ўџџџ7ўџџџ9ўџџџ;<=ўџџџ?@AўџџџCўџџџEўџџџGHIJKўџџџMNКPQRmTўџџџVWXYZўџџџ\]^_`aўџџџcўџџџefghўџџџjklўџџџn„pўџџџrstuvwxyz{ўџџџ}~€bedded ObjectForms.Frame.1є9Вq<FР€€€€€ п0р~Standard deviationM5€ЅTahoma@,FР€€€€€z њ0р~Mean5€ЅTahoma@0FР€€€€€ о0р~Total@5€ЅTahoma@8FР€€€€€ы љ1р~No of non-blanks5€ЅTahoma@4FР€€€€ €h Т0р~No of blanks5€ЅTahoma@<FР€€€€dlgSummariseџџџџџџџџ/р8'TіYФ `0TіYФfџџџџџџџџџџџџLпo%'џџџџOˆi105 џџџџџџџџ) n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФfџџџџџџџџџџџџ|йo02џџџџqЈCompObjџџџџџџџџџџџџopi157 џџџџџџџџ5 n`єЮ›ЭЊ`Ž `0TіYФ `0TіYФfџџџџџџџџџџџџ[Нo(*џџџџUPi121 џџџџ+- n`єЮ›ЭЊ`Žр8'TіYФр8'TіYФCompObjџџџџџџџџџџџџSpЅTahoma@`#€*  5€ЅTahoma@!,ѕ €:8btnCancel'}cG!$х€VTchkBy@_Й(ѕ€[24btnHelpђG!$е€i#Frame1@‘Ё(х €}hchkCopyDataЦ!$е€€#Frame2@ћЌ,х €` chkAdditionaloj$е€# Frame4@ЋЙ,е €Ђ! fraAdditionalojА*<(х €ЕT chkVariableсЙ(ѕ€g18lstBy@Dх(х €G8lstVariableдЫ sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgSummarise Caption = "Summary statistics" ClientHeight = 5280 ClientLeft = 45 ClientTop (€Cancel@ž{u€ЅTahoma@4FР€€€€ €П ї0р~By factor(s)5€ЅTahoma@(€Help{u€ЅTahoma@Hўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇVBFrameџџџџџџџџџџџџХMdlgUnstackTwoWay"Vƒ? `0TіYФР8TіYФfџџџџџџџџџџџџЫЫo>DџџџџЮd5€ЅTahoma@( €Sheet name:вЇ5€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  šР€џџ-}г(э Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€r4txtWorksheetNameSO$х€t8€refRangeSд,х€u4txtWorkbookNameSЪ(ѕ€v28Label5@с#(ѕ€w2<Label6@сž0ѕ€x2<lblWorkbookNameс$е€y#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTaho = 330 ClientWidth = 6075 HelpContextID = 415 StartUpPosition = 1 'CenterOwner TypeInfoVer = 192 End $  Uџџ }a'Ж1Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF <0ѕ €24lblFactorListojє (€Column factor(s)” Ј 4Ѕ(€Cancel@ž{u€ЅTahoma@$(€Column(sfџџџџџџџџџџџџІ o8:џџџџ“”CompObjџџџџџџџџџџџџ‘pCompObjџџџџ<џџџџУama@(H  šРџџ}f щRу ‘ЮуЊKИQDBTahoma„ƒ$х€zXoptRange…Ї(х €{XoptNewSheet…i(х €|ToptNewBookF… {џFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@@FР€€€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEm€ы 0р~No of numeric values5€ІTahoma@4FР€€€€ €Ж м0р~% non-blanks5€ІTahoma@4FР€€€€ € ј0р~Cumulative%5€ІTahoma@DH  ДР€џџ}C’Standard statisticsRу ‘ЮуЊKИQDBTahomaXˆ$х€\chkStdev]  $х€‚LchkMean]k $х€ƒPchkTotal]V(х €„Xi55@TF n`єЮ›ЭЊ`ŽР8TіYФР8TіYФfџџџџџџџџџџџџѕнoEGџџџџъДi61џџџџHJ n`єЮ›ЭЊ`ŽР8TіYФР8TіYФ€B# Frame3@еB(х €Mh chkCopyDataЙ’.$х€8lstBy@є Ъ(х €8lstVariableКЪ$х€ 8 lstCarry/Ъўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgUnstackTwoWay Caption = "Two-Way Unstack" ClienchkNonBlank]-$х€…TchkCount]](х €›\chkNumeric}]у,ѕ €Г1TchkPercent}]f(ѕ€Д1TchkCumul]_  {џ€ы ї0р~Additional statisticsІM5€ЅTahoma@4FР€€€€ €‚ м1р~Variable(s)ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq4FР€€€€ €3 А1р~Sort columns5€ЅTahoma@@€H€,€џ,4р~5€ЅTahoma@$(€Number of Sig. Figs. 5€ЅTahoma@DH   Р€џџ}ž(<Presentation optionsRу ‘ЮуЊKИQDBTahoma„ƒ$х€žTchkSortq(х €Ÿ<txtSigFigsFЎ(ѕ€ 2DLabel10…ц {CompObjџџџџџџџџџџџџшpfџџџџџџџџџџџџЙoIKџџџџџЄCompObjџџџџџџџџџџџџ§pџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq0FР€€€€€ь 0р~Median@5€ЅTahoma@4FР€€€€ €ь м0р~QuartilesђF5€ЅTahoma@<FР€€€€€“ 0р~Skewness/KurtosisИM5€ЅTahoma@8FР€€€€€“ м0р~Sums of squares5€ЅTahoma@<FР€€€€€б ,0р~Coeff. of variation5€ЅTahoma@0FР€€€€€і ,0р~Range@5€ЅTahoma@0FР€€€€€",0р~Maximum5€ЅTahoma@0FР€€€€€! ї0р~Minimum5€ЅTahoma@4FР€€€€ €ўї0р~Percentiles5€ЅTahoma@4FР€€€€ €*F0р~Proportions5€ЅTahoma@€H€,f,5€ЅTahoma@€H€,,5€ЅTahoma@ (€Other function:< s5€ЅTahoma@€H€,Р ,5€ДTahoma@A€H€,С,5€ЅTahoma@@€œ `5€ЅTahoma@(H  ВР4}\R"Ш(х €ЃPchkMedian'}ю0(х €ЄTchkQuartilesюP(х €Ѕ\chkSkewnessяq $х€ІXchkSS@я~ $х€Ї\chkCV@я;$х€ЈPchkRangeю5(х €ЉPchkMaximum}ю>(х €ЊPchkMinimum}ю],х€ЋTchkPercentilesjяc,х€ЌT chkProportionsjя+tѕ €­14 ?€txtPercentilesj НEnter one or more numbers between 0 and 100 separated by spacesgЄх €Ў4 y€txtOtherгЖEnter a valid Excel formula, with a ? character indicating where the column data are to be inserted, e.g. COUNTIF(?,">20)(ѕ€Џ2@ Label1@ нdѕ €А14 -€txtProportionsj­ЫEnter one or more numbers separated by spaces,ѕ €Б18cboConditionэз(ѕ€В14cboPropЗ  {џ5€ЅTahoma@`#€*  5€‚ƒўџџџ…З‡ўџџџ‰Š‹ўџџџŽўџџџ’ўџџџ”•–—˜™š›œžŸ ЁЂЃЄЅўџџџЇЈЉЊЋЌ­ЎЏАБВГДЕЖўџџџИЙўџџџЛМНОПРСТўџџџФўџџџЦЧШЩЪўџџџЬЭ#Яабчгўџџџежзийклмнўџџџпрстуфхцўџџџщўџџџыьэюя№ёђѓєўџџџіїјљњћќўџџџўўџџџi11џџџџџџџџB n`єЮ›ЭЊ`Ž `0TіYФ `0TіYФfџџџџџџџџџџџџоoACџџџџдTCompObjџџџџџџџџџџџџвpi66џџџџџџџџN n`єЮ›ЭЊ`ŽР8TіYФР8TіYФfџџџџџџџџџџџџ]oMOџџџџ€i78џџџџPR n`єЮ›ЭЊ`ŽР8TіYФР8TіYФCompObjџџџџџџџџџџџџ<pi102 Ye_ n`єЮ›ЭЊ`Ž€)ATіYФ€)ATіYФfџџџџџџџџџџџџRНo^`џџџџLPCompObjџџџџџџџџџџџџpfџџџџџџџџџџџџљoQSџџџџ<CompObjџџџџџџџџџџџџp) to unstackП Ј 4Ѕ,€OK~ž{w€ @ЅTahoma@(€Help{uўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” {0р~New workbook5€ЅTahoma@€H€,{5€ЅTahoma@€H€${5€ЅTahoma@€H€,{5€ЅTahoma@(€Range:@qЇ5€ЅTahoma@( €Sheet name:qЇ5€ЅTahoma@( €Book name:}qЇ5€ЅTahoma@@H  5Р€џџ}& Output optionsjRу ‘ЮуЊKИQDBTahoma ˜‰$х€,XoptRangeдд(х €-XoptNewSheetдџ(х €.ToptNewBook}дЪ,х€/4txtWorksheetNameSO$х€18€refRangeSд,х€24txtWorkbookNameSЪ(ѕ€328Label2@(>(ѕ€42<Label3@(Й0ѕ€52<lblWorkbookName(4 sџ€ЅTahoma@ ( €Row factor(s)ojV Ї5ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq4FР€€€€ €ў{1р~Sort columns5€ЅTahoma@4FР€€€€ €WХ1р~Sort rowsђF5€ЅTahoma@<FР€€€€€Ш 0р~Count occurrencesИM5€ЅTahoma@PFР€€€€%€б 40р~Remember original factor column names,|5€ЅTahoma@LFР€CompObjLUџџџџ,aVBFrameџџџџџџџџџџџџ.NdlgColumnPlot$pXР8TіYФ€)ATіYФfџџџџџџџџџџџџ4Ї€€€#€б 40р~Remember original data column names5€ЅTahoma@DFР€€€€€ъ,0р~Ignore missing data valuesD5€ЅTahoma@PFР€€€€'€ъї0р~Ignore cases with missing factor values5€ЅTahoma@@H  T€€џџ4}Л%" Unstack optionsRу ‘ЮуЊKИQDBTahomapˆ$х€9TchkSortЏš(х €ATchkSortRowsЏ$х€G\chkCount§Є,х€KpchkFactorNames|§T,х€LlchkColumnNames|§m$е€=#fraSort?”,х€SdchkIgnoreMissingЏу4х€TpchkIgnoreFactorMissingMЏїўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq0FР€€€€€Ф1р~By name5€tHeight = 7215 ClientLeft = 45 ClientTop = 330 ClientWidth = 5715 HelpContextID = 215 StartUpPosition = 1 'CenterOwner TypeInfoVer = 160 End (H  x@џџ}*„(Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF Œ(ѕ€2DLabel1@’г$(€Value variable(s)ИMь Ї5€ЅTaho (х €TbtnAppend'}шВ (ѕ€74btnOK@Й ,ѕ €:8btnCancel'}H (ѕ€24btnHelpз $е€ #Frame1@ с(х €l chkExpand'}#uўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgDaost it to the Statistical Services Centre. We will then send you a Registration Number to enter below.5€ЅTahoma@(ѕ€ 24btnHelpЇЪ(ѕ€ 74btnOkay‰Ы,ѕ € :8btnCancelђFЪ,х€ ЈtxtExplanationjюдўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вqi110 џџџџac n`єЮ›ЭЊ`Ž€)ATіYФ€)ATіYФCompObjџџџџџџџџџџџџJpfџџџџџџџџџџџџ`щobdџџџџ[ЅTahoma@4FР€€€€ €"м0р~By factorђF5€ЅTahoma@(H  F€џџ}Р ГRу ‘ЮуЊKИQDBTahomad‚,х €>PoptSortByNameoj6P,х€?ToptSortByFactorjP€ЅTahoma@HFР€€€€€]{0р~ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџџџўџџџўџџџ     ўџџџўџџџўџџџўџџџўџџџ !"ўџџџ$%&'()*+ўџџџ-ўџџџ/0123ўџџџ56j89:;d=ўџџџ?@ABCўџџџEFGHIўџџџKўџџџMNOPQўџџџSTUVWXўџџџZўџџџ\]^_ўџџџabcўџџџefghiўџџџklmnopqўџџџsўџџџuvwxyўџџџ{|–~€8FР€€€€€ь њ1р~Put in next row5€ЅTahoma@<FР€€€€€^ њ0р~Put in next columnM5€ЅTahoma@LFР€€€€$€ЌТ0р~Ignore all duplicated values except:5€ЅTahoma@@FР€€€€€Ж0р~Add to existing valueІM5€ЄTahoma@DH  U€€џџ}ю%ŠDuplicate optionsИMRу ‘ЮуЊKИQDBTahomaь…,х €CXoptDuplNewRowojд…,х€D\optDuplNewColumn_ †,х €FloptDuplIgnoreojд\(е €N!fraExceptђFпж(х €U`optDuplAddFдiўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq0FР€€€€€м1р~First@5€ЅTahoma@0FР€€€€€<м0р~Maximum5€ЅTahoma@,FР€€€€€Сa0р~Last5€ЅTahoma@0FР€€€€€Им0р~Minimum5€ЅTahoma@(H  R€џџ }! ЌRу ‘ЮуЊKИQDBTahomaЄ„$х€OPoptFirstЙ’$х€PPOptMax@ёx$х€QLoptLastХ $х€RPoptMin@зtValues only (linked by default)5€ЅTahoma@VBFrameџџџџџџџџџџџџРSdlgAboutџџџџџџџџ{ ЪHTіYФ ЪHTіYФfџџџџџџџџџџџџЦNoz|џџџџШ0oW]џџџџ7i56џџџџџџџџ[ n`єЮ›ЭЊ`Ž€)ATіYФ€)ATіYФfџџџџџџџџџџџџDqoZ\џџџџ>h5€ЅTahoma@`#€“ и 5€ЅTahoma@(ѕ€2DLabel2@ г(ѕ€07<btnOK@Ќ"j%,ѕ €1:8CancelButton;j%(ѕ€624btnHelpЪj%$е€8#Frame2@’\$е€f#Frame1@ž$х€wT chkBy@‚5(х €xh chkCopyDataд[%$х€r4 lstXvar§n$х€78lstYVar’z(ѕ€<18lstBy@‚E sџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgColumnPlot Caption = "Category-Value Plot" ClientHeight = 5880 ClientLeft = 45 ClientTop = 330 ClientWidth = 6105 HelpContextID = 315 StartUpPosition = 1 'CenterOwner TypeInfoVer = 278 End $  џџ} &Y#Rу ‘ЮуЊKИQDBTahoma8KEРFв‹BьЮž Њ`ѓEРF МŠ$х€8€refDataѕ'(ѕ€H€$}${5€ЅTahoma@$(€Standard Data Area:“ Ї5€ЅTahoma@8(%€Current Data Area for this worksheet:,|}м5dlgRegistration џџџџџџџџr ЪHTіYФ ЪHTіYФfџџџџџџџџџџџџЅ7oqwџџџџБHi02џџџџџџџџu n`єЮ›ЭЊ`Ž ЪHTіYФ ЪHTіYФœ‚ƒD˜r‡ˆ™§џџџŒŽ„“‘’†–•—‰ЂЋš›|ЇЁ§џџџ }ЃЄЅІЈўџџџЉЊЌўџџџ­ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџma@$(€Category variableИM* Ї5€ЅTahoma@,€OK~ž{w€ @ЅTahoma@(€Cancel@{u€ЅTahoma@(€Help{u€ЅTahoma@4FР€€ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq( €Chart type}Ї5€ЅTahoma@A€H€,O {5€ЅTahoma@0FР€€€€€Р0р~Stacked5€ЅTahoma@,FР€€€€€ш0р~100%5€ЅTahoma@8FР€€€€€Ш F1р~Show data points5€ЅTahoma@@H  vР €џџa}г(Chart optionsojRу ‘ЮуЊKИQDBTahomaє…(ѕ€92<Label4@м#(х €:8cboChartTypeМъ,ѕ €s1PchkStackedFu0ѕfџџџџџџџџџџџџ­фotvџџџџЉьCompObjџџџџџџџџџџџџЇpCompObjsxџџџџОa €t1Lchk100Percentoj0ѕ €u1XchkShowPointsoj[u {џўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,]{5€ЅTahoma@€H€$]{5€ЅTahoma@€H€,]{5€ЅTahoma@(€Range:@iЇ5€ЅTahoma@( €Sheet name:вЇ5CompObjџџџџџџџџџџџџYpCompObjџџџџfџџџџraVBFrameџџџџџџџџџџџџtOdlgDataAreaџџџџџџџџi€)ATіYФ ЪHTіYФ€ЅTahoma@( €Book name:}Ї5€ЅTahoma@@H  qР€џџ#}г(< Output optionsjRу ‘ЮуЊKИQDBTahoma@‡,х€g4txtWorksheetNameSO$х€i8€refRangeSд,х€j4txtWorkbookNameSЪ(ѕ€k28Label5@с#(ѕ€l2<Label6@сž0ѕ€m2<lblWorkbookNameс$е€n#Frame3@Ÿд sџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq8FР€€€€€“ м0р~Existing rangej5€ЅTahoma@8FР€€€€ €g {1р~New worksheetoj5€ЅTahoma@4FР€€€€ €” 0р~New workbook5€ЅTahoma@(H  qРџџ}L TRу ‘ЮуЊKИQDBTahoma„ƒ$х€oXoptRange…Ї(х €pXoptNewSheet…i(х €qToptNewBookF… {џ€€ €П ,0р~By factor(s)5€ЅTahoma@HFР€€€€€сА0р~Values only (linked by default)5€ЅTahoma@`€x ‹ 5€ЅTahoma@`#€x Ѕ fџџџџџџџџџџџџzKohnџџџџ}hi09џџџџџџџџl n`єЮ›ЭЊ`Ž€)ATіYФ€)ATіYФfџџџџџџџџџџџџ=VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgRegistration Caption = "SSC-Stat Registration" ClientHeight = 4365 ClientLeft = 45 ClientTop = 330 ClientWidth = 5475 HelpContextID = 1050 StartUpPosition = 1 'CenterOwner TypeInfoVer = 11 End $  џџ}O%НRу ‘ЮуЊKИQМDB MS Sans Serifє…(ѕ€2@lblTit(€SSC-Statн# ї€@hМArial@( €Descriptionн#i ї€@ЅМTahoma@( €Copyright'}ГOu€ЅTahoma@ *џџР €Registrationн#‹і@ЅМ(€OK~ž{u€ЅTahoma@leŸд0ѕ€2DlblDescriptionjŸ`,ѕ €2<lblCopyrightС; 0ѕ€2<lblRegistrationŸ”(ѕ€ 74btokmџџџџ‡дCompObjџџџџџџџџџџџџ…pCompObjjoџџџџaVBFrameџџџџџџџџџџџџŸRnOkayоБўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} dlgAbout Caption = "About SSC-Stat" ClientHeight = 3300 ClientLeft = 45 ClientTop = 330 ClientWidth = 5415 StartUpPosition = 1 'CenterOwner TypeInfoVer = 22 End CompObjџџџџ}џџџџбaVBFrameџџџџџџџџџџџџг(PROJECTwm€­џџџџиPROJECTyџџџџьЕ €ЅTahoma@€H€,F$+5€ЅTahoma@4(#€Put Current Area into Standard Area05u€ЅTahoma@(€OK~ž{u€ЅTahoma@(€Cancel@ž{u€ЅTahoma@(€Help{u€ЅTahoma@Lўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq\FР€€€€4€5"1р~Display columns in Current Area before Standard Area5€ЅTahoma@PFР€€€€%€5"0р~Display columns in Standard Area only,|5€ЅTahoma@\FР€€€€4€5"0р~Display columns in Standard Area before Current Area5€ЅTahoma@LFР€€€€$€5"0р~Display columns in Current Area only5€ЅTahoma@PH  €€џџ }F$л Order of searching data areasqRу ‘ЮуЊKИQDBTahomaР„,х€ |optCurrentFirstю№(х € poptNoCurrentю™,х€ |optStandardFirstю(,х € loptNoStandardojю`FР€€€€"€‘+1р~Expand Standard Area automaticallyJ5€ЅTahoma@€2DLabel1@Сќ(ѕ€2XLabel2@ГJ,х€4txtCurrentAreajЭA‚ƒ„”†ўџџџˆ‰Š‹ŒŽўџџџ‘’“ўџџџ•ўџџџ—˜™š›œўџџџžўџџџ ЁЂЃЄўџџџІЛЈўџџџЊЋЌўџџџЎЏАўџџџВГДЕЖЗИЙКўџџџМНўџџџПўџџџСТУФХўџџџЧЭЩЪЫЬўџџџЮЯаўџџџвўџџџдежзўџџџйклмнопрстуфхцчшщъыўџџџэюя№ёђѓєѕіїјљњћќ§ўџbedded ObjectForms.Frame.1є9Вq$(€Registration Numberиї5€ЅTahoma@€H€,S",5€ЅTahoma@ (€Registered Name’м5€ЅTahoma@€H€,S",5€ЅTahoma@(H  €}`$“ А„(ѕ€2DLabel1@Кj$х€4txtRegNoК,(ѕ€2@Label2@КP(х ј"  П*)( §!#1§џџџ0$ %&чY/,b-.V26345798:<;=>?A@BICEfFGHJLKMNOQPRSTXU]odZ+'\a_p`ct^Wgi{hjqklmn[€es~xuvwy…z‹ ”Root Entryџџџџџџџџ РFР,ьS'YФр•TіYФ@ Workbookƒџџџџџџџџ  _VBA_PROJECT_CUR"r@—nSіYФр•TіYФVBAџџџџџџџџ@—nSіYФ`фSіYФtaArea Caption = "Define or Change Data Area" ClientHeight = 5130 ClientLeft = 45 ClientTop = 330 ClientWidth = 5520 HelpContextID = 10 StartUpPosition = 1 'CenterOwner TypeInfoVer = 20 End $  џџ }Й%Rу ‘ЮуЊKИQDBTahomaф…$е€#Frame1@ќVўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEm € 4txtRegTextFК(€Help{u€ЅTahoma@(€OK~ž{u€ЅTahoma@(€Cancel@{u€ЅTahoma@ˆ@„H€Ќ€e€$ы Registration is free for individual, non-commercial use. To register, visit or send your details by e-mail to Alternatively, print the form on the help page, fill in your details and pSheet1Sheet1Sheet2Sheet2Sheet3Sheet3ThisWorkbookThisWorkbookmodMainmodMaindlgUnStackdlgUnStackstats_functionsstats_functionsdlgStackdlgStackmodUtilitymodUtilitymodUnStackmodUnStackmodStackmodStackdlgXYPlotdlgXYPlotdlgDescriptiveStatsdlgDescriptiveStatsdlgTwoTtestdlgTwoTtestdlgBoxPlotdlgBoxPlotmodTtestmodTtestdlgOneTtestdlgOneTtestdlgQQPlotdlgQQPlotdlgDenestdlgDenestmodSavemodSavedlgLookupdlgLookupdlgOnePropdlgOnePropmodProportionmodProportiondlgTwoPropdlgTwoPropdlgSummarisedlgSummarisemodMomentsmodMomentsdlgUnstackTwoWaydlgUnstackTwoWaydlgColumnPlotdlgColumnPlotmodChartmodChartdlgDataAreadlgDataAreamodColumnmodColumnmodSheetmodSheetmodCommonmodCommonmodTranslatemodTranslatemodRegistrationmodRegistrationmodRegApimodRegApidlgRegistrationdlgRegistrationdlgAboutdlgAboutID="{F1BBDC95-802A-11D5-B656-0004768BFDFA}" Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Document=Sheet3/&H00000000 Document=ThisWorkbook/&H00000000 Module=modMain Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=dlgUnStack Module=stats_functions BaseClass=dlgStack Module=modUtility Module=modUnStack Module=modStack BaseClass=dlgXYPlot BaseClass=dlgDescriptiveStats BaseClass=dlgTwoTtest BaseClass=dlgBoxPlot Module=modTtest BaseClass=dlgOneTtest BaseClass=dlgQQPlot BaseClass=dlgDenest Module=modSave BaseClass=dlgLookup BaseClass=dlgOneProp Module=modProportion BaseClass=dlgTwoProp BaseClass=dlgSummarise Module=modMoments BaseClass=dlgUnstackTwoWay BaseClass=dlgColumnPlot Module=modChart BaseClass=dlgDataArea Module=modColumn Module=modSheet Module=modCommon Module=modTranslate Module=modRegistration Module=modRegApi BaseClass=dlgRegistration BaseClass=dlgAbout HelpFile="C:\My Documents\Excel macros\Software\SSC-Stat.hlp" Name="SSCStat" HelpContextID="0" Description="Statistical functions and dialogs - Statistical Services Centre" VersionCompatible32="393222000" CMG="1B19EA49294D294D294D294D" DPB="5E5CAF0EB112F218F21891146CE9BB57" GC="A1A3509551955195" [Host Extender Info] &H00000001={3832D640-C     ўџџџўџџџўџџџ !"ўџџџ$ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] Sheet1=0, 0, 0, 0, C Sheet2=0, 0, 0, 0, C Sheet3=0, 0, 0, 0, C ThisWorkbook=0, 0, 0, 0, C modMain=0, 0, 0, 0, C dlgUnStack=0, 0, 0, 0, C, 44, 44, 673, 372, C stats_functions=0, 0, 0, 0, C dlgStack=0, 0, 0, 0, C, 88, 88, 717, 416, C modUtility=0, 0, 0, 0, C modUnStack=0, 0, 0, 0, C modStack=0, 0, 0, 0, C dlgXYPlot=0, 0, 0, 0, C, 66, 66, 695, 394, C dlgDescriptiveStats=88, 88, 673, 524, C, 110, 110, 739, 438, C dlgTwoTtest=0, 0, 0, 0, C, 132, 132, 761, 460, C dlgBoxPlot=0, 0, 0, 0, C, 154, 154, 783, 482, C modTtest=0, 0, 0, 0, C dlgOneTtest=0, 0, 0, 0, C, 0, 0, 629, 328, C dlgQQPlot=0, 0, 0, 0, C, 22, 22, 651, 350, C dlgDenest=0, 0, 0, 0, C, 44, 44, 673, 372, C modSave=0, 0, 0, 0, C dlgLookup=0, 0, 0, 0, C, 66, 66, 695, 394, C dlgOneProp=0, 0, 0, 0, C, 88, 88, 717, 416, C modProportion=66, 66, 651, 502, Z dlgTwoProp=0, 0, 0, 0, C, 110, 110, 739, 438, C dlgSummarise=110, 110, 695, 546, C, 132, 132, 761, 460, C modMoments=0, 0, 0, 0, C dlgUnstackTwoWay=0, 0, 0, 0, C, 154, 154, 783, 482, C dlgColumnPlot=0, 0, 0, 0, C, 0, 0, 629, 328, C modChart=0, 0, 0, 0, C dlgDataArea=0, 0, 0, 0, C, 22, 22, 651, 350, C modColumn=0, 0, 0, 0, C modSheet=0, 0, 0, 0, C modCommon=0, 0, 0, 0, C modTranslate=0, 0, 0, 0, C modRegistration=0, 0, 0, 0, C modRegApi=0, 0, 0, 0, C dlgRegistration=0, 0, 0, 0, C, 44, 44, 673, 372, C dlgAbout=0, 0, 0, 0, C, 22, 22, 814, 511, C EРFPROJECTlkџџџџџџџџџџџџSummaryInformation(џџџџ‚џџџџXDocumentSummaryInformation8џџџџџџџџџџџџ CompObjџџџџџџџџџџџџ#fўџ р…ŸђљOhЋ‘+'Гй0( PXpˆЬ№   фSSC-Stat V2.12 Colin Grayer29Statistical Services Centre Excel macros for statisticsal Statistical Services CentreMicrosoft Excel@є†ХП@; TіYФўџ еЭеœ.“—+,љЎ0№ PX| „Œ”œ Є ЭфThe University of Reading   Sheet1Sheet2Sheet3  Worksheetsўџ џџџџ РFMicrosoft Excel WorksheetBiff8Excel.Sheet.8є9Вq