аЯрЁБс>ўџ %ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџcmdNxtvSд(ѕ€2<Label1vді(ѕ€28labNo1vqі(ѕ€24Label2vg і(ѕ€28labTotvЖі(ѕ€2<Label3vЌі(х € 4txtTheStreetдq$х€ T chkSelMe+*q$х€ 8 comTempsд5%(ѕ€ 2D Label4psŽ#5%(ѕ€ 2` Label5psдX)$х€4 txtRowpsЂ„((ѕ€2@Label6psФІ,$х€4txtColps5%„((ѕ€2DLabel7ps+*Р,(х €@cmdPostIteetЇв+(х €8cmdCanceleet!д(х €4txtResulteetд1(ѕ€2@Label8psдЖ(ѕ€2@Label9psЖІ,(ѕ€2<Label10s˜Џ)(х €4txtIncrRowetЂв+(х €4txtIncrColet5%в+$е€#Frame10sOk(ѕ€  ЭЩР‡сАСт\p Stephen Allen BАaР=гК ThisWorkbookœЏМ=hZL,й<X@"Зк1ШџтArial1ШџтArial1Шџт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_-;_-* "-"??_-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР р ѕџ јР рР “€џ“€џ“€џ“€џ“€џ“€џ`…Ъ acsii-code…™ASheet2…­BSheet3Œ,ЎСС"Оќ\UTspace!"#$%&'()*+,-./:;<=>?@ABCDEFGHIJKLMNOPQRSTUVwXYZ[\]^_`abcdefghijklmnopqrstuvxyz{|}~џZћ 0?P_pŸАПап№џ0?Pcc.  ЭЩР ,рžzТ&П$'.Ѕ7 A  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?Uрџџџџџџџџџ џ џ џ џ џџџџџџџџџџџџџџџџџџџ~ @@§ ~ €@@§ ~ A@§ ~ €A@§ ~ B@§ ~ €B@§ ~ C@§ ~ €C@§ ~ D@§ ~ €D@§  ~ E@§  ~ €E@§  ~ F@§  ~ €F@§  ~ G@§ ~ €G@§ НH@Н€H@№?НI@@Н€I@@НJ@@Н€J@@НK@@Н€K@@НL@ @Н€L@"@~ M@§ ~ €M@§ ~ N@§ ~ €N@§ ~ O@§ ~ €O@§ зDФl џ!џ"џ#џ$џ%џ&џ'џ(џ)џ*џ+џ,џ-џ.џ/џ0џ1џ2џ3џ4џ5џ6џ7џ8џ9џ:џ;џ<џ=џ>џ?џ~ P@§ ~ !@P@§ !~ "€P@§ "~ #РP@§ #~ $Q@§ $~ %@Q@§ %~ &€Q@§ &~ 'РQ@§ '~ (R@§ (~ )@R@§ )~ *€R@§ * ~ +РR@§ +!~ ,S@§ ,"~ -@S@§ -#~ .€S@§ .$~ /РS@§ /%~ 0T@§ 0&~ 1@T@§ 1'~ 2€T@§ 2(~ 3РT@§ 3)~ 4U@§ 4*~ 5@U@§ 5+~ 6€U@§ 6,~ 7РU@§ 7-~ 8V@§ 8.~ 9@V@§ 9/~ :€V@§ :0~ ;РV@§ ;1~ <W@§ <2~ =@W@§ =3~ >€W@§ >4~ ?РW@§ ?5зDl@џAџBџCџDџEџFџGџHџIџJџKџLџMџNџOџPџQџRџSџTџUџVџWџXџYџZџ[џ\џ]џ^џ_џ~ @X@§ @6~ A@X@§ A7~ B€X@§ B8~ CРX@§ C9~ DY@§ D:~ E@Y@§ E;~ F€Y@§ F<~ GРY@§ G=~ HZ@§ H>~ I@Z@§ I?~ J€Z@§ J@~ KРZ@§ KA~ L[@§ LB~ M@[@§ MC~ N€[@§ ND~ OР[@§ OE~ P\@§ PF~ Q@\@§ QG~ R€\@§ RH~ SР\@§ SI~ T]@§ TJ~ U@]@§ UK~ V€]@§ VL~ WР]@§ W-~ X^@§ XM~ Y@^@§ YN~ Z€^@§ ZO~ [Р^@§ [P~ \_@§ \Q~ ]@_@§ ]R~ ^€_@§ ^S~ _Р_@_ш<Ž џџxp§D_РAoзDl`џaџbџcџdџeџfџgџhџiџjџkџlџmџnџoџpџqџrџsџtџuџvџwџxџyџzџ{џ|џ}џ~џџ~ ``@`ь<Ž џџ_џ`М`Ÿ@LџРAoЌ ~ a `@a№<Ž џџ`џ`~ b@`@bє<Ž џџaџ` ~ c``@cј<Ž џџbџ`’~ d€`@dќ<Ž џџcџ` ~ e `@e=Ž џџdџ`& ~ fР`@f=Ž џџeџ` ~ gр`@g=Ž џџfџ`! ~ ha@h =Ž џџgџ`Ц~ i a@i=Ž џџhџ`0 ~ j@a@j=Ž џџiџ``~ k`a@k=Ž џџjџ`9 ~ l€a@l=Ž џџkџ`R~ m a@m =Ž џџlџ`~ nРa@n$=Ž џџmџ`}~ oрa@o(=Ž џџnџ`~ pb@p,=Ž џџoџ`~ q b@q0=Ž џџpџ` ~ r@b@r4=Ž џџqџ` ~ s`b@s8=Ž џџrџ` ~ t€b@t<=Ž џџsџ` ~ u b@u@=Ž џџtџ`" ~ vРb@vD=Ž џџuџ` ~ wрb@wH=Ž џџvџ` ~ xc@xL=Ž џџwџ`м~ y c@yP=Ž џџxџ`"!~ z@c@zT=Ž џџyџ`a~ {`c@{X=Ž џџzџ`: ~ |€c@|\=Ž џџ{џ`S~ } c@}`=Ž џџ|џ`~ ~Рc@~d=Ž џџ}џ`~~ рc@h=Ž џџ~џ`xзDQ lL566666666666565566666666666656€џџ‚џƒџ„џ…џ†џ‡џˆџ‰џŠџ‹џŒџџŽџџџ‘џ’џ“џ”џ•џ–џ—џ˜џ™џšџ›џœџџžџŸџ~ €d@€l=Ž џџџ` ~  d@p=Ž џџ€џ`Ё~ ‚@d@‚t=Ž џџџ`Ђ~ ƒ`d@ƒx=Ž џџ‚џ`Ѓ~ „€d@„|=Ž џџƒџ`Є~ … d@…€=Ž џџ„џ`Ѕ~ †Рd@†„=Ž џџ…џ`І~ ‡рd@‡ˆ=Ž џџ†џ`Ї~ ˆe@ˆŒ=Ž џџ‡џ`Ј~ ‰ e@‰=Ž џџˆџ`Љ~ Š@e@Š”=Ž џџ‰џ`Њ~ ‹`e@‹˜=Ž џџŠџ`Ћ~ Œ€e@Œœ=Ž џџ‹џ`Ќ~  e@ =Ž џџŒџ`­~ ŽРe@ŽЄ=Ž џџџ`Ў~ рe@Ј=Ž џџŽџ`Џ~ f@Ќ=Ž џџџ`А~ ‘ f@‘А=Ž џџџ`Б~ ’@f@’Д=Ž џџ‘џ`В~ “`f@“И=Ž џџ’џ`Г~ ”€f@”М=Ž џџ“џ`Д~ • f@•Р=Ž џџ”џ`Е~ –Рf@–Ф=Ž џџ•џ`Ж~ —рf@—Ш=Ž џџ–џ`З~ ˜g@˜Ь=Ž џџ—џ`И~ ™ g@™а=Ž џџ˜џ`Й~ š@g@šд=Ž џџ™џ`К~ ›`g@›и=Ž џџšџ`Л~ œ€g@œм=Ž џџ›џ`М~  g@р=Ž џџœџ`Н~ žРg@žф=Ž џџџ`О~ Ÿрg@Ÿш=Ž џџžџ`ПзD l5555555555555555555555555555555 џЁџЂџЃџЄџЅџІџЇџЈџЉџЊџЋџЌџ­џЎџЏџАџБџВџГџДџЕџЖџЗџИџЙџКџЛџМџНџОџПџ~  h@ ь=Ž џџŸџ М п@LџРAoР~ Ё h@Ё№=Ž џџ џ С~ Ђ@h@Ђє=Ž џџЁџ Т~ Ѓ`h@Ѓј=Ž џџЂџ У~ Є€h@Єќ=Ž џџЃџ Ф~ Ѕ h@Ѕ>Ž џџЄџ Х~ ІРh@І>Ž џџЅџ Ц~ Їрh@Ї>Ž џџІџ Ч~ Јi@Ј >Ž џџЇџ Ш~ Љ i@Љ>Ž џџЈџ Щ~ Њ@i@Њ>Ž џџЉџ Ъ~ Ћ`i@Ћ>Ž џџЊџ Ы~ Ќ€i@Ќ>Ž џџЋџ Ь~ ­ i@­ >Ž џџЌџ Э~ ЎРi@Ў$>Ž џџ­џ Ю~ Џрi@Џ(>Ž џџЎџ Я~ Аj@А,>Ž џџЏџ а~ Б j@Б0>Ž џџАџ б~ В@j@В4>Ž џџБџ в~ Г`j@Г8>Ž џџВџ г~ Д€j@Д<>Ž џџГџ д~ Е j@Е@>Ž џџДџ е~ ЖРj@ЖD>Ž џџЕџ ж~ Зрj@ЗH>Ž џџЖџ з~ Иk@ИL>Ž џџЗџ и~ Й k@ЙP>Ž џџИџ й~ К@k@КT>Ž џџЙџ к~ Л`k@ЛX>Ž џџКџ л~ М€k@М\>Ž џџЛџ м~ Н k@Н`>Ž џџМџ н~ ОРk@Оd>Ž џџНџ о~ Прk@Пh>Ž џџОџ пзD6 lK555555555555555555555555555555РџСџТџУџФџХџЦџЧџШџЩџЪџЫџЬџЭџЮџЯџаџбџвџгџдџеџжџзџиџйџкџлџмџнџоџпџ~ Рl@Рl>Ž џџПџ р~ С l@Сp>Ž џџРџ с~ Т@l@Тt>Ž џџСџ т~ У`l@Уx>Ž џџТџ у~ Ф€l@Ф|>Ž џџУџ ф~ Х l@Х€>Ž џџФџ х~ ЦРl@Ц„>Ž џџХџ ц~ Чрl@Чˆ>Ž џџЦџ ч~ Шm@ШŒ>Ž џџЧџ ш~ Щ m@Щ>Ž џџШџ щ~ Ъ@m@Ъ”>Ž џџЩџ ъ~ Ы`m@Ы˜>Ž џџЪџ ы~ Ь€m@Ьœ>Ž џџЫџ ь~ Э m@Э >Ž џџЬџ э~ ЮРm@ЮЄ>Ž џџЭџ ю~ Ярm@ЯЈ>Ž џџЮџ я~ аn@аЌ>Ž џџЯџ №~ б n@бА>Ž џџаџ ё~ в@n@вД>Ž џџбџ ђ~ г`n@гИ>Ž џџвџ ѓ~ д€n@дМ>Ž џџгџ є~ е n@еР>Ž џџдџ ѕ~ жРn@жФ>Ž џџеџ і~ зрn@зШ>Ž џџжџ ї~ иo@иЬ>Ž џџзџ ј~ й o@йа>Ž џџиџ љ~ к@o@кд>Ž џџйџ њ~ л`o@ли>Ž џџкџ ћ~ м€o@мм>Ž џџлџ ќ~ н o@нр>Ž џџмџ §~ оРo@оф>Ž џџнџ ў~ прo@пш>Ž џџоў џзD l5555555555555555555555555555555>Ж@пя7К Sheet1  ЭЩР QB  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?oU>Ж@я7К Sheet2  ЭЩР eC  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?oU>Ж@я7К Sheet3 ThisWorkbookџџџџk__SRP_2џџџџџџџџџџџџ"ь__SRP_3 џџџџ*•Sheet1џџџџџџџџ-В  !ўџџџ#$%&'()ўџџџ+,ўџџџ./0123456789:;<=>?ўџџџABCўџџџEўџџџGHIJKLMNOPQRSTUVWXўџџџZ[\ўџџџ^ўџџџ`abcdefghijklmnopqўџџџstuўџџџwўџџџyz{|}~€œф8ёџ+мІоІџџ#ˆЖџџџџџџџџ<џџ›8@p%qA‡ЋcM—ъ|РFF0№АпеG†шИMKыџџџџџџџџџџџџxF0№АпеG†шИMKы›8@p%qA‡ЋcM—ъ|џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSLџџџџSџџџџS”џџџџ6"џџџџš џџџџ<џџ<џџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}и ``џџџџџџџџџџџџ|џJ@џџџџT”iƒџџџџ џџ џџџџџџ€  џџџџ`џџџџџџџџP|џkџџџџџџџџX”€ўџџџџџџџШџџ џџџџџџџџ%џџџџџџџџ`ƒўџџџџџџџџџџџџџџџџџџџџџ %‚ џџџџўџџџ8џџўџџџџџџџџџџџ %џџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџ"џџџџАџџџџџџИ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџИџџџџHџџџџџџџџ˜џџџџџџџџ џџџџџџџџ`џџџџџџџџ џџџџџџџџџџџџр@\Tџџџџџџџџџџџџџџџџџџџџџџ@@nЄH$*\Rffff*0747637efb$*\Rffff*3X4880c48eпџџџџ4ўЪ €€ џџџџ"  € $@€ џџџџ"HPXџџџџhЭџџx–AрApplication.ThisWorkbook.Saveoџџ8–`A"oџџ џџџџџџџџ6БAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’BustomizD2Option /licit` P"& Sub ›_Be@foreClB(Cancel As Boolean) Call Rese!'ATpp€&a,. О.ˆSavlEnd.A–5Open(…)CmdBarCon trl rU€€€ h С81 щ8џџџџс #4 aЉ џџџџџџџџџџџџ `ƒ` IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЮW0 ќЦ  <   $ 44PrU€€€ џџџџџџџџ@(`Tџџџџџџџџ#$A`X џџџџџџџџn<фjxьмІиІџџ#ˆЖџџџџџџџџ<џџЎt HЦGБbЩ j 2ж РFtћФѕбF*KŒ<т'ГtџџџџџџџџџџџџxtћФѕбF*KŒ<т'ГtЎt HЦGБbЩ j 2жџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ $џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@HHџџџџџџџџџџџџџџџџџџџџџџ0@nЄH$*\Rffff*0>47496669пџџџџ4ўЪ€€ џџџџџџџџЭџџxџџџџpџџџџМАAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Option /licit __SRP_7џџџџ@ф__SRP_6џџџџџџџџџџџџDBSheet2џџџџFВ__SRP_aџџџџџџџџџџџџYфrU€€€   .1.Y.џџџџ4.щЉ.џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹`rU€€€ џџџџџџџџ@n<фjxьмІкІџџ#ˆЖџџџџџџџџ<џџЋCцЦы D„ <'<†щ˜ РFZHЕЄѕг@НѓсЄщLоŒџџџџџџџџџџџџxZHЕЄѕг@НѓсЄщLоŒЋCцЦы D„ <'<†щ˜џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ &џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@HHџџџџџџџџџџџџџџџџџџџџџџ0@nЄH$*\Rffff*0?47496669пџџџџ4ўЪ€€ џџџџџџџџЭџџxџџџџpџџџџМАAttribute VB_Name = "She@et2" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Option /licit rU€€€ PЩ.1.ё.џџџџ4.щЉ.џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹`rU€€€ џџџџџџџџ@n<фjxьмІдІџџ#ˆЖџџ__SRP_bџџџџ]BSheet3џџџџџџџџџџџџ_В__SRP_cџџџџџџџџџџџџrф__SRP_dџџџџvBџџџџџџ<џџл§0RIСXBМxMl.Мџж РFУVC%-ёFЎррђd= џџџџџџџџџџџџxУVC%-ёFЎррђd= л§0RIСXBМxMl.МџжџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџHƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ (џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@HHџџџџџџџџџџџџџџџџџџџџџџ0@nЄH$*\Rffff*0@47496669пџџџџ4ўЪ€€ џџџџџџџџЭџџxџџџџpџџџџМАAttribute VB_Name = "She@et3" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Option /licit rU€€€ €/1.A/џџџџ4.щЉ.џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹`rU€€€ џџџџџџџџ@nModule1 !џџџџ=r@__SRP_5 џџџџx __SRP_4џџџџџџџџџџџџЁѓfmConCatџџџџџџџџџџџџeNB‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ўџџџЂЃЄЅІЇЈўџџџЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнўџџџпрўџџџтуфхцчшщъыьэюя№ёђѓєѕіїјљњћќ§ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџР@nЄH*\R1*#2ad$*\Rffff*3X4880c48e*\R4*#4e*\R4*#50*\R4*#52$*\Rffff*0L481c1e85*\R4*#4f*\R4*#30*\R4*#4d*\R4*#8c*\R1*#e8*\R1*#2acпўЪћ€€ џџџџ€ џџџџ"€€€ €(€0€8€ €р €@€H€ џџџџ"*P€ џџџџx А Ра и р:№ € џџџџ0(8PX`h€ ˜ ЈИ Р Ши№/ј 0A   Р € џџџџ€ џџџџ€ џџџџ:8€ џџџџ$ X €:˜€ џџџџ$ И р:ј€ џџџџ.  HAh €:Ј. Ш Ј:ˆ0   ј:ш € џџџџ:   Ш :p € џџџџ А   :и € џџџџ   ј :ш  ш ( p  € џџџџР€ џџџџ" Ш€ џџџџ а€ џџџџр€ џџџџ" ш€ џџџџ"0№B  € џџџџ€ џџџџ€(€0€@€ џџџџ€ џџџџHP€ X€ x€ џџџџ˜€ џџџџ А Р€ џџџџШ€ џџџџи€ џџџџрј(0 8 H€ џџџџP€ џџџџ" X€ џџџџ€`€h€p€x€€€№4дџџџџP 6 мІжІџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџŒџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€(Lџџ.(Lџџ2(Lџџ<0”џџ^<џџf<џџr6 џџџџ<Аџџ<џџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџџџџџZџџџџџџџџџ`„@џџџџXџџџџџџџџџ Rp`џџџџџџџџџџџџ|џJџџџџџџџџџџX„ А`џџџџџџџџџџџџdџJџџџџџџџџџџ^„+Xр`џџџџџџџџџџџџTџ №џџџџ bŒiƒZџџџџ џџџџ€)ƒ]џџџџџџ0џџџџ€ % „`џџџџtџџџh€P`„bџџџџrџџџџџ`„@џџџџpџџџџџ „eџџџџlџџџИ%Р j`џџџџџџџџџџџџ ўJџџџџџџџџџџ&&‚„ „mџџџџxџџџ8 % „oџџџџtџџџX% „pџџџџpџџџx%`„tџџџџ`џџџ џџ`„vџџџџ^џџџџџ`„xџџџџ\џџџџџ`„zџџџџZџџџџџ`„|џџџџTџџџџџ`„~@Pџџџџџx ˆ`џџџџџџџџџџџџ$џJџџџџџџџџџџ##Ј„ „pџџџџxџџџh% „’џџџџtџџџˆ% „mџџџџxџџџЈџџ %%ƒ*џџџџџџрџџџџџџџџџџџџџџ% „Œ@\џџџА% „€џџџџ`џџџ џџџџ%џџџџџџџџџџџџџџџџАp08р „oџџџџtџџџ „oџџџџtџџџШ ш`џџџџџџџџџџџџ|џJџџџџџџџџџџЫ„% „mџџџџxџџџшр %р% Є`џџџџџџџџџџџџџJџџџџџџџџџџд„џџџџBLNџџpр@ўџ8Tџџџ џџ Pџџ њџџџџ `џџџџџџџџџџџџ|џJџџџџџџџџџџ ї„џџџџ€0рџџџџˆџџџџџџџџАџџџџџџџџpшhџџџџ М€ `џџџџџџџџџџџџєўJџџџџџџџџџџ ъ„џџџџшџџџџ€ рџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџ€XX џџџџјџџџџ˜џџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@p@ўџАDџџџ џџ   hџџџџ „pџџџџpџџџј@ўџџџџџ@џџџ џџ €@ўџh<џџџ џџ @ўџˆ 8џџO џџ џџџџ@ўџџџџџ4џџџџџ џџџџ@ўџџџџџ0џџџџџ џџџџ@ўџШ џџџ џџ џџџџ@ўџ( џџџ џџ И  `џџџџџџџџ |џkџџџџџџџџџџа„@ўџ@ џџџ џџ @ўџџџџџ№ўџџ џџ џџџџ@ўџp рўџџ џџ џџџџ@ўџш аўџџ џџ џџџџ@ўџА Ьўџџ џџ џџџџШ ˆ џџџџџџ@ўџџџџџШўџO џџ џџџџи А џџ џџџџџџА "ўџ@ўџџџџџИўџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  џџџџџџџџ’шџџџџh џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX џџџџџџџџXTџџџ џџ џџџџ@xџџџ џџ џџџџ@ўџhџџџ џџ џџџџџџџџdџџџ џџ џџџџˆ˜џџџџџџџџџџџџџџџџџџџџџџџџX №8pџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX џџџџp џџџџ zџџџџџ џџ€ ўџР а (hџџџ џџ @ўџdџџџ џџ ш  џџ џџ `џџO џџ џџџџј  џO џџ 0 \џџџ џџ H џџ џџX XџџO џџ џџџџp џџџџџџџџџџTџџџџџ џџџџџџџџџџџџџџ€˜`џџџџџџџџ јџџџџџџџџ˜АШрџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @h8„†Œџџџџџџџџh@џџџ џџ џџџџ€0џџџ џџ џџџџ@ўџ џџџ џџ џџџџАџџџ џџ Ш@ўџџџџ џџ @р№ўџџ џџ @ўџрўџџ џџ џџџџ@аўџџ џџ џџџџ(Ьўџџ џџ џџ@ўџШўџџ џџ џџ@ўџЦўџџџџ џџPўџ€абeџџџџ˜˜ Фўџџџ Шџџџџ8№@Тўџџџџ @ўџРўџџџ иџџџџџџ џџџџџџџџџџ(Аўџџ џџ џџџџ@ўџ ўџџ џџ џџџџџџџџ"џџџџџџp˜PџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШ8№ ЄџџџџHџџџџрџџџџ pџџџ џџ Ш3/@ўџ`џџџ џџ …@ўџ\џџџ џџ ў` Hš*pXџџO џџ ‡ˆ a1˜Tџџџр`€7/рџџџџ@Dџџџ џџ @ўџ4џџџ џџ Ш3/џџџџ$џџџ џџ ‹џџџџa1џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‘/џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџ!џџџџ˜ џџџџџџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшD‰a1џџџџаlџџџ џџ @ўџhџџџ џџ @3/@ўџXџџџ џџ ЁРTџџџ џџ /@ўџDџџџ џџ @ўџ4џџџ џџ €7/@ўџ$џџџ џџ •џџџџ(џџџ џџ ;@ўџџџџ џџ џџџџ˜џџџџџџџџџџџџаpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџHЉ/ш(pџџџ џџ Њ@ўџlџџџ џџ IHš*hџџO џџ Ќаa1џџџџИdџџџџџ €7/@ўџTџџџ џџ Ў@ўџDџџџ џџ Rˆ4џџџ џџ @ўџ$џџџ џџ €7/Иџџџ џџ Б@ўџџџџ џџ Xџџџџєўџџ џџ џџџџ Ѓџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџџџџџШya1џџџџ@ џџџџџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџИ˜€ € џџџџ€ џџџџd.Ј€ џџџџ  (€ џџџџ 0€ џџџџ@ P€ џџџџ `=p€ џџџџˆЈА/а 9ш€ џџџџ 8  @€ џџџџP€ џџџџ" X€`€h€ џџџџ€ џџџџ "p'€€ џџџџ€ &€ И€ а€ џџџџ€ џџџџ!р ј    08€ џџџџ@€ џџџџ€ џџџџ H€ џџџџ$P€ џџџџ "`€ џџџџp€ џџџџ€ џџџџ" P  ` € џџџџX € џџџџ"  0 ( € џџџџ" @ €P €X €  € џџџџ€ џџџџ$9Ј .€ € џџџџ€ џџџџ=Ј  P € џџџџ ` .p 4ˆ € џџџџ€ 0 € џџџџH € џџџџ€ џџџџ" ` € џџџџ€p €x  а € џџџџ € џџџџ1  р € џџџџh € џџџџ" P  ` € џџџџX џџџџ@ Эџџx–]ђ@]ђ`]ђ€]ђ ]ђР]ђр]ђ]ђэЖWorksheet Menu Bar$B.,џ 0ў ,!D“џџ˜ 0!FЖACBA Functionsœ >Ќ '> 0!H'@иkџџ(џЧ >Ќœјэ Lбl ,!D%J.0efЖACBA Functions 0(FdџџШэ @ ,%D.0kџџЈЌ'@Ќ'>џ 8ў 0!D“ 8!FЖOddmentsœ >Ќ '> 8!H'@kџџ@џЧ8 >ЌœVэ @ 0%D.:dџџэ Lбl 0!D%J.:ЖOddments :(FkџџШэ Nбl €!D%J.4ЖSelect and Post a String 4(FЖ ShowConCat 4(Pэ Nбl €!D%J.4ЖConvert to Single Column 4(FЖ ConvTo1Col 4(Pэ Nбl €!D%J.4Ж!Default Format (Pre-select range) 4(FЖResetDefaultFormat 4(Pэ Lбl €!D%J.Œэ Nбl Œ!D%J.6(FЖ FindDblSpace 6(Poџџ8–0 TB@Voџџ–pЖWorksheet Menu Bar$BB@oџџр–А]ђ8]ђpђˆ]ђ Ќ'XЌ'bрMsgBox ActiveWorkbook.NameрSet MyWB = ActiveWorkbookџ dў \!h“ bЌ 'bџЧ8Ю bс`иЌ'@џ dў \!h“ d! @+` Z @$`œЌ'XkџџШ @Ќ '@џЧАiџџЈ–р]ђ ]ђ@]ђ`]ђ€]ђ˜ђАђШ]ђр]ђјЖQAre you on the worksheet that you want to transform into a single column of data. ‚$€'| | „œ|џџиkџџаэ †.nэ n!ˆ.p p!Š'tэ Œ.lэ l!h!J.nџ vўЌ tЌ‘’Ж'~џ xўЌ tЌ‘’ v x$tЖœ ~ v x$tЖ '~kџџ№џ xўШ ~ vЌ n%Ž(Šџ vўШoџџЈ–]ђP]ђpЗ ”(–э ˜!š.pрIf MyRng.MergeCells = True Thenр MyRng.UnMergeрEnd Ifџ ’ў p!Ž“ ’ѕЗ9œ  9ž Є9ЂЗ9І5ЈЗœC@ЊkџџРqџџИџЧА p!ЌB@ЎЗ ”(–oџџˆџџџџ€ЖDeleting Spaces Œ(F]ђэ Nбl Œ!D%J.6Ж!Multiple Spaces (Whole worksheet) 6(FЖDeleteAllSpaces 6(PorksЖ#All Spaces (Current selection only) 6(FџџџџА–ˆoџџ@ ‚B@Vk_BefoЖAbout ACBA String Functions 4(FџџџџШэ Lбl :!D%J.€!DЖString Manipulation €(F]ђшЗ 4(Ž8џџџџx Ж ShowSMFlag 4(Pџџџџ0 –шoџџ0 ’B@V–oџџ ]ђ]ђX–o]ђа]ђpэЖ Ascii-code l%h.n]ђ эЖDel Any char.xls ”%.lэ .lchџЧэ Nбl €!D%J.4.џ nў l!h“Ў%h n!A@€рws.Name = "acsii-code" ” pB@ђnCatStэ .l%ЖэЌ l%Ж.nЈЌЌ n%ŽB@єџџџџˆэЌЌ n%Ž!Р.pЖShowDelAnyChar 4(Plect rэ Nбl €!D%J.4ReseЖ-Delete Specified Character (Pre-select range) 4(F=msoCoџџџџ  –€oџџ@ ШB@Vэ Nбl €!D%J.4ЖShowPostHyperlink 4(P (ЖRelative Hyperlinks 4(FџџџџШ э Nбl €!D%J.4ЖRemoveURLEncodes 4(P(FЖRemove URL Encodes 4(Fџџџџp џџџџtЖAttribute VB_Name = "Module1" Option Explicit Sub CmdBarContrl() Dim& As Com˜manB2ut 2Љvol 1!2!Т3!PopB ‰€ ќup†Cƒ EŒEFlagCIntPeger-iŠ P Set…˜=˜s("Worksh‚e€Menu €Г"€А For 0EachbIn .„Ѕs If1„.Caƒн€чAC€BA Funcц€s" Then' R= ++ 1 iР~Сuut.Index End If NeŽxР~Р = 0„Х0#Р0‚„Ц".Add(Type:=јmsoD(I3„з(aС™ElseЧIб(niР)/0†5@ ѓЬL3 MР8M СO3IOOddmјentЦME ФB‚ТOћЧQ3R…Х*СUћAV1VAW€LAЌџУWˆ-Т>С ƒI` Zdсч 2Ѓ в a)сЊ1#H…Ёƒolsўсf1‰String Mani№pulaсW ’сЃЅЄ%J` yРt|on@H Рje lect р™ Ptos Ѓ%O nAтk@ "ShoтwРKCat€1e € vert to S%le ‰0lumnxATo№1Colt7aDefault @pmat (Pre-sc)range)˜Resetяу‡ЃK2@ @/ƒГќ<€upФГ pчmгр ecified ChaРracterO'[ Ž1ЪQ;АAnyйO mdп&?nlO $y J ReсLve HС rrlinkU'? EСGЦп п Wroп п "RemoА URL Enјcod&1Я ХАЇяяпš•Beg€inGroup?xTru сZх)„bњo@‚AСŽtc7Ы#­SAмrБмawsр.UsedЦ1 нp.€!NДbk3yHwbX'С^ЁС)rP1 To UB‰А8d(E, 1 U€с" QГ For s = 1 To UBound(MyRngVal,0 2) ”ЄIf Not p(r, s)r"" ThenPTexАtStr4& j & " "bEn@d If N? s ws. Cellsi1)’.ueT 'Цr5?Sub  ResetDe faultпmaDt(ЧDim† As Ranged  Cl!Application.ScreenUpdng€>FalsSe„„ ActiveW@indow.,S(ele oŠ 'œš.Mergfei€Tr€fœ'9Un€‡‡ AаEach €SIŽnƒ`ƒ‹ƒ–Wit ƒг.WrapМ2„V  HorizontalAl€ignment@ xlH‚GeneralˆVert €BL VB Bottom ShrinрkToFiŒAџж?…'‚(FAECХCA>CmƒСSE@ntireR@dAќut$Zvd A “ “Show@SMFlag‘fmCopyRigtht.AŒ  DelAnyCha†rТŸ@sciiС/D ˆС ASh$eeЦЌwbСЇWo@rkbookУЌwњsХs >СЗgA%СЉ= ‰>Хs”("@ ` c€р.xls"eba‚xwb.AB `B-pcodeЁЅ Ѓ=" Іu1,  uCuDrr KRegРh  Ђ.ЊThiОsЅ€-€j ` b$1@ s(1р, PasteSpeciGAU eрNamAƒ"рacsiiCс N9@checkn€sя!2d)џ+Db`e+ШsРsJ&AЁVMsgјBox!$с—ЬEFPostHype rl@iafmRe&l"dF ІrU€€€€~|  $ БЙ ‘ с 1 Y Љ б 9a9™QЩ ЁЁ3й6i!+q7BICБ]^бf1g 8С;Ј  ”*@џ:Dџ%Tџ$ dTџ HQ@џxџTџTџxџ „QTџ[<џtџўˆ8џ“4џtџ „l4џћ0/4џ„ kZџєЉpZџ0џtџ Шl0џфpXџ tџў‹8џJ kZџєЦш:@џ'№ў%'џ%'џ%' џ%ўСDџ %Tџxџ „Tџ $Q@џtџTџ tџ ˆ(@џkXџDDџ%Tџxџ „Tџ ,Q@џtџTџєpXџєpZџtџWаў ќ4§œЬўhџ5аўўˆШў‰4џhџ „l4џ ћ0/4џz kZџєЉpZџ0џhџ Шl0џфpXџ hџў‹Шў@ kZџєЦЕXџ§“@tџўšрў §ѓ dџ5рўѓ/ўСDџ %tџWаў §ŸўЇИў  §ѓ dџ6аўИў  dџ ˆA@џ'№ў%'џ%'џ%' џ%ўСDџ %Tџdџ P Tџ $l@џ= `џ)Tџ@џ `џ ˆ:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ фA@џ'№ў%'џ%'џ%' џ%ўСDџ %Tџ`џ P Tџ $l@џ= \џ)Tџ@џ \џ ˆ:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ\џ P Tџ $Q@џlџTџ lџ ˆ lџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ\џ P Tџ $Q@џlџTџ lџ ˆ lџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ pџ ˆ pџ ф:@џ'№ў%'џ%'џ%' џ%ўСDџ%Tџ`џ P Tџ $Q@џpџTџ єџpџ |  pџ ˆ !pџ фФ”T< <џ8џЬўШў`џ\џxџpџlџdџhџtџ$4џTџ@џрўаўИў0 ќЦ0  0 ќЦp  0 ќЦА  0 ќЦр  0 ќЦ  0 ќЦˆ  H"$#ў €2$ 0 ќЦ  0 ќЦ  0 ќЦ€    9rU€€€ џџџџџџџџ$`§џџџџџџџџџџџ$Љ`§џџџџџџџџџџџ$б`§џџџџџџџџџџџ0љ`§џџџџџџџџџџџ™б0=Б$!`§џџџџџџџџџџџ$I`§џџџџџџџџџџџ$q`§џџџџџџџџџџџ$™`§џџџџџџџџџџџ$С`§џџџџџџџџџџџ$щ `§џџџџџџџџџџџ$ `§џџџџџџџџџџџnrU€€€€~| БЙ ‘ ёAС1i y 0a2щ1С‘/ 4‰aЁacbс aЁ‰fйd hXќKџџ"єѕ Xџ$ Xџ аXџXџ$ @lXџ=xџXџXџѕ xџ дQXџtџ!tџaHџю§ѓ[Dџpџ5Hџўˆ@џдєp^џ-pџaHџ @nЄH$*\Rffff*2u4880bdabпеЈиLсPмTнXп\о`рdьhэlлpтtуxъ|ы€ш„хˆцŒчщ”з˜кœф йЄџџџџЌвАгДбИжМдH ўЪ€€„€€ €(€0€8€@€ џџџџ€ џџџџ€ џџџџ€ џџџџ"H€P€X€`€h€p€x€ џџџџ€ џџџџ€ џџџџ*€ ˜€ џџџџА Р$а)ш! 0$8 @P p*L€А€ џџџџИРи №* 8 @,Ph1p   И а шј # "60 2RX  ˜€ џџџџ€ џџџџЈА€ џџџџРШ€ џџџџ€ џџџџ€ џџџџ€ џџџџи€ џџџџ€ џџџџ€ џџџџ"р шј€ џџџџ"€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ7&8%H`pxˆ  АИ€ џџџџШ€ џџџџ"а€и€р€ш€№€ј€€€€ џџџџ€ џџџџ€ џџџџ€ џџџџ "€ џџџџ0\(P+XЈА&И&а€ џџџџ ш ј*= € џџџџ*8фД1›Ы5мІЫІџџˆЖџџџџџџџџФџџ™уЂ/Њ5CІ€Cэrжw=јfЖ“CŠкоRDПe1V‹к@цл5HЉ:пзн<њCциљћSNЛЬъћy•ЎkџџџџџџџџџџџџxњCциљћSNЛЬъћy•Ўk™уЂ/Њ5CІ€CэrжwџџMEџџџџџџџџџџпџџ„џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€SPџџџџSџџџџSџџџџSџџџџ<џџ^<џџf<џџr>"џџџџ<ˆџџ< џџ<$џџ<(џџ<,џџ<0џџ<4џџ<8џџ<<џџ<@џџАа D+и  (€ џџџџ0"W8-`0\x3ЈJШ"Wш"G"G8`N+hИРШО*а ˜ € џџџџ  .+Ј и € џџџџр € џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџш € џџџџ€ џџџџ  8  P  `  h  p € џџџџ x €      "А € џџџџР € џџџџ"Ш € џџџџ€ џџџџа 7р & % ( 8 @ P € џџџџ X h x € € џџџџ € џџџџ"˜ €  €Ј €А €И €а €и €р €ш € џџџџ€ џџџџ№  ј   |.  ˜  Ј И Р € џџџџШ  и Z+ш  H X ` -h  x Z+ˆ  ш ј -€ џџџџ f+(  Ј%АШ$Uр&Y  H€ џџџџ€ џџџџ X `€ џџџџ h p €&&˜9 И€ џџџџРи №.&8P X`€ џџџџ€h<pˆ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџ ЭџџxЭџџp]ђX]ђ€]ђЈ]ђ8]ђа]ђ`]ђˆ–Ш]ђ]ђ ]ђ8]ђP]ђh]ђ€ џџ!Ъ!ŠЗœ0!FЖY ВЌ+Аœ МЌ 'М МЌœи М ВЌ+А>Ќ ВЌ$А'Ж% ВЌ$А'ИџџџџЌ ВЌ+АџџџџdџџШ М ВЌ+А ЖЖ  ВЌ$А'Ж Ж'Иџџ И ВЌ$АЌ  ВЌ+А„kџџHdџџ@ ВЌ$А'Шџџ ВЌ$А'Ф„ ШЌ œџџџџ ВЌ$АЌ 'Цdџџр ВЌ$А'ЦkџџР ШЌ œ ЖЌ Ф$њ'Рkџџ Ж Ф Ц Ќ $њ'Т Р Т'ЖЖN ВЌ+АЌ ВЌ+АЌ ВЌ+А Ш М œџ @ўЌ АЌ‘’ @Ќ$А Ш œ @Ќ$АЌ @Ќ+А @Ќ$А ВЌ$А Ќ @Ќ+Аkџџhџ @ўШkџџP МЌ 'Мkџџ8 Ж џџ!Ь(doџџ –˜ џџA@roџџ–и ВЌ 'В ВЌ$А џџ!в(d В џџ!д(F ВЌ$АЖYœЗ џџ!Ъ(ŠdџџˆЗ џџ!Ъ(Škџџp В ДœЗ џџ!ж(иkџџHЗ џџ!к(иoџџ0–]ђX]ђx]ђ˜]ђИ]ђи]ђј]ђ]ђ(З ”(– џџ!ъ!d$шЗ џџ!ь!d$шЗœЖFYou must enter numeric cell references into the row and column fields.A@€|џџPkџџH џџ!ъ!dX'ф џџ!ь!dX'цэ Œ.lэ †.о џџ!ю!ŠЗœэ l!h!J.n џџ!№!dЖœ џџ!№!d l$XЌœэ џџ!№!d l%h.рэ р!Ž.т тB@ђ іДš™™™™™ё? n%ŽB@єdџџ(Ж9Cannot find your template. This posting will not proceed.A@€|џџиkџџаkџџШ џџ!Ь!d ц ф n%Ž(Š џџ!ј!ŠЗe џџ!њ!d$шЗ џџ!ќ!d$шЗœ џџ!№!d l$XЌœэ џџ!№!d l%h.n џџ!Ь!d ц ф n%Ž(Š/ x ц џџ!њ!dX X џџ!ь(d ф џџ!ќ!dX X џџ!ъ(ddџџ˜ЖDYou must identify the worksheet that you want to post the string to.A@€|џџ@kџџ8dџџ0ІЖsFor this option, you must say by how much you want the row and column indices to be increased, with each iteration.Ж1 That includes entering zeros, where appropriate.A@€|џџhkџџ`dџџXЖ#You must choose one of the options.A@€|џџ kџџџ @ўЌ АЌ‘’ЖN @Ќ+АЌ @Ќ+АЌ @Ќ+Аџ @ўШЖ'ЖЌ'ИЌ'КЌ'МЖ џџ!Ь(dЗ џџ!Ъ(Š оB@ўЗ ”(–oџџ8–@ ВЌ 'В ВЌ$А џџ!в(d В џџ!д(F ВЌ$АЖYœЗ џџ!Ъ(ŠdџџРЗ џџ!Ъ(ŠkџџЈ ВЌœЗ џџ!к(иkџџ€З џџ!ж(иoџџh–€]ђР]ђр]ђ]ђ ђ8ђP]ђh]ђ€]ђ˜]ђИЩ э Œ.lэ †.nЖjAre you sure that the current active sheet is the one that holds the string data that you want to process. ‚$€'| | „œ џџA@r|џџ@kџџ8э n!ˆ.p pАœЖPThis function must have a single column of data to work with. It will shut down.A@€ џџA@r|џџ kџџ˜ p! !' Ќ œЖPThis function must have a single column of data to work with. It will shut down.A@€ џџA@r|џџkџџј p!!'v vЌœЖ\There is only one row in this data collection. Why don't you just copy it in the normal way.A@€ џџA@r|џџXkџџPЮ vЮЌсА№џ @ўЌ v’ @Ќ p%Ž!Š @Ќ+АЖN @Ќ+А @Ќ p%Ž!Š @Ќ+Аџ @ўШЌ'В v'Д џџѕЗ5к(иЗ5ж(и В9д Д9 ВЌ$А9вqџџ@џ nў l!h“ n!Ж*-PSUœ n!'Ќ Ж-PSU…'@ Ќ @Ќ $њ'  џџ!№B@kџџЈџЧ |џџ˜Ѓ э ”!!J.lхpoџџhџџџџ`џџџџлЖAttribute VB_Name = "fmConCat"  јBas|0{D547E82A-5600-49C3-9962-552D09A5D398}{BF71522C-45D6-4B07-A4C^5E23B95451E} dGlobalŠSpacoFalse ŠCreatablPredeclaIdгTru BExpo se0TemplateDeriv–Customiz‹DOption 0licit ‚Ÿ1 Dim StrArray() As€ Varian€A RecNo I@ntegerT ot #SoFaЦr€ing/‚ ˆLen$his€ Nth@Seli CP€B€D €Sub chk€ Me_AfterHUpd()BрeforeA€‡F%Т аStarT7Р*i (AMCur0rPosЪƒ-If Me.,.Va lu„ The8n €$c‚^, 2)СY€І “‡E= Ч+ РrwI1DM4пA CРУp=G…"о1@T„†sO 3G Š1v5Ф(EТаГ$Ѓ&4 " &@N= =€6(йe<- cAJ3) Р,E nd Ifƒ& w'E?/#4FL/5ч$`8Х> ,8dPџЃ ,8ЄHVчh = Midц), ќ1,Р0BФI#Іl­§Хl+a8DЇ+%1@_|& Ѕ у€ъ3#eN{ eVK03‚Sd( <lƒs aFor i€€3o UBoќun""Т "!Ѕ@ ‘fi, рn> <пы !L(=c-E}Х ї " -A,*%`EЎЉ6! Next iџу%с#ЃiЉgЦ `cФKрžtxtReРsult.TЁ BzƒЃQЁSubj^mdCance(l_CАlk^Un№load Uc„LШNxt тLА?s0'ЕqC @StrH кPplab No.Cav= љђ Щ"'\ДXАЯ`2s;џ= d…?@В` Гxc$‘mdё№.Ena€…•#} ‰v8‰? ˜  ШcmdаltIhQnwbnWorkbookуvOldS„htushee„„>wвpСJЁп C@opyRng‘R˜angр’buolo‡р Rown/ŠKy%(App #a!‘.Sрcreenв‚№Gƒ4"IsNumр–Œc(`+Colт УQlr Or MLdsgBox @"You mPš ЂeР”r n -l refereа-s into the row aа3column fields.с№MExit‘ahу№  = Cpš- /"кЖ ЁSet Са= ActІ'w$ХS3(o`ptNewŸŒ Š Rs€wb.†рs.Add11E@HNot‘omЁ s3ђ ""ˆ‹ЄIsы€С cЩ, В… їA2&=`Xn,[‘E( s1.CexllsPб14.q›wsѓ(1.1).PasteSpecial ˆ(xlђAllh[G{ХMt#POn`find your( teС.0is АУt!,will ‘proceeўdЁ"Еqg#UUAѕ# U& Р"no,P9§№7)І“1]р(™!Џ!Sp 4Incnr†)P bБAPc~r)9‚У6Ѕ т#xўt##У"Pъ*"г ?1џџ o—Єowџѕ.r;b0ІH<Ш"п%@ 2№P@+Y@me)п&Ѓ •&JiЂd0JifyrHw ^“R[аat!( wтn `JЁ'2sАћ[t>oI'' '/у›Е "For this option, you must say @by howhere approp€riate."8Exit Sub ‰If Else Msg@Box "YЯchoose onэfФђs)‡'€„& …’i = 1 To UBound(StrArray, 1)ƒ…(i, 2В)"N€V‰ 4 (0 ‰ 5„ Nex„‚ SoFarЧ2@Label11s+*s) ѓџŽўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqЊЋЌЎёЕбVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmConCat Caption = "Concatenate a string and Post it to a new Worksheet" ClientHeight = 6900 ClientLeft = 45 ClientTop = 330 ClientWidth = 7635 StartUpPosition = 1 'CenterOwner TypeInfoVer Len€€T戆 Nt"hSelMe.txtResult.T*= "c€$€ chkValueFaТJOldSht.ActivY A pplicƒkSs`enUpd€@f=А TruРWУIS`0 PrAd cmdPrev_C @k(ФFRecNЦoУ- 1hТ)xThe/Х)€U(Т ƒV€+labNo.Ca‚ЈE I,f У]YС•enOТЮ<ƒ/‰e.еDEoF€ƒ-€hХƒ9.€Enabled@%SР-€BNxtˆ!œNUserРšm_EbODim wb As Work@book ТsAХsheetM yRРhР Rang+@i rС I@жgeаr, cJiЈХ №NameС`+@qЃШPSUбClh ReplyaLongУbOn ErВrРŒGo gBH@‡Hler€]eta=Њ eSs€*MS#Ѓ = c{(L"A€ƒс•sut!‰the cur’r‰ aСYe Ђ# œaЁholЦdр•Рstr!ŽР[ža ‚ ‘! o рš@„, vbYeИsNoZBс=€РZ`X`MUnloaјd M .Ї‰ЇH!Ѓ3 = ws.@=dф&ƒР Is No€Б 8C e˜a~ fun‰onЃГhavЃ4 s@l@УАofb Уo w`EЂЏ.D I`,ill!uРt downžКІc/B.C sрŒun@L@c >с џУ`dЌџџџ'ГЃуєRo`)CВ€‚AяРДЬЁШaмn€SA@Сзsу*!2KLike "*ў-0LuaQ %Mт8ƒ q~In(1, q4, "в ‘wЦsrpHid(&рi mDс_omTemps.AddјIte`\‚s•AБп-іŒАбR$R:6RчHy•RВ б~@[ГP№kSгyDelDblSpaceModџџџџ‡я;__SRP_14џџџџЉ __SRP_15џџџџџџџџџџџџоБfmCopyRightFlag џџџџџџџџџџџџст\R0*#10*\R0*#f*\R0*#2*\R0*#14*\R0*#1*\R0*#f*\R0*#13*\R1*#e4*\R1*#e4*\R1*#2ac*\R1*#d7*\R1*#e8*\R1*#e8*\R1*#f1*\R1*#dc*\R1*#e4*\R1*#d7*\R0*#10*\R0*#f"*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f*\R1*#e8*\R1*#d7$*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#10*\R1*#f1*\R1*#dc*\R1*№ЄдШџџџџФ1мІёWџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџtџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ ”џџf(џџr6 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџLџџџџPџџџџ”џџџџLџџџџLџџџџLџџџџLџџџџLџџџџLџџџџLџџџџџџџџџџџџџџџџLџџџџLџџџџџџџџLџџџџLџџџџLџџџџ 0TЧAAIs +СЃ ЭF”= Mid(ƒ+.i - 1+ї… iСX D@Hљ†& ƒSA.TФ(#S@ IfЯDo€ While Ђ.џs\*п)bVФЦу`"џj0Y)п(l г+ЬТao LoopЏГ "x "D_^[ џ?121С П1‚Œ?2Аџ?$я,a€ŸZDІm џŸZЃЮ„) п(э_(,?п'M 'SW{Я ћ@+sZ@ksh`=„ ч' Е ѓtпtиt8TruТtСiSubЁPtР†pŠetetAlЃŠsџ†њ†A R?‡=‡‚Long,ў вЃЂЁˆ2…“іjAƒЃkЅCTpqq`і‹”Item1­Newд‘Varian“Rep|lyQбQP*sgBox("WA RNINGplThРis fun‡p›delps ev ery sq character that it„ f ›s ine cА”s coed by your curr`ent sЂ. " & C~3)!"We рo recommendгР avoi№d us@б` 5`ntaina0”e€ valuesŒ(Pkсw` to ntinue?", vbYesNoРV *ХvbNвo…Ex SQ$w(аЌ•žGoTo EAŸHandlerљq'SЏœ0QБA%џPžIЁѕб\Г1p џСœ%œ 3N–ё№р#5`›х>ALenѕŒOPg!O1 А iG9Сд’(ъN 0,s‘ As€ЇѓЖБ)sА Аž A я д32 и.=Щ@%џЧ eЅˆIѓDb 4Бџ` 'sљ!Hц6€Я ЮSUIw" љ :!M7 "рА(de ha3d 1ifiЁ№2an e1$. €8most liЄkeр;on№–sf1 ?5n a sh€ape (a Рй&tР2 Сso0ШotBh0;draw3object) rFab URLEncodeXTDecArрray()AGTвЃMќMy›TSoоАп&ЫŸЏо`oWXoWs ГVoWХс$-SoуHex_Ы"0Pъ BќegдЛ1ЙЈ,P'[ё…[ ­[You mu`"preі-уU0"e€аё&c#,coSђsрћngs with '—Pа b'T(1@ZP_ &ўo] waдГnt to continue?", vbYesNo, "Check Message") If €Reply =”No Then  Exit Sub End If '@MsgBox€.comAscii@.Value4Create Array of D€ecimal ‚s=For ih1 To 256gReDim P€reserve6љB(i‡G;i - 1 NиextR'Рœ("Do youˆ waƒ„pri„ou‹he a‚O:vZs€%”‚‰them.•Builіtƒj—'€tŠ™€Ќš'VSet wsTActiveWorkbook.sheets.xAdd"‰k‚‰UBoundт(…x, 1€8ws.Cellxs(k Н‘kпУGB$Чq'rУNЪ'L+S( ARngApplication.PSeleР5o€ˆ  .Each Cрl In D u€H˜Not@Ц(""Ш–#(€Cl.mu|laР‚ŠŒ … Shtr(…) 2)P DIsNumericŠFalќse ƒ0ЩС7(џ€M] С“AMС‡+|бtР0HexШ$@Ц(s))Уt€/Len(cС)Р&#Ё & ƒгeL‘D(Itebm "%"| ЁIтn (1,тKу/f Ÿ/(Рt > F0?%BegC*Mid(ч>`n, t”срst + 3`цxs) €< 32 OrчЁС`= 127|aчGР,„& #Г6"Ч bЗї ChrJN€:Ÿ^ $Ъ q?emX)СРWhile€5€=џ{=ћCр,mE§=сП[ ?BР?B_!rЏћХzEŸ!:` V'џп!(Я12‡Џ_"?@ABCDEўџџџGHўџџџJKLMNOPQRSTUVWXYZ[\]ўџџџ_`abcdefghijklmnopўџџџrs—uvwxyz{|}~€ End  OKBut‡Unload M€[rU€€€ ˜  x с )AaABAii9!)йСC D1DYDџџџџii4Бщйбббџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8™Iљ<вввџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<Бщ‘гггDelAsciiCharџџџџџџџџџџџџИ__SRP_eџџџџџџџџџџџџ>__SRP_fџџџџБfmRelHyperџџџџШSet ws = ActiveSheetѓ6Fэ ”!f.Zџџџ ’ў Z“ ’!ŠЖœnt ’!ŠX ’!šX œ ’!Š$шЗœ6v( ’!ŠX '\џџ \'@`џџџџџ xўЌ @’\џџџџ \ xЌ$њ'pџџ p$r џџ!˜!Šœ n p'nkџџиџЧа n ’(ŠkџџИkџџАkџџЈЖ'nџЧ˜ џџA@r|џџ€Ѓ xЖЯThe code has identified an error. This most likely one is that your current selection is a shape (a button or some other drawing object) rather than a cell or range of cells. Try making your selection again.A@€CBA џџA@rentoџџ€–0]ђp]ђ]ђА]ђШэ .lэЖ acsii-code l%h.n !Š'œx œ џџ!˜,žoџџаџџџџШэЌЌ n%Ž!Р.џџџџ8 ’!Ф ’!ŠœkџџџџџџџџџџБДAttribute VB_Name = "DelAsciiChar" ŒBasŒ0{FB6318FB-7F8C-44F8-BC72-40FC1FEB644D}{092C4AD 2-7DB6208-AB45-0D27C2675A14} dGlobalŽSpacAoFalse ŠC€reatablPredecla‰IdзTru BРExpose0Template Deriv–Cu@stomiz‹D Option 1licit  P€#€' Sub cmdCan cel_C€k() Unloaˆd M€REndЮЫ‡Dim ws As WoРrkshee€5 €CellRng АRang€*‚ l rСLong, KBƒtE A iu j‡k… V0alSt‚€inТgJItem ‰NewФ AVarian0ReplyA$B'MsgBox@H.comТЈ.uIf IsNull(M e )Ф The0n Ф"You mРp select a cРНacter tˆo d@te.€Јa ExitfAhI fOyrror€ GoTo E€HandlerA'SetСg= Aєct€‘ShAС=h)€ppaŒ.S‚!€ŽAF€Each Cl In ЧD 0€;Not@У@9@8""Ш7+€ClТ.mulaoТKŒ Eр2(E!&CЙ 2)А$С.m dўcЪbj”CСiсРЉРcсiсрLen()вs€1 `4iГ ƒ "U= MidH ёd, 1 $2SџЅс!)Rд"ЁaЈbє= ˆ&B@@$ З…SХ ъгNexРnџ FЉё mщiє Š" mAЁ Ђщo Il:ЁdEy€{ code has identi„fiЗan eСr. .is mos@t like ‹one @that your cu1Ф&E СCKI.AРddressBZШSubGMehFaAбcreenAA=e6CCТ6Ёd вХ‰Ѓ "'vbќNoH!A[ˆAСk^€ї#)ˆ cˆ@Ђˆџ’ВM РF,–< ЙšCџ>N!ЧFџ/?A21Гuс'њqџџџџџџџџџџџџџџџџџР џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ џџџџџџџџrЇ5.7.@ўџџџџџxџџџ џџ c.џџџџ0р фt „ИмІЊџџˆЖџџџџџџџџ`џџлzиЕЉC— Ьˆ/с%‚mбЬ œHЋ%Ю‘ПŸ!“ н—qPЃ“L“ŒUgzјtЁ[Ÿ8КT]BC55]ЧЂоџџџџџџџџџџџџxЁ[Ÿ8КT]BC55]ЧЂолzиЕЉC— Ьˆ/с%џџMEџџџџџџџџџџпџџTџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ ”џџf(џџr6"џџџџLџџџџPџџџџLџџџџLџџџџ*џџџџџџџџ џџџџ”џџџџџџџџџџџџџџџџџџџџLџџџџ”џџџџ\џF4џ%аў,П`џ54џ-\џ`џ  `џ l>\џF4џ%аў,Y`џ54џ-\џ`џ ˜`џ l>\џF4џ%аў,Z`џ54џќcќјаўR‘ltџ§oDџ%:џ%\џ`џ Ј`џ l>\џF4џ%TџXџ  Xџ l>TџFџ%ШўЬў ˜Ьў l>ШўFєў%Фўxџ №Фўў Е)`џXџЬўФў64џџєўl§œ`џ $  `џџшp<$аўpџtџxџhџlџ8 \џTџШў`џXџЬўФў4џџєўдўˆ`џ$ (Q`џtџ"tџa@џ:Pџ]ћ/0џћФ џџ5@џќ‹tџa@џќ‹ѕ џ ѕ рў 'Pў'pў: ўNўўѕ:Pџ@џћя0џ:џћя џџћя№ўрўћяаў:РўћяАў^ qdџ6@џ0џ џџ№ўрўаўАўўpўPўldџѕЧэl§œ`џ $  `џњ2tџa@џq§ѓ `џ`џa0џvќ"ѕЧ`џ6@џ0џј lќјLўc(Pџ%tџa@џq§ѓ `џ`џўЂ0џ§ѓHўHўa џZ`#@ўDўLў ˜Dў h/@ў)`џHўDў6@џ0џ џc(Pџ%tџa@џq§ѓ `џ`џўЂ0џ§ѓHўHўa џП`#@ўDўLў ЈDў h/@ў)`џHўDў6@џ0џ џќcќјLў<<$LўpџtџxџhџlџH@ў`џHўDў@џ0џ џџ№ўрўаўАўўpўPў4DHHrU€€€ џџџџџџџџd$ `Дџџџџџџџџ$A `Иџџџџџџџџ$ `Мџџџџџџџџn9Е€0* pH‚dф VBAProjeˆct4@j = r @nЄH” J< r€stdole>stdo€le f%\*\G{00€020430-C 0046}#2.0#0#C:\WINDOWS\SYSTEM\STDOL€E2.TLB# Automation^€MSForms>SFErms3 €DD452EE1-E08F€-101A-8-02608C4 D0BB4Dsystem32\fm20.dll#Microsoft ‚: €] Ob­ Librarаy/;D1€„€tˆ€ˆ€00}#:0‚€#€k0Ѓ…РA9AC3FE78-7D1E-4EF4-8055-486B4253064Aˆ6DOCUMED~1@Wgo^€џGoTo_€џIfb€џIny€џloop{€џMe…€џNot€џPreserve›€џReDim€џresumeЄ€џSetЏ€џSubВ€џThenГ€џToЗ€џUBoundМ€џVariantО€џwhileР€џWith Excel€+ VBAїтWin16С~Win32MacГВVBA6­# VBAProjectОПstdole“`MSFormsCOfficeuˆ џRefEdit† Œ(џThisWorkbook|у €џ_EvaluateйWorkbook_BeforeCloseВзCancelё˜Ќ(Reset> Workbook_Open›с Ќ(CmdBarContrl/я Sheet1ш Sheet2щ Sheet3ъ Module1bCmdBarCБ CommandBarCmdBut)ДCommandBarControlPХCmdBut1ЅќCmdBut2ІќCmdBut3Їќ CmdPopBut‡wCommandBarPopup Flag›ўi` CommandBars €џControlsЬKCaptionxIndexёПAddїr€џmsoControlPopupl)€џmsoControlButtonnѕOnAction„  Ќ(ShowConCat7  fmConCatвЂShowѕЌ(IsShtшьShtNm™'MyWBQ™„џWorkbookkMyArrayŠВCounterћShtнг „џWorksheetСў €џWorksheetsМј Ќ(ConvTo1ColЬwb…_ws–_MyRngRЛ€џRangeк MyRngValVrisjtk„џReply /TextStrf­MsgBox—RvbYesNovbNoЇ% €џActiveSheet%N UsedRangeШ‰€џValueфK€џActiveWorkbookЂ€џCellsЌ(ResetDefaultFormatКnClа\ €џApplicationЅ*ScreenUpdating!  ActiveWindowУ+RangeSelection7~WrapText}щHorizontalAlignmentS@xlHAlignGeneralщ§VerticalAlignmentЪЁxlVAlignBottomuN ShrinkToFitŠA MergeCellsкЉUnMergeУп EntireRowїAutoFit& StrArrayЋRecNo ъTotNo9!StrSoFarФ StrSoFarLenvN ThisStrLenїљ NthStrSelџнchkSelMe_AfterUpdate+о BeforeStrв’AfterStrы5StartNoЦ& StringLenXМCurrPos\ьchkSelMeАЅ txtResultY)cmdCancel_Click\е cmdNxt_Clickу… txtTheStr3labNoibcmdNxtФєEnabledлЊcmdPrevѕЙcmdPostIt_Clickс5OldShtm‹wsTemp:8CopyRngз›ColNo FRowno IsNumeric$*txtCol%кtxtRow'* optNewShtРЫcomTemps5!CopyЦП €џPasteSpecialОK xlPasteAlluž optNewCellFщ txtIncrRowуF txtIncrColсіActivate—| cmdPrev_ClickЛЬUserForm_ActivateZscZwsNameи€PSUNameы2 ErrorHandlerOColumnsp9Count0vRowsЁUlabTotV}AddItem‡  WorkbooksBь DelDblSpaceMod‹" Ќ(FindDblSpacee€rngUЯStartStr еEndStr%ЮCellValР‘IsDate2ЂChrK~ €џBeforeClose~;Itemзz _B_var_Chr\; _B_var_MidэpUserFormN cmdSelAll<ыLabel1,Label2Ž,Label3,Label4,Label5‘,Label6’,Label7“, cmdPostItч& cmdCancelЭLabel8”,Label9•,Label10@Label11AFrame1Й €џAfterUpdateНФ€џClickŠуЌ(DeleteAllSpacesЃњ €џџџ_B_var_SubН’ €џџџ_B_var_ws>єCellRng8~ CellValStr†jakb €џџџ_B_var_On6ѓ €џџџ_B_var_Set €џSelectionZЎ€џ_DefaultjТ €џџџ_B_var_ForjL €џџџ_B_var_IfPђ NewCellValДc CeЬayџ  фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.5#0#C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE#Microsoft Excel 11.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\system32\fm20.dll#Microsoft Forms 2.0 Object Library *\G{9AC3FE78-7D1E-4EF4-8055-486B4253064A}#2.0#0#C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#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\OFFICE11\REFEDIT.DLL#Ref Edit Controlц*\G{2B0516C4-FA34-4F4A-8303-45B11B25AC24}#1.0#0#C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\RefEdit.exd#Ref Edit ControlEРF   џџџџџџ@nЄHџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџмІ ThisWorkbook0747637efbџџThisWorkbookџџоІ`џџџџ1џџ Sheet10>47496669џџ% Sheet1џџиІђџџ Sheet20?47496669џџ' Sheet2џџкІ0ђџџ Sheet30@47496669џџ) Sheet3џџдІHђџџModule13X4880c48eџџ*Module1џџжІаџџџџ`І6џџfmConCat2u4880bdabџџUfmConCatџџЫІxб5џџDelDblSpaceMod0z48a46e78џџDelDblSpaceModџџёWЪ1џџfmCopyRightFlag0848a6dcc9џџƒfmCopyRightFlagџџКŽАЕџџDelAsciiChar0L481c1e85џџ“DelAsciiCharџџuџџџџаMџџfmRelHyper3Y4880c49aџџЩfmRelHyperџџЊ№ОџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџ\p\Q„žHЈДЮ›Х0№Fџџџџє‰tБ%–HЇ/ЪEА”>џџџџ2"Ь(™ “J†гПѕO1Ї(џџџџ5,9Ž8”БOЃdЅьуцџџџџ™) џŠвK“СV\EДєrџџџџ-р2ГЎУMM˜сm/…ZАнџџџџгœ!—зU‡F-‡Ж ЮяџџџџџџџџPзъЫžСB b<тнQ џџџџџџџџXиоj_^žOж=!WB3џџџџџџџџА­Gєƒ‘,ІKˆ 8l™Ёџџџџџџџџа€-џмM €џas=€џDim@€џdoC€џEachD€џElseT€џFor\€џllValItem’иAsc!u callvalitem:ђValie(J newcellvalueўa€џџџ_B_var_newcellvalueZ› _B_var_Error)Ÿ€џџџ_B_var_ErrorHandlerЋS CmdPopBut1bC fmCopyRightFlagѓy OKBut_ClickТєShowFlaguOKButв comdpopbut1R# CmdPopBut2cC €џBeginGroup‰Ж Ќ(ShowSMFlag#j DelAsciiCharDГcmdDelChar_ClickнГIsNullЏФcomAscii цValue2ЂRngValDSList*“Ќ(ShowDelAnyCharШ cmdDelCharЉЌ(CopyAsciiSheettPasteAsciisheetŸidiђ\ €џџџ_B_var_dišёwb1чтwb2шт€џMove>y €џџџ_B_var_wb-єbefore‰о€џSheets  €џџџ_B_var_beforeѓX€џџџ_B_var_Workbook3№ Ќ(checknames{Zwokтф €џCurrentRegion|”currenteБ€џFormulaqY UserForm1)ж fmRelHyperћ/ txtCellEntryЛї txtToolTipЯQTextBox1ІScmdPostHyperlinkСCommandButton1|дCommandButton1_ClickфСUserForm_ClickлјToolTip[ETargRng7з €џActiveCellНЗnoy$КmyReplyP €џHyperlinks:• €џTextToDisplayŽŒtxtTarg\Д €џSubAddress+McmdPostHyperlink_Clickз5MySubAddъDinХƒ €џџџ_B_var_Dinж@ hyerlinksзF €џџџ_B_var_WithYБ€џAddressЇХ €џScreenTipЭзЌ(ShowPostHyperlinkp fmposthyperiœ€џџџ_B_var_fmposthyperЫtxt†лЌ(RemoveURLEncodesвЂDecArrayя €џџџ_B_var_ReDim•В €џџџ_B_var_uboundлddec2hexSZ€џџџ_B_var_dec2hexз]worщф€џWorksheetFunctionѓ&HexŸ˜ _B_var_HexАUofBegStrтЙstirng?MEnfStraY €џџџ_B_var_BegStrL4 €џџџ_B_var_Do ёvbYesa?secarrayFHexStrab Label3_Clickœ<џџЬџџџџџџџџџџџџ%')+џџџџџџƒЩ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџUџџџџџџџџџџџџџџџџџџ"Д €€ EPHL OCALS@Te€mp\VBE\„Tp.exd <Р!€с.E р…€.`ŒM ДІAƒŠOffic„ŠOA€‡fic‚Š Р †Р12DF8D04C-5BFAAhB-BDE5ЉJAA€‰4Р2ˆ1PROGRAM FILES\MICROSOFT €OFFICE\„MSO97.DL†Lˆ1ƒ# 8.0 n"€C_RefEdit•R+fEХРИi@К3w€ ,Сr24517s PЗ1EЗРрgram€ Files\’$„,11\REFАEDIT‚-Р! " ControlG?—bfи0‘РsD2B0516C4-FA34-4F4рf303-45B11B25AœC2рfFŸKE\dŸ‚K`Ъ @EЁ—ЈРУFAI"šˆ тмІ"ThisWork€bookGрˆThРKsW‚€kbрokЊю2њbHЂj1"Ё1€",QтоІ""+Ђ"ЃSheet1Gт S e Gt17 сІЃ2Ўя ђTэ иѕ 2э 2eщ 2э 2џ a0кUѕ 3э 3щ 3э 3џ т)дь тЛoduЌle*уЛoРpuBЭ;A*2Р ЏІ6QЏ*жІ!Њ8 fm nCatG ЁРЩC InCвa`€i2roTб5oЫ$(  хHADelDblSpaceModG"(D`IlDЕ Zl€npАTM ~d№_s_W_ Ъг k}'ёW1pyRightFPlagGР*а]m opyRU€8g0tyl  gs g2Ž_ ЕѓР4] КŽг8ЛБ‹АAsciiChaVrsB3A@‚cаiѕ@ h r §sBџ“ѓŸ M_uŸ В™fmRelHшypep Q&ёfшlH p№1 QœЙ—2Ÿ“пО@Q}ЊпQ.rU€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~__SRP_0џџџџџџџџџџџџєB9__SRP_1 џџџџ^­fmConCat0$ ŽЋ"Ш џ­"Шfџџџџџџџџџџџџq/bel1!ш-ЌЂ6Я€SЊ` њ ёџџџџџџџџ1аLabel3Label7Label4Label5Label6в‹BьЮž Њ`ѓtxtRowtxtColLabel11 ”?ЯFѕЮ›ЮЊ`ŽFrame12в‹BьЮž Њ`ѓcomTempsС{lЏЮŸFЊWJOLabel8Rв‹BьЮž Њ`ѓ optNewSht optNewCellLabel10labTotBв‹BьЮž Њ`ѓchkSelMe txtResult txtTheStrlabNoШ[qJ—І eР‹UserFormšq#‹КEŒрƒЧџbѓj F3Dynamic Ёџџџџ џџџџЩр cmdSelAllcmdNxtcmdPrevLabel2chkSelMe_AfterUpdatecmdCancel_Click cmdNxt_ClickcmdPostIt_Click cmdPrev_ClickUserForm_Activate Ш4аz; <* ЂAre you on the worksheet that you want to transform into a single column of data.зРF   Value ЁџџџџS №Cв‹BьЮž Њ`ѓ Y Nв‹BьЮž Њ`ѓ#=ћќњ hЇ8+3qЕРG?,2qЯ”ЊЇLаБйџџџџБСYl†ЯЋ|ЊРЯФYl†ЯЋ|ЊРЯ С#џџџџ џџџџЩ OKBut_Click% ŒYou must enter numeric cell references into the row and column fields.3в‹BьЮž Њ`ѓPasteSpecial rCannot find your template. This posting will not proceed.$ ˆYou must identify the worksheet that you want to post the string to.ЄіЙБM‰Ђ(kЄY d; цFor this option, you must say by how much you want the row and column indices to be increased, with= 54 End …†‡ˆ‰Š‹ўџџџџџџџџџџџџџџџџџџџ(H  @џџ }t H!Rу ‘ЮуЊKИQDBTahoma Œ‰ (ѕ€2HLabel11sЇ ( €ACBA Oddmentsby№N ї€@;МTahoma1sT(A€Functions for manipulating and controlling text strings in Excel.to.—O ї€@ЅМTahoma1s0(€Version: 1.005 - November 2007Јw€@ЅTahoma1sФ(В€These functions are availabl each iteration. b That includes entering zeros, where appropriate. FYou must choose one of the options.ЗВo6ь@†ХŸŠtиUч†ІУСJš% чМmќ.y`=хАŽѕEŒŠЂT}ЂёШ­Tf‚FД#ѕLЃхЌЯ7 дAre you sure that the current active sheet is the one that holds the string data that you want to process.*  This function must have a single column of data to work with. It will shut down. FAll Spaces (Current selection only)тЄDmQ‚NЌ6Д›3“OKBut0 ИThere is only one row in this data collection. Why don't you just copy it in the normal way. *-PSU -PSU“K*y џџџџ  rU€ €€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~% ЩхyjЪPК]B ˜д„№‘D  фџџџџ ƒŠa ) џџџџЩ  џџщƒŠa ) џџџџџџƒŠa ) џџџџџџ)ƒŠa ) џџџџџџAˆa с џџџџ џџџџ I q ‘ Љ С СЁ; >Й>љA]џџYƒџџџџџџџџџџџџџџqˆa с џџџџи џџџџЩi/Yaџџ‘ƒџџџџџџџџџџџџџџС7ƒ€a щ=џџџџсЙ=џџ <ƒ€a щ#џџџџс™Vџџ!EYiiIA™ VBAProject ThisWorkbookSheet1Sheet2Sheet3Module1fmConCatDelDblSpaceModяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Йџџџџ сI`РF4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel БџџџџйQp0РF txtIncrColC:\WINDOWS\SYSTEM\STDOLE2.TLBstdole Сџџџџ Q€с.E р….`ŒM ДC:\WINDOWS\system32\fm20.dllMSForms ССщ1xўУš}єN€UHkBSJ 2C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\MSForms.exd ЁСЩ1 Lај-њ[НхЊDоR 2C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\MSO97.DLLOffice ‘џџџџЙ)АEРFResetDefaultFormatLabel96C:\Program Files\Microsoft Office\OFFICE11\REFEDIT.DLLRefEdit ™™ РФ+4њJOƒEБ%Ќ$ 2C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\RefEdit.exd ё™ акРFDЩwМВD‘’T!OТѓќРFтчроNЇ€[kь–DРFWorkbookWorkbook_BeforeClose Workbook_Open @ CmdBarContrl ShowConCatResetIsSht ConvTo1Col  $Worksheet Menu BarРFйРFi ‘ џџџџ РF РF РF ACBA Functions РFControls Oddments  РFTypeAdd 0Select and Post a String ShowConCat 0Convert to Single Column ConvTo1Col BDefault Format (Pre-select range) $ResetDefaultFormat (Delete Double Spaces FindDblSpacei ј FindDblSpaceеРFиРFFРF   VBE6.DLL Ёџџџџ1  Ёџџџџ- @ cmdPostIt cmdCancel txtIncrRow Ёџџџџ` ` Ёџџџџx €0PkцЉЙџL‚пeqšД']эъ <гџъF˜ƒ18ŠKеTƒeџXJ’aXпr†SШУ6ьЏ§EКœ:Њ(l#€їгЊCЛ“gП^•"žŒ—АдЮП-Њ?@аLaлРFЎt HЦGБbЩ j 2ж РFtћФѕбF*KŒ<т'ГtDРF WorksheetЋCцЦы D„ <'<†щ˜ZHЕЄѕг@НѓсЄщLоŒл§0RIСXBМxMl.МџжУVC%-ёFЎррђd= DeleteAllSpacesЁџџџџ Ш; цWARNING - This function deletes every space character that it finds in the cells covered by your current selection. 0Do you want to continue?' ”We also recommend that you avoid using it on cells containing date values. Deleting SpacesY \The code has identified an error. This most likely one is that your current selection is a shape (a button or some other drawing object) rather than a cell or range of cells. BMultiple Spaces (Whole worksheet) DeleteAllSpacesfmCopyRightFlagShowFlag 6Abo