аЯрЁБс>ўџ ўџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ ўџџџ!6, ўџџџ4#$%&'()*+-./02ўџџџ35QEЄ8B:;<=>?@A1CDўџџџOGHIJKLMN7PjmS^UVWXYZ[\]R_`abcdefghiўџџџklnopŠrstuўџџџwxyz{|}~ўџџџЁRoot Entryџџџџџџџџ РFpйŠЉѓЃЪ€kWorkbook;џџџџџџџџ__VBA_PROJECT_CUR"9# ЦwЉѓЃЪpйŠЉѓЃЪVBAџџџџџџџџ ЦwЉѓЃЪ€†ЉѓЃЪ | ЭЩР‡сАСт\p Stephen Allen BАaР=гК ThisWorkbookœЏМ=h№мAН$8X@"Зк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_-;_-* "-"??_-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР рєџєР р ѕџ јР р @ р @ р @ р @ р @- р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @  р `@ @ ! р `@ @ " р `@ @ # р `@ @ $ р `@ @ % р `@ @ & р `@ @ ' р `@ @ ( р `@ @ ) р `@ @ * р `@ @ + р `@ @ , р `@ @ - р `@ @ . р `@ @ / р @Р “€џ“€џ“€џ“€џ“€џ“€џ“€џ`…ф CellColourList…KSheet3Œ,Ў$ ColorChart;'СС"Оќ> BlackWhiteRedGreenYellowPink Turquoise Forest greenCyan Dark BlueMossPurple Sea Green Dark GreyMaroonMauvePuceCreamSky Deep purpleBlush Bright Blue Pale Mauve Royal BlueNavyIce PinkLemonAquaGrapeRust Light GreyPale Turquoiseџ"k Д U ЁS єccR | ЭЩР (ѓCя  dќЉёвMbP?_*+‚€%џСƒ„MKhp deskjet 5550 series!@мmп€ d§џBƒe‡@ˆˆˆˆ4š d Arial8ТxBƒe‡ЬкКЬкК\\ACBA\hp deskjet 5550 series,LocalOnly,DrvConvertЁ" d§џр?р?U(џџџџџџџџџ џ џ џ џ џџџџџџџџџџџџџџџџџџџ~ №?§ ~ @§ ~ @§ ~ @§ ~ @§ ~ @§  ~ @§ !~  @§ "~ "@§ #~ $@§ $~ &@§ % ~ (@§ & ~ *@§ ' ~ ,@§ ( ~ .@§ )C~ 0@§ * ~ 1@§ +~ 2@§ ,~ 3@§ -~ 4@§ .~ 5@§ /~ 6@§ 0~ 7@§ 1~ 8@§ 2~ 9@§ 3~ :@§ 4~ ;@§ 5~ <@§ 6~ =@§ 7~ >@§ 8~ ?@9~ @@§ :зD8l&&&&&& џ!џ"џ#џ$џ%џ&џ'џ~ €@@§ ;~ !A@!<~ "€A@"=~ #B@#>~ $€B@$?~ %C@%@~ &€C@&A~ 'D@'BзdŒ>Ж@я7К Sheet1 | ЭЩР   dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U>Ж@  я7К Sheet4 ThisWorkbookџџџџџџџџџџџџ___SRP_b џџџџ"__SRP_a џџџџџџџџ*•Module1џџџџџџџџџџџџ"G!  !ўџџџ#$%&'()ўџџџ+,ўџџџ./0123456789:;<=>?@ABCDEFGHIJKўџџџMNOPQўџџџSTUVWXYZ[\]^_`abcdўџџџfghўџџџjўџџџlmnopqrstuvwxyz{|}~€„ф8йч)RJ…џџ#ˆЖџџџџџџџџ<џџ{јЗяu‹ЕDИР,‰+лrƒРFgгsЛВИlL‚H2їЁФriџџџџџџџџџџџџxgгsЛВИlL‚H2їЁФri{јЗяu‹ЕDИР,‰+лrƒџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSLџџџџSџџџџS”џџџџ6"џџџџš џџџџ<џџ<џџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}џџџџР ``џџџџџџџџH|џk@џџџџT”iƒџџџџ џџ џџџџџџ€ti џџџџ`џџџџџџџџ|џkџџџџџџџџX”€ўџџџџџџџШџџ џџџџџџџџ%џџџџџџџџ`ƒўџџџџџџџџџџџџџџџџџџџџџ %‚ џџџџўџџџ8џџўџџџџџџџџџџџ %џџџџИџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџox=PC#12564599џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ а§џ џџџџ`џџџџџџџџ џџџџџџџџ`џџџџџџџџ џџџџџџџџџџџџр@\Tџџџџџџџџџџџџџџџџџџџџџџа’іL $*\Rffff*0`4cf61e7f$*\Rffff*0l4cf62039пџџџџ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ЉI))IџџџџЩ #4yЁџџџџџџџџџџџџ `ƒ`  I џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЮ W <   $ <   $ 44PrU€€€ џџџџџџџџ@( `Tџџџџџџџџ9#$A `X џџџџџџџџnrU€€€€~|   iЁ y i‘Йс1Y‰С щ( ˆ А€ џџџџШ€ џџџџ€ џџџџ€ џџџџ"а€ џџџџ"0и€ џџџџ€ џџџџ€ џџџџ"  € џџџџ € џџџџ" ( 0€ џџџџ@€ џџџџ€ џџџџ€ џџџџ€ џџџџ" H P€ џџџџ`€ џџџџ€ џџџџ" p€ џџџџ€€€˜€ € џџџџ€ џџџџ ˆ€ џџџџ:а€ џџџџ€ џџџџ Ј€ џџџџ(И€ џџџџ€ џџџџ€ џџџџx" ј € џџџџ€ џџџџ€ џџџџ"  € џџџџ˜џџџџ Эџџx–]ђ@]ђ`]ђ€]ђ ]ђР]ђр]ђ]ђ ]ђ@]ђXэЖWorksheet Menu Bar$>.$xџ (ў $!@“ (!BЖACBA Functionsœ :Ќ ': (!D'<kџџџЧ :Ќœэ Hбl $!@%F.(ЖACBA Functions ((BdџџИэ < $%@.(kџџ˜Ќ'<Ќ':џ 0ў (!@“ 0!BЖOddmentsœ :Ќ ': 0!D'<kџџ0џЧ( :Ќœэ < (%@.2dџџјэ Hбl (!@%F.2ЖOddments 2(BkџџИэ Hбl 2!@%F.6ЖFor Spreadsheet Designers 6(Bэ Jбl 6!@%F.,ЖUnlock Selected cells ,(BЖShowUnlockCells ,(Lэ Jбl 6!@%F.,ЖRelative Hyperlinks ,(BЖShowPostHyperlink ,(Lэ Jбl 6!@%F.,З ,(NЖAbout ACBA String Functions ,(BЖ ShowSMFlag ,(Loџџ0–pЖWorksheet Menu Bar$>B@oџџј–А RB@Toџџи–№ XB@ToџџИ–0 \B@Toџџ˜џџџџ–oџџ`]ђpэ v.f]ђш]ђ іX'  f!r(€џџџџ№ЌЌ f% !Ќ'іџџџџш– oџџш мB@TeМeэ Jбl 6!@%F.,„eЖHighlight Cells by Value ,(BШeЖShowsetCellBackColour ,(Lexeџџџџ`–И oџџ€ ДB@Teeeeeeэ Jбl 6!@%F.,eeeeЖShowCommentAuthor ,(L,ЖChange Comment Author ,(Beeeeeeџџџџџџџџ(Д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…Ёƒols7ўсf1‰С7SpreadbDesРigners`“ЁџcЅdР%  9РјtonI €)Unlock Selected 0cellЅХOnABl  "Show}cC$П1fПЁ Relative ‚Hnrlink}№Post† )ППƒDp'Highl`ža! by Value„8е'seta'BackColxourп”MŸ((C`hangebБр} рAuthoaсBuџ!н€fщ•ŸPЃ*… BeginGroФupРTru Ёi)ЉЇboрЃAсМStpringШНЃcSўML”_№}сW1 ˜ Re€1~ w}ћojbj.Тoƒ1УБfmCopyRћA!ё.бсEєБїaX4“L€8B5_!џ1ЕZ.г 2r/Я…E'gndTesЦt‘S|MyRР ŽRБ"3InVarэб}SЂGl,У!#ф= БBveСC„= в.OffA€0, -1).Т2WA№}Аlа CА…(32€K Sё†riФor0xlor2| џQ`–ѓі`ѕC6qБ fm№@{є пЬuŠ01msГ1яџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј џџџџџџџџџџџџЈ тџџџџ`џџџџџџџџр|џkџџџџџџџџџџ__SRP_6џџџџ-Њ__SRP_7џџџџџџџџџџџџLjfmLockCells џџџџ9…Sheet4џџџџRВ№TдШџџџџ‘)RaaџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@(Lџџ&(Lџџ*(Lџџ4<џџhџџџџџџИџџџџџџџџџџџџџџ$%џџџџДJАџџџџРџџџџџџ`„іџџџџtџџџџџџџџџџџџџ>Tџџџ џџ џџ`„џџџџrџџџџџџџџџџџџџА0џџџџpџџџџ И №џџџџџџџџ8@ўџ xџџџ џџ @ўџџџџџhџџџ џџ P ВИ `џџџџџџџџџџџџ|џJџџџџџџџџџџx„џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ўџџџџџdџџџ џџ џџџџ>HJ џџиџџџџ Xџџџџ џџџџ€ рџџџџ`џџџџ@џџџџџџџџџџџџџџџџџџџџаHpџџџџ`џџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8и ђ `џџџџџџџџџџџџ џJџџџџџџџџџџe„џџџџx@ўџxTџџџ џџ џџџџ@ўџDџџџ џџ џџџџ@ўџџџџџ@џџџ џџ џџџџ@ўџЈ<џџџ џџ џџџџ@ўџ 8џџO џџ џџџџЈџџџџџџ@ўџџџџџ4џџџџџ џџџџ@ўџџџџџ0џџџџџ џџџџИЈџџ џџ@ўџ( џџџ џџ џџ@ўџ@џџџ џџ џџ@ўџXџџџ џџ џџ@ўџџџџџ№ўџџ џџ џџџџ@ўџˆрўџџ џџ џџџџ@ўџаўџџ џџ џџџџ@ўџШЬўџџ џџ џџџџр џџџџџџ@ўџџџџџШўџO џџ џџџџ№ШџџџџџџџџџџШ"џџџџ@ўџџџџџИўџџ џџ џџ hџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџ˜ џџџџџџџџџџџџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp џџџџ˜ џџџџџџџџџџџџџџџџџџ˜pџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ( џџџџ Xџџџџџџџџџџџџџџ @lџџџ џџ џџџџ@ўџ\џџџ џџ џџџџ@ўџLџџџ џџ џџџџА <џџџ џџ џџџџp џџџџј,џџџ џџ ˜ (џџџ џџ @ўџ џџџ џџ џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј џџџџџџџџџџџџЈ тџџџџ`џџџџџџџџр|џkџџџџџџџџџџ~„џџџџp џџџџџџџџџџџџџџџџџџџџИ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 0’іL $*\Rffff*0l4cf62039*\R3*#4e*\R3*#50*\R3*#52*\R3*#4f*\R3*#30*\R3*#4d*\R1*#e8*\R3*#4e*\R3*#4d*\R3*#8c*\R1*#e8*\R1*#2ac$*\Rffff*0o4cf620a8пўЪ‚€€ џџџџ€ џџџџ"€€€ €(€0€8€@€H€P€X€ џџџџ"*`€ џџџџˆ  Р ар ш №: € џџџџ@(H`hpx Ј ИШ а иш/ (@AH& h€ џџџџ€ џџџџ€ џџџџ:€ џџџџ" А и:ј€ џџџџ  8:€ џџџџ$ 8" `:А€ џџџџ" № а€ џџџџ:X x!™QБU‰U]i] ‰pј*@џ: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џ ф:@џ'№ў%'џ%'џ%' џ%ўС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џ@џрўаўИўp80dџ:hџ%xџ$ dxџ Hdџ м)xџdџ8$ xџdџ0 ќЦА  0 ќЦ№  0 ќЦ0  0 ќЦ  0 ќЦ   H$ў €o$ HrU€€€ џџџџџџџџ$`§џџџџџџџџџџџ$Љ`§џџџџџџџџџџџ$б`§џџџџџџџџџџџ$љ`§џџџџџџџџџџџ$!`§џџџџџџџџџџџ$I`§џџџџџџџџџџџ$q`§џџџџџџџџџџџ$™`§џџџџџџџџџџџn<фjxь)RэLџџ#ˆЖџџџџџџџџ<џџюЕ5ю RE˜Lа eлы РF Z75H…4r[д|м–џџџџџџџџџџџџx Z75H…4r[д|м–юЕ5ю RE˜Lа eлыџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџA ЭThen уСcl.С7ЩZ… CСHIf NМex€<O P3rР0Not #mї  €Š`о"(rE €_"’ (" uj‘cont@ains aФ’'" &J & "'.` is procasbover wri юthatEФwaa s‚Б." _ƒA& Ch`r(13)€ '" Are y€šsu9wa Š šСinue.р`vbYeиsNo TЁ_ A">d цžЃ vbќNoЈЁ!Ш с‹+РЫ“_N _N SN џЁ9ocqD TрPr,ЖFя }–1/s!чPџџOI~;/ х/ іr'џЏќOј9Г:u‘.Ъ‚џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџhА„Вršœa Ш`џџџ џџ @ўџPџџџ џџ А@@џџџ џџ @ўџ0џџџ џџ @ўџ џџџ џџ @ўџџџџ џџ (Xџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSPџџџџSџџџџSџџџџSџџџџ<џџ<џџ<џџ<џџџџџџš0{6D317054-1DE7-4333-AAEB-895A4676756E}{C1882C02-7B33-4FA8-8017-8A7C103B920E}ш Дџџџџ`џџџџџџџџџџџџxџ@џџџџџџџџД”€ўџpџџhџџ@џџџџџџџџ%ўџџџџџџџџџ˜џџpџџџџџџџџ %џџџџƒўџџџ€ фtА ‰ Ё)RЦџџˆЖџџџџџџџџџџџџW>%ІѓbДJ› №6пŠ&M‰pHdДsN й AЦ-q­џџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ<џџd<џџhџџџџџ`„p8<џџџџџџџџџ@„t˜Tџџџ џџџџџџ№ `„<иDџџџџџ( €№€` џџџџ(`„œџџџџBџџџџџ`„žx@џџџџџџџџџ`„ џџџџ4џџџџџџџџџ`„Ђџџџџ,џџџџџџџџџ`„Ќџџџџ$џџџџџџџ  (џџџџџџџ !џџџџџџрџџџџ(џџџџ0џџџџ8џџџџ@џџџџHџџџџPџџџџXџџџџ``„Њ№(џџџџџџџџџџџџџ0џџџџЈџџџџРџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџ џџ Ј˜ иp РаџџџџџџџџџџџџˆИxшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШ џџџџА„(:Dњˆџџ(  џџџ џџ џџџџ@ўџџџџ џџ џџџџ@ўџџџџ џџ џџџџ  №ўџџ џџ џџџџ@ўџрўџџ џџ и@ўџаўџџ џџ  а Рўџџ џџ @ўџАўџџ џџ   ўџџ џџ @ўџœўџO џџ (( ˜ўџџ џџ X %h (”ўџџџџ @ўџ’ўџџџџ p€ *@  ўџџџ  *џџ џџИ 0ўџШ Žўџџџџ р 2 Œўџџџ €№ 2H @џџџџX @|ўџџ џџ ш@ўџlўџџ џџ џџџџ@ўџhўџO џџ џџџџp Iџџџџџџ€ fўџџџџ џџџџ˜ JџџрШ dўџџџ шЈ JИ Nџџ џџј Oўџ (   `ўџO џџ  Y0 ^џџ џџ@ \ўџO џџ џџX cўџh Zўџџџџ € dџџџџXўџџџ  d  iџџ џџџџџџjџџџџ˜аџџџџџџџџ Иџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџџџ`ŒŒўџџџ(Јhџџџ џџ @ўџXџџџ џџ @Ш Tџџџ џџ @ўџDџџџ џџ @(4џџџ џџ @ўџ$џџџ џџ џџџџ џџџ`(Ј џџџџxџџџ џџ џџџџ@џџџ џџ (@ўџ№ўџџ џџ @ўџрўџџ џџ џџмўџџ `џџџџџџџџџO џџџџџџ˜и(џџџџ ИџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXџџџџџџџџИџџџџ Xџџџ џџ @ўџHџџџ џџ аDџџџ џџ ffff@ўџ4џџџ џџ џџџџ@$џџџ џџ @ўџџџџ џџ @ўџџџџ џџ џџџџ`pџџџџџџџџџџџџџџџџ0џџџџџџџџ0џџџџџџџџџџџџаdФ`€ џџџџp€ џџџџИ 8!шCШр Ш и€ џџџџP4` 4№€ џџџџ<&G0"CX€ џџџџˆ€ џџџџ >˜CРИ и ш<ш&G "C0 x` иCЈР€ џџџџ ˜ Ш€ џџџџ №€ џџџџ€ џџџџx€ џџџџ X+ˆ р€ џџџџ€€ џџџџX€ џџџџ(€ џџџџ h€ џџџџ"Р€ш€№€ј€€ џџџџ ".@,а€ џџџџ h&j €x€ џџџџ€ џџџџш € џџџџј(€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџШ€ џџџџ" €0€8€@€H€Р€ џџџџ€ џџџџ P".`ˆ€ џџџџА€ џџџџ#а€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ(€ џџџџџџџџ€ Эџџxџџџџp џџA@rџџ–0oџџ]ђ ]ђИ]ђи]ђјэ .цэЖCellColourList ц%ю.bэЖ ColorChart b%h.fџџџџPэ џџ!т.шl– o f!Ќ ш(џџџџx]ђ ]ђИ]ђа]ђ№э .цэЖCellColourList ц%ю.bэЖ ColorChart b%h.fџџџџ8 џџ!тѕ џџq Œ9Šџџџџ˜ џџ!т!ЌЌ f%p!r!t9ˆџџџџp]ђ(џџџџА џџ!т!ЌЖœdџџАџџџџЈqџџџџшЌ9Šџџџџ№ џџ!тѕˆї:kџџџџџџџџџџ@–poџџ0 џџA@rџџ–аoџџ]ђ€]ђX]ђx]ђ˜э 2.цџџрэ ц!l.bї э b!n.fџџџЧkџ jў f“џџ џџ!т!Ќ j!r(€ j!Ќ џџ!(!ЌXœџџ џџџџџџ`d k џџ!(!Ќ$:œџџџџџџџџ№dk џџ!(!Ќ$DЗœ]ђXЮ Xс@`xџџџџ]ђˆ]ђxрMsgBox "Here I am"]ђиђ№ђђ ђ8 џџ!(!Ќ'V4 L X+`Vk џџ!(!Ќ LЌ$њЖ, œ4 XЌ 'X4џЧџ LўЌ VЌ ’џџџџР]ђРЌ'nџЧ]ђи]ђЈџ VўЌ `Ќ‘’ џ jў f“nџ VўШџџ!(џЧ t$:Зœ t$:Зœ ZЌ 'ZЮ Zс@R@ ZЌ 'Zkџџ  V$`Ќ 'n7Ю Zс@R tX Z+Rkџџџџ8 џџ!(!Ќ n V$` n $њ't€3 tX Z+Rџџџџ` џџ!т!Ќ j!r(€k@ j!Ќ V$Rœ= џџ!(!Ќ n џџ!(!Ќ n Ќ $њ't3џ VўЌ RЌ‘’џџ8џџџџ€ џџ!(!Ќ$ˆЗœdџџ@kџџ8ЖMThe program code has not been able to identify a range of numbers! Try again.A@„|џџиџџџџа џџ!(!Ќ$Зœ]ђђˆђ ]ђИ]ђа џџ!(!ЌЌ <Ќ $њX' ; џџ!(!Ќ <Ќ $њX'Ђ№?џџџџ@џ jў f“ j!Ќ   j!Ќ Ђœkџџh џџ!т!Ќ j!r(€џ jўШdџџ8kџџ0џџџџ(Ќ џџ!(!ЌЖ-…'<5џџџџ џџ!т!ЌЖœ"ЖYou must set a colour!A@„|џџшkџџрџџџџиџ jў f“]ђp]ђшџ œўШœ џџ!т!Ќ j!r(€kџ jўШ j!Ќ œœЌ џџ!(!ЌЖ-…'<$ џџ!(!ЌЌ <Ќ $њX 'Њ џџ!(!Ќ <Ќ $њX 'Ќџџџџ`џ œў Њ Ќ’џџџџ  џџџџЖAttribute VB_Name = "fmSetCellBackColourˆ" ЈBasЈ0{D7B03683-CE47-493F-BDA0DA9A86B455}{8ABCBD39-2E52J95-BABF-1C2F05501C11} dGlobal!•SpacoFalse ŠCreatablPre declaIdоTru BExpose0TemplateDeriv–Customiz‹DOption 0liciРt P€"€& Sub cmdCancel_C€k() Un@load M€Q 0 EndgHPighl€t‡Dim wb As Workboo(k ‚ s… sh ee€A MyRnТg RangРСcl CommaPosArray()AIntegфerCMy€ТˆVal… Numˆ xDou€lУ‚,D mˆ, nJo­JpHCiЪjJkHC Startџ@(Х=б Р2 1€jPB €6A LonўgР ЪСwУоСpр= Act›rЂs€Џwb.УSss= ws.UCРБ„t IfР‘.PcombCё.4uСЩ"" Then MsgBox "You m X set a4 c!€rExŒitCQ€ IfУ IsР cc(M€e.txtMyр )„ For Each LIn 'ЂCрclІCDќblЗЁa€' or.СrInd|ex #рMЃ %Ntex _EBˆ!  TestNonContigq= с…Ј%'Х%Here АI am$$! lРxLen #aЁ!mр1 To l 8- 1gс Mi†dO c, 2) И", щ7enР˜n +m СRea| Ёserve k{Оn eх-@ mKП+%,Ѕb_Ah=ЩСС$ТUBounФd(* , 1Œ‹_С e‹@t%…, lў) .… /'ZХ .зЬ@…хo@o/AчŒ/‚dЂ (o!Jџ€ ‚cO"aЏ-4ЁџЅ МАž#+п| w+ ѕ  lue, Х, 3пйбЯАH џƒ X*ѕkƒџрLZ Ёџ—4яTSS?6№DqYџв6Q€/ЈXИ P!ЗbЯѓWЯXЯXur^ПщП $ @ƒ5%џГЇ[бЉ:"o?So eџc#dаŒп‚rбЁш_і€ i€.InSрtr(1,Ёwћp`[ќ-",30PsР#pя_ЋЁ2 iсb)/ ћнi4пш;х ?&?Б‹еu‘™$>=Эз AРЌ&&<=5 Я%џхq&&&O&г=‚&c˜&b+&“ yŽsВM &qLўnр…%sР ч`[_! __s§‘jp & А‰Г?Ц 4ц= jO2…џr*Р0 pп? uŸ‘ЂjП/ џб|-ч—[#wсѕЂp. programАЕde has not been bуto iЄde ЈfyИr‘й of numb0ers! Јpgaјin.8Ї1зЙб1И `7ёКW ЉБ End If Unl@oad Me SubЈPrivate 8 combColour_Change() Dim wb As WorkPbook&s&sheet(MyR4ng.R|&DD…C]oBoxuSetT= ThŒisWs =.Ys("Cell˜List"Я•)l,s.n'•МrКr#Ifь.j.Value@ <> "" cm‡ яƒnewCO„cl Rang€"qARngLC‡Sљ‘ng†У M €AddressiA Integeаr, jJkHJ‹ХФ =€R.txDВp.TexB@<ŒNŒewCD i@‹АLen(ƒ@fj#РSet^= Act€‡Ч_ For Each  ws In@ .A%BbsС(If@.ProtectCo17nts€AЈ Then GoTo Skip ed]K  f=U€БlСF €r@ € .pCell@AС  Eс@C= clŽ.†C…@Not U Is hi@AAч'cm.#'@+… ЋBmOD0х€ InрC(H1, Š,  )§@ 1B'Ћ/Ё€рDelet \Сm‚3€j > 0‡д % Mid(lрi + 1@IUНgW&Ы С3EЂЉзХ э? !38дЩ`šIfs k@8nЊ) * 0.75t@1k < 2і5b1B2uS_Р*€ т_@‘фk5Ts With ‚ .Sh ap4LЁ..Wida`= 90S ‚HрeightР#€ЛqgFr€ј.Characters%СejbL.F Œ.BќolсБAgб ЯбП_ё =ѕгNBX…ŸMhPjs: ѓЙŸpubS tOr`Nќm_ђW`u!tСj@WєpџИoRP8mпpДDAeГhe!O |rr]"YEAЁHandlP ў б#‘E`1VSU U”PRNГс,†"†"c,Ÿ Meœl‡р W‘ExitƒH MsgBoxД " X `! j P‡l does nБ] !ain a B'Д/'." Fh r(13)š"You m sРSct one thatуto u№Ёthis fuтn€qon.ањК\R0*#1d*\R0*#1e*\R0*#14*\R0*#f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\..\..\..\WINDOWS\system32\FM20.DLL\2#Microsoft№dдАџџџџЖV)RУВџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(6 џџџџџџџџџџџџ<џџџџџџ(ˆƒ@џџџџџџ0џџџџџџџџџџџџџџ%џџџџџџџџ˜00`Dџџџџzџџџ џџ џџxP<џџџџџџџџџџИџџџџ`„<џџџџxџџџџџџџџџџџџџˆџџџџџџџџџџџџ`„<џџџџxџџџџџџџџџ`„Šџџџџtџџџџџџџџџ`„Œџџџџpџџџџџџџџџ`ˆџџџџzџџџ џџџџџџ`„Šџџџџpџџџџџ`„Œџџџџlџџџџџ џџџџџџњ:џџџџ`„<џџџџxџџџџџјџџџџH+D`џџџџџџџџ№xџ+и џџџџ ŒiƒFџџџџ џџџџџџџџ€џџџџџџџџ0`„”Pvџџџџџџџџџ`„–џџџџtџџџџџџџџџ+џџџџ`џџџџџџџџА,џkp џџџџ&ŒiƒFџџџџ џџџџџџџџ€џџџџ+ˆ0`џџџџџџџџА0џkа џџџџŒiƒFџџџџ џџџџџџџџ€џџџџ˜џџџџиџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџhhPџџџџXџџџџ Шаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџрџџџџџџџџџџџџџџџџ€џџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXˆ@ўџh`џџџ џџ џџџџ@ўџџџџџPџџџ џџ ˆ@ўџ˜@џџџ џџ џџџџ@ўџџџџџ0џџџ џџ џџџџpџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџ(џџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPx`џџџџzџџџ џџџџџџџџџџџџџџџџњ@џџџ џџ џџ@ўџЈ\џџџ џџ џџ@ўџџџџџLџџџ џџ 0@ўџи<џџџ џџ @ўџџџџџ,џџџ џџ џџџџhџџџџџџџџџџРџџџџаџџџџ˜џџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8’іL $*\Rffff*<?4c9705d5*\R0*#13*\R0*#fпўЪ=€€ џџџџ€€ џџџџB € € џџџџH (8@`h€ џџџџ€ џџџџB x€ˆ€€˜€ џџџџЈ Р.ш*€ џџџџ & @HPX€ џџџџаир€ џџџџ€€ џџџџB `€р€x€€€ џџџџˆ€ џџџџ. *Р€ џџџџј€ џџџџ(p@HP€ џџџџh€ џџџџ€ џџџџ€ џџџџџџџџxЭџџxЭ–˜iџџ`]ђ˜ <Ќ œr(1,З'DdЌ FЖ, …'< Ћ‡З'Dkџџџџџџ–iџџh]ђШ]ђр]ђјџџџџHЌ FЖ-…'<ns <Ќ œfbdџџxЗ'ˆkџџh FЌ <Ќ $њ'Š6c F <Ќ $њ'Œ Š$:З Œ$:ЗœЗ'ˆdџџЗ'ˆkџџ@–0iџџ0З']ђ(]ђ@Ќ FЖ-…'<0. FЌ <Ќ $њ'ŠR F <Ќ $њ'ŒџџџџР]ђpђђЌ ŠЖ.…'”Ќ ŒЖ.…'– ”Ќ –Ќ œdџџxЗ'kџџhџџџџ`џџџџXџџџџрџџџџxџџџџзБAttribute VB_Name = "modCellBackColor" Option Explicit  HBase 1! FuncJTestNonContig(Str As ing)Boolean Dim iInteger%Ii…In-(1D, ?, ") If/> 0а The? "p;True ˜ElsFaРEnd If8_eIsNumericRangюeЏenN1fr—€€ƒz 2Œ ”} -"}.= MidP, œi -< 1€…€‚5 i ђ+Ц A €W=‚хA)U ALХD‚џA†‡d‚ OЦeЧfџ hB imKd)skԘ2s,Џ1HЊ2Ÿ‡uBdМЕ{ †ŽЇWwF‘Tv €˜1РIЗ д(€г.A•р2эŸЁ:хBn‚ЁnOrс ф2 +pIsI+  Ѕ2џb6c<,„tЧ; ipсp__SRP_4џџџџБЌ__SRP_5џџџџџџџџџџџџЬБ_VBA_PROJECTџџџџ“– dirџџџџџџџџџџџџЯЖ§џџџ‚ƒ„…†‡ˆ‰q‹ŒžŽ‘’›”•–—˜™šœўџџџŸ ПУЃЅиІЇЈБЊЋЌ­ЎЏАЂВГДЕЖЗИЙКЛМНОўџџџРСТФЧХЦШЫЩЪЬЯЭЮагбвдежмзйўџџџклнўџџџопўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ фt% “ )RrhџџˆЖџџџџџџџџ\џџњЮНŽ%TBЙœdђ.:WэЇїЋ/GнИgЪќ%иИг jŽiE˜(” ­uяб5]ЬM]єG˜Э@ŒoЌџџџџџџџџџџџџxб5]ЬM]єG˜Э@ŒoЌњЮНŽ%TBЙœdђ.:WџџMEџџџџџџџџџџпџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ ”џџЖ ”џџd(џџК(џџh6"џџџџџџџџџџџџџџџџ*џџџџLџџџџLџџџџPџџџџ џџџџ”џџџџџџџџџџџџLџџџџLџџџџLџџџџ”џџџџ`1lџ5Xџ llџћ0Xvllџhџ œhџ hhџ^'˜ў'Иў'иўѕ:Hџѕ Xџ Xџћя8џѕ (џ (џћяџ:џ ћяјў 6Xџ8џ(џџјўиўИў˜ўl§œhџ $  hџiф№4pџtџxџlџ0 hџXџ8џ(џџјўиўИў˜ўDH4HrU€€€ џџџџџџџџ`$`Аџџџџџџџџ$A`Дџџџџџџџџ$`ИџџџџџџџџnВД€0* pH‚dф VBAProjeˆct4@j = џ_EvaluateйWorkbook_BeforeCloseВзCancelё˜Ќ(Reset> Workbook_Open›с Ќ(CmdBarContrl/яModule11VCmdBarCБ CommandBarCmdBut)ДCommandBarControlPХCmdBut1ЅќCmdBut2ІќCmdBut3Їќ CmdPopBut‡wCommandBarPopup  CmdPopBut1bC CmdPopBut2cCFlag›ўi` CommandBars ControlsЬKCaptionx€џIndexёПAddїrmsoControlPopupl)msoControlButtonnѕOnAction„  BeginGroup‰Ж Ќ(ShowSMFlag#j fmCopyRightFlagѓyShowѕЌ(ShowUnlockCellsы2 fmLockCellsЈ1Ќ(ShowPostHyperlinkp fmRelHyperћ/cmdCancel_Click\еcmdUnLock_Clickђbws–_ WorksheetСўMyRngRЛRangeк clа\ ActiveSheet%N UsedRangeШ‰Cells€џInterior;фColor2F €џActiveCellНЗLocked UserForm_ActivateZs ErrorHandleі_ CurrentRegion|” ColorIndexгуxlColorIndexNone‰BMsgBox—RtxtColor/х BackColorоƒ BackStyleqЎ€џfmBackStyleOpaqueэ Sheet4ыcmdPostHyperlink_Clickз5CellValР‘ToolTip[ETargRng7зmyReplyP txtCellEntryЛїtxtTarg\Д Hyperlinks:•Count0vAddressЇХ SubAddress+M ScreenTipЭз txtToolTipЯQ TextToDisplayŽŒ€џValueфKChrK~vbYesNovbNoЇ% OKBut_ClickТєWorkbookk €џBeforeClose~;ItemзzUserFormNLabel1,Label2Ž,Label3, cmdUnLock3ƒ cmdCancelЭLabel4,€џClickŠу€џActivate—|cmdPostHyperlinkСLabel5‘,Label6’,Label7“,Label8”,OKButв UserForm1)ж fmSetCellBackColour:лtxtColor_Change%™ Sheet1ш combColourЋ‡UserForm_Clickлјwb…_MyDDЙ–€џComboBoxЗ\ €џџџ_B_var_set €џWorksheetsМј€џ_DefaultjТЌ(CellBackgroundTestЁ` €џџџ_B_var_SubН’InVarZInVlaр invat\ €џџџ_B_var_invatˆуInputBoxЯ €џEnterХЭcolourЖJInValT €џџџ_B_var_Inval€уmrng#ˆ €џџџ_B_var_mrngэ€џOffsetшЊmyng.˜€џList*“combColour_ChangeWP€џChangeЃЧ interiorcolorћl colourindexR– €џSchemeColorЫx €џџџ_B_var_withYБ €џџџ_B_var_ForjLmyItems`€џListRowsF €џџџ_B_var_IfPђ€џfmBackStyleTransparentytxtMyNumЕE cmgHighlightђсcmgHighlight_Click0Њd9om‘ €џџџ_B_var_d9om§t€џActiveWorkbookЂfoeL €џџџ_B_var_foe]L _B_var_Chr\; IsNumeric$*tnenIй Module1b modCellBackColorХЦ €џџџ_B_var_Optionьs Ќ(TestNonContig6TestStrтг€џџџ_B_var_Function™O€џџџ1Hmd MyIntArray|†€џџџ_B_var_MyIntArrayцє MyNumArray~Ё€џџџ_B_var_MyNumArrayЉlcneofiontnapg CommaPosArray)€џџџ_B_var_CommaPosArrayыќ _B_var_Midэp €џџџ_B_var_redim•Вcommapo)^DinХƒ €џџџ_B_var_Dinж@StartValPт CommaPosVal— €џџџ_B_var_uboundлdArrayValА €џIsNumbermЎ€џџџ_B_var_IsNumberі… arrayvaleSж€џџџ_B_var_oЂstarval”/€џџџ_B_var_starval—# myintarry}Ж€џџџ_B_var_myintarryAЬayџ  ф*\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.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\system32\stdole2.tlb#OLE Automation(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 11.0 Object Libraryо*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library *\G{205CFBA3-159F-4AE5-95D5-B2F417B010FE}#2.0#0#C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д   џџџџџџ’іL џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ)R ThisWorkbook0`4cf61e7fџџThisWorkbookџџJ…џџџџ%џџModule10l4cf62039џџ>Module1џџaa№џџџџџџfmLockCells1?4cf624ffџџYfmLockCellsџџџ‚0Kџџ Sheet4;S4c9702b2џџ Sheet4џџэLHђџџfmRelHyper1@4cf624ffџџ]fmRelHyperџџЦ`ЇfmCopyRightFlag1A4cf62500џџSfmCopyRightFlagџџХБxСџџ&fmSetCellBackColour1B4cf62500џџн&fmSetCellBackColourџџ#4& Sheet1;I4c96fe34џџс Sheet1џџаЄАњџџ modCellBackColor<?4c9705d5џџ@ modCellBackColorџџУВа\џџfmCommentAuthor0o4cf620a8џџЕfmCommentAuthorџџrh№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`џџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHxџџџџџџџџџџџџџџџџџџџџ;fˆ41ЋLNˆЛСП‘џџџџ,e~TШƒ@ƒrCO1YРџџџџЮЯуђ‹"IŸJыuЪкyџџџџ‰юеseМAЛсэ!S+џџџџiлLж §GЛ p|žщјAџџџџŸЏЋpFИ+мKЬ џџџџмУ]а„OƒЄu‰ЛЩЦџџџџџџџџP,˜M Ы уFГй”ё{]џџџџџџџџHХ FъJ›n–t…UKџџџџџџџџА‰PњLYѕhDˆX›­ѕуЖgџџџџџџџџа€ёџ,I €џAs €џBase=€џDimC€џEachD€џElseR€џFalseT€џFor_€џIfb€џInj€џIntegerx€џLong{€џMe‹€џOption€џpreserve›€џredimЄ€џSetЏ€џSubВ€џThenГ€џtoЗ€џUBoundР€џWith Excel€+ VBAїтWin16С~Win32MacГВVBA6­# VBAProjectОПstdole“`OfficeuMSFormsC Œ(џThisWorkbook|у €АcnumЛЌ(IsNumericRangeС Test1StrЮжTest2Strlœ €џџџ_B_var_True!VЌ(IsIntegerRangev‘TesStrU–Str1F5Str2G5isinyegerrange ‹€џџџ_B_var_isinyegerrangeн1jakbStartNummКEndNumˆГ€џџџ_B_var_TestStrfз€џџџ_B_var_TestNonContigьIntArrayЃЪStartIntДžEndIntЯ—ArrayDimж­ShowsetCellBackColot9FЌ(ShowsetCellBackColour!‚ fmCommentAuthor‘“ cmdOK_ClickИcmб\CommentHsnewCmRngUЯAuthorќ newAuthorГЋ CommentString•} AddressStringъn txtAuthorрF txtNewAuthorъ{ProtectContentsеЫSkipProtectedWorksheets?HDeleteИx AddCommentŒбShapeТHeight|‹ TextFrameуЩ CharactersrgFontUBoldƒљcmdOK'Ќ(ShowCommentAuthor%КџџРџџџџAџџџџџџџџџџџџџџџџџџ џџџџџџџџџџS Y  ]нсџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЕ џџџџџџџџџџџџџџџџџџџџџџџџ?  Д*€@@r ’іL ” J< r€stdole>stdo€le h%^*\G{00€020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`ƒEOffDic„EOf€iдc‚Ež€”€E2DF8D04C-5BFA-10€1B-BDE5€EдAA€C4€2ˆE€˜gram Files\CommonMicrosoft Shared\OFFICE11\MSO.0DLL#‡ƒM 1@1.0 ObС €LibraryK€MSF€orms>SFЇrms3€ІD452EE1-E08F`A-8-02608C@4D0BB4SFиM20L'B Р_Ь&ш/;"1РƒjIqAHq00}#0Bq#Р €ž50Ѓ € …РA205CFBA3-159F-4A€e95D5-B2F417@B010FEˆ6DOCUME~1\ STEPHLOCALS@Tem`p\VBE€b7.xexdˆc<Р!€с.E р…€.`ŒM Дз"‚в Т)R‚МThisWorkbookGЊРTОiРkWBnkbРok*Ю 2к РЊHB1‚р%@ˆBE,Т!J…""+ЂƒHoduleT1G„Ho`rubr17€ЂL2ЏD­aa!Њ  fmLockC€ellsGUРVL€c€C plm`s Œ2˜ЏKRЏџ‚c (€%!“SheetT4G"/Sр2eРtl4€Ї2ЎЏђ2ЏэL+/ЌfmRelHyper(GD RBHhyp r`+2›6яЇр*m1ЦБЁmCopyRightFlagŠGР8`ЂmC 2‚pRigР""tРŒla`е2oС`ЬmХБqbSet GBa€Holou­@(& HS't тe HlB cJ!Э0ou*”2нŸlР!o€mќ#4qцIРnфЇMn+Ї­M10'њАMаЄ‡ЃЅ[Р`mod)&е mа dЯP‡qЁПor2ПerП \€jУВлA%%mmenti{ho  ДБ(mQ0enаƒAаt§)o2p b3rh‘rU€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ џџџџџџџџџџџџ џџџџ џџџџџџџџџџџџ   TestStr й q  й __SRP_0џџџџЉ>7__SRP_1џџџџџџџџџџџџтkfmLockCellsџџџџ2 €†ЉѓЃЪ€†ЉѓЃЪfџџџџџџџџџџџџbРF ACBA Functions РFControls Oddments  РFTypeAdd 2For Spreadsheet Designers *Unlock Selected cells ShowUnlockCells &Relative Hyperlinks "ShowPostHyperlink 6About ACBA String Functions ShowSMFlaghЯ- It@Жћ 7\H—::ЭkVэ§ы@ПN I/ЬЗ’гljDИ@•аpQ% ЇaŒ!ю\УDЌfЉЦ БЄЖд˜`бР CЖЊ)ЙИПLabel6Label7Label8OKBut­ЏЮ„ЂEЄ ‘ьІв7ё ёџџџџ џџџџщ а OKBut_Clickпа„•„HЗX˜єщ€Жœ(1rj=шBЖЪє/lяŒ2Г§ьsЬM”•л‰йЈŒч,ѓxcд CЊQ yъDu№šж u N„vыU š*2 cmdUnLocktxtColorLv ђeH†GЉ§ОШ DжЪŠтё™sC‘[ИэCЦWy ™џџџџ џџџџщ cmdUnLock_Click \ >ЭŸG“)E{7Ѓ?      ўџџџўџџџўџџџўџџџ& !"#$%ўџџџ'()*+ўџџџ-ўџџџ/0123ўџџџ5F789:;<=>?@ABCDEўџџџGHIJKўџџџMўџџџOPQRўџџџaUVWXYZ[\]^_`ўџџџbcdefўџџџhўџџџjklmnўџџџ~qrstuvwxyz{|}ўџџџ€BkЭ+‘@пBŸF„i(;k6)TдbБ<~Jаž€т5 ?pўчЇiMЏЕ}“ђЇ+дэа€тЌNœZa& Цшћ txtToolTipcmdPostHyperlink txtCellEntrytxtTarg?ЄЫЫ‚vєMˆqжкЏіSф џџџџ џџџџщ PcmdPostHyperlink_Click DAre you sure you want to continue. $Cell contains data‹)’љѕщD‡х‚V‘ЕXAќ,ф˜cі@‘‡йŽ‹[Ќh9 оBoth the active cell value and the target range cell must have valid entries. You will be returned to the form.0DРF1DРF DThe active cell contains a value ' r'. This process will over write that value with a string.пЪ,ЇЎђC›ЏCШПг џџџџ` `& This function only operates on cells that contain a coloured background.2 РAn unknown error has occurred, but the most likely reason is that this worksheet is 'Protected'.3ДGц[ЕЛFГ–M7‘ РFяљ`TmNLЕV'и.vedDРF Worksheet йџџџџ џџџџщ р џџџџx №b8 |НЩFВSi2 Х(|0kцСFЏ[ЙaЪu-ъᘠOИJь3šy/й c(!е_jHГryЇаю:Йл"uИ‰9IГЮCЭf$м™ЂћлјDИF€ЁЗŸ G‚чаЕtO”*$UhDЅ С)џџџџ џџџџщ pC3ƒНg*CЄЈmcj+ї?‰ ѕцjOЄj}нў[Z.3• KЗk g‡пџТЛc(гD)то‘їёСƒВЮ)MF„Qeч6ВtЌ с*џџџџ џџџџщ Аѓ™'X‰ЩфHЋуUчGЄ†,pфq B•пžЖ=њypgСmkЩЩƒAЇOІt^Mќт8A:ё…Њ`LЕїq‡4Ѕ“Ѕ Сџџџџ џџџџщ №Lћ3jYяŽKƒ~„Zx#ј ސ8њќGНЉ3оЪRбSЦEѓ?кbCœa“•,Ц›*b•*œsJМрЌ˜юе№ДcьјЄНBŒn Q…’ -џџџџ“K*y џџџџ  rU€ €€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~q ёF{Ќ'HcA™‚ЏкŠ2f  фџџџџ ƒŠa !џџџџСљџџЙˆa ‰џџџџаџџџџЉСсЁбйT™[џџсƒџџџџџџџџџџџџџџљƒŠa !џџџџџџƒџџџџџџџџџџџџџџ1ƒџџџџџџџџџџџџџџQƒџџџџџџџџџџџџџџyƒŠe !џџџџџџЉˆa ‰џџџџр џџџџa!:‰>џџСƒ€a сWџџџџy СW џџёUБ щ щ ThisWorkbookModule1 fmLockCellsSheet4 fmRelHyperfmCopyRightFlagfmSetCellBackColourSheet1modCellBackColor VBAProjectяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA џџџџ 9Ё0РF4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcelыІВyAмI‡ОъИЋ џџџџ1Љ@0РFC:\WINDOWS\system32\stdole2.tlbstdole aџџџџ‰бPLај-њ[НхЊDоR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice Aџџџџiё`с.E р….`ŒM ДC:\WINDOWS\system32\FM20.DLLMSForms aa‰бpЬП‰ЌвEG™{Nч@bк­ 2C:\DOCUME~1\STEPHE~1\LOCALS~1\Temp\VBE\MSForms.exdш0Џн1FМ,KqџІV Aaiб€ TestNonContig ьбэё_щLМž50]=aфФ]ЈЛCˆœ‡цгсbў№а„љцR@ƒm.OюRtП KmF”"хžсЋœŸіЎ‰КЦЦG…чc/yj<"žŒ—АдЮП-Њ?@аLabel2!ш-ЌЂ6Я€SЊ` њ Б џџџџџџџџби2в‹BьЮž Њ`ѓ combColourLabel3С{lЏЮŸFЊWJO cmdCancelв‹BьЮž Њ`ѓtxtMyNum cmgHighlightLabel4Label5Ш[qJ—І eР‹UserFormюОp‰Д?OЄˆАAЎб˜” F3Dynamic С џџџџ џџџџщ шLabel1cmdCancel_ClickcmgHighlight_ClickcombColour_ChangeUserForm_Activate dРFйРFQ y џџџџкРFиРFв‹BьЮž Њ`ѓFРF3в‹BьЮž Њ`ѓpРF Here I am#=ћќњ hЇ8+3qЕРG?,2qЯ”ЊЇLаёџџџџQ јVBE6.DLLShowPostHyperlinkCellBackgroundTest џџџџ1  џџџџS (ёH€ŒŠЪЋQMŒЊdd"ќ§РFЋЛmaС>{IŠ[B$їКADРFWorkbookWorkbook_BeforeClose Workbook_Open @ CellColourListзРF ColorChart Interior Color ,  CmdBarContrlReset ShowSMFlagShowUnlockCells $Worksheet Menu Bar РF РF џџџџщ 8є#BъепGД&31{ шЧb§тЄiC‹‘4& ` ЎьЮkCZAƒЫ„б›{ьŒ~7Й%Е]@ЅW_ыОw%gJтцЇ0D”šЇЦ<Иof !.џџџџ џџџџщ xŒ [КmsK™ОlьЯя аХ‰3кžСхIЌЌ.С­^]ЦiŽ \щB›)+Џb„ИNRй№B‚nЬ<ЮUrЛ{Ем™/HDškАи cd A/џџџџ џџџџщ И‘СЫ–SйAŸЖNvtyЫuMБ`HтH‰2 ›РZЎŒћ сAЛ{Фџn‘%јЂЪGFPNžKnlЃПЦыГЁnхHœеYРДm 0џџџџ џџџџщ ј‘Џ?†БИI@Гь‹ЋяЁГ§šуњe?­AŠЬ)‘ѕћЈ,ёјѕОПVE•—С‰e#?"Ц$Љ^HЉlЫчЄlhљS)Р>нJ-ј“Ї§з Ё1џџџџ џџџџщ 8ЛTдUЦІLПIшІ_BўAm=ВB nщLш~БЯ){ЗёНB’7ШзˆЫy}‹6ЁјB’ЭžжŽt&К8uwчЩI˜ђЗТкz†Р С2џџџџ џџџџщ xZЯœшŸXFЖlOоHЬ;9О*X„WMA•8ьvћR$фwL7ЮЇBЏCїT ЌЅbщ™‹ј9ъжHБт^ƒNJLp/тсQуcM€`N‘^ŸЁL с3џџџџ џџџџщ ИкL˜<šЦЃuВ]нV­:ХђўЏц@„NТ>А^œNЈјx€с@Џ-8 ’ЈRЖnF‡"JМiщЈЅ-žщGpоф—BЕЊ+&K(ИК ;џџџџ џџџџщ PXєFЇNCМёLИ‰0љd”euЮ*HЃ7ЧV …nзРГAЄy8Ў Д•ж( šThe program code has not been able to identify a range of numbers! Try again. -ђ1kБG•c+Lв…RЩ4ŠbїаJ‚но2CпU^йŠГЏ>KާmЬеЫЦЬ€;™ИmG‹Г4У*ЁIм5€‡Џ@†О#УЧг >џџџџ џџџџщ IsIntegerRange_UeнO H‹sъ ŒЛЂ5–VKnIЇyЗХВYЖ’uiHšzJNНД3QrpŒ­i‚ь@ЛW.™`Ц›6VќџЖ-BВўЪ,!r Q?џџџџ џџџџщ шS|ют€CЉ 0ue5дc5ЇOŸЧNa‘;ЕEgз @џџџџ џџџџщ ј .O HŽGИ№GtК" й ВuѕЊL–ЖwИrКDќ`2ИйЄDBž}жУŒPE№ЋJt<ЌEЌъГК'ьa щ7јиK•ЭЈп|‰ќ" AAџџџџ џџџџщ €žŽжЃcCПЋeОўНЗOP_чŸa”~OŠь›TM„JŽКzOЧйDГ”Н-Š‹@Й>Е‹дUЯFЋРŠМ< ƒїВ~X€юOЈнмiEs aBџџџџ џџџџщ Ріsњ†ЋН@hЅЋŽа'Xв`ЮЎYC!нМЕDЏp‹Cms`xMˆпГXкЁho_d§=NЕЇ!9iЌ‰‹СЖ^”Хš)N˜‡}іЎ•Fq Cџџџџ џџџџщ y4вђrЇŒHЈДяb:bМъгfЯA&|1@КUЭFfQe/y_ЮaАdFƒ"™3…‚(лŽь О єШCŽМЭ:^ђlfp}iйї@Ў!ŒЄВmЮ ЉDџџџџ џџџџщ @ ,You must set a colour!іГ=B]@M†,ЊРР'{\ HV8=(EЋqжcW…!TаЛУ—/ИJЏ;~ббЪ-dФ$ЁСЊeУJŠж%9Z}С[0ЖЮO3”IП]ЃiС oЅ 9Fџџџџ џџџџщ € Ђ^3ЊŠ&ьO†јЧwљуЮ‘ wп/бD{BЏЁa,4GxаеЪ˜§ХDЃыzV…•WЏЗЋѓCЛ8хЏЄ~EИрщј1щО~@<ы\ˆZ1g YGџџџџ џџџџщ Р вт єРq\C F*ѕJкUќЭяЂ)DД *Ъ<љr†ЁэxwbЯэAЖ‚?ьЏšаѕRёыР/T–FПв!—б?Hїџ'dgТCкФ<–@4 Hџџџџ џџџџщ 0 {јЗяu‹ЕDИР,‰+лrƒgгsЛВИlL‚H2їЁФri~dЮ6“MˆFDl…л˜Hi[уд=F…HМкbEљIntArrayВЉлoїЕЛOŽ с…aћІ*й=IJO’‘‡ЉisС†[xsГУBАа‘/  Œ_Д[џ8•ДD 0Oи­м4X€8BЛШŠ \ТY ON йi GЕьщђПв„ ‰Jџџџџ џџџџщ ьАx˜,ЋF‚<~XеQ_кQь-ŠДtB—*Ж>ј:\l’ХгXPПНуy ИTesStr y?y Ш 1@y и iAy ш ‰By ј ЉCy  бDy  aFy ( Gy 8 ЉHy HStartIntEndInt БJy X Ly h QMy x СNy ˆ Py ˜ )Qy Ј IRy И iSy Ш Ty и Wy ш A[y ј Љ\y  Б^y  `y ( )ay 8 Iby H    }t 94‡ (ѕ€l(Y€Control the 'Locked' status of the cells in a worksheet based on their background colour.ФO ї€@ЅМTahomaФ(Б€This form will apply a 'Unlocked' status to all cells on the current worksheet based on the interior colour of the active cell. See the text box below for the background colour.r—іu€ЅTahoma€H€,{5€ЅTahoma8(&€All otheo!џџџџќCompObjџџџџ"џџџџaVBFrameџџџџџџџџџџџџ>fmRelHyper8(%€†ЉѓЃЪ€†ЉѓЃЪr cells will remain unchanged.}ФЈu€ЅTahoma (€'Unlock' Cells; Ou€ЅTahoma(€Cancel; Ou€ЅTahomaX(G€NB This function does not set the 'Protection' status of the worksheet.—{ ї€@ЅМTahoma2”Label1Їд(ѕ€2фLabel2ді$х€4txtColorіь (ѕ€2XLabel3orЇ; (х €@cmdUnLockRanЇ1(х €8cmdCancelRan‰1(ѕ€2€Label4orдтўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmLockCells Caption = "Unlock Cells based on Cell Colour" ClientHeight = 3225 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 12 End (H  @џџ}t 9Rу ‘ЮуЊKИQDBTahoma ‰ (ѕ€2xLabel1orЇP(=€Hyperlinking between cells or ranges on the active worksheet.з Ф" ї€@№МTahomaor@(0€Current entry in active cell - edit as required.ЮЇ5€ЅTahomaor€H€,Ф,5€ЅTahomaor<()€Edit the Tool Tip value - if yoy want onfџџџџџџџџџџџџїo$&џџџџДCompObjџџџџ'џџџџ,aVBFrameџџџџџџџџџџџџ.KequiФЇ5€ЅTahomaor€H€,Ф,5€ЅTahomaorL(:€Specify the Target cell or range in the form: A1 or A2:B30etФЈ5€ЅTahomaor€H€,g ,5€ЅTahomaor (€Post a HyperlinkЩu€ЅTahomaor(€Cancelorg Nu€ЅTahomaorд(ѕ€2`Label2orЇЪ(х €4txtCellEntryЇq(ѕ€2\Label3orЇь (х €4txtToolTipryЇ“ (ѕ€2lLabel4orЇ$х€4txtTargrЇЖ,х€@cmdPostHyperlinkЖЖ(х € 8cmdCancelperЇ1 ѓџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmRelHyper Caption = "Insert a Hyperlink Relative to Active Worksheet" ClientHeight = 3225 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 14 End (H  @џџ }t H!Rу ‘ЮуЊKИQDBTahoma Œ‰ (ѕ€2HLabel1grЇ ( €ACBA Oddmentsink№N ї€@;МTahomagrP(?€Functions for Spreadsheet designers to contrfmCopyRightFlag -*€†ЉѓЃЪ€†ЉѓЃЪfџџџџџџџџџџџџ4ѓo)+џџџџ6фCompObjџџџџ,џџџџLaol and guide users.—O ї€@ЅМTahomagr,(€Version: 1.001- October 2007ЕЈw€@ЅTahomagrФ(В€These functions are available for download from the ACBA website free of charge. The source code is left unprotected so that users can inspect, copy or change it if you so wish. r—#5€ЅTahomagrd(S€Technical help on all ACBA Functions is available on application to the user group.—Ou€ЅTahomagr@)џ,€http://groups.yahoo.com/group/ACBA_Functions—Їw€@ЅTahomagr8)џ"€http://www.acba.co.uk/oddments.htm0SЈw€@ЅTahomagrP(=€Copyright over the original code is retained by ACBA (UK) LTD.N ї€@ДМTahomagr(€OKе тOu€ЅTahomagrд(ѕ€2xLabel2grді(ѕ€2PLabel3grE (ѕ€2фLabel4grд“ (ѕ€2„Label5grди(ѕ€2dLabel6grд'(ѕ€2\Label7gr"‰(ѕ€2xLabel8grЇЂ$х€ 4OKBut8grEФ ѓџўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmCopyRightFlag Caption = "ACBA (UK) LTD" ClientHeVBFrameџџџџџџџџџџџџN.fmSetCellBackColour(џџџџџџџџ/€†ЉѓЃЪphˆЉѓЃЪfџџџџџџџџџџџџSКo.0џџџџT$ight = 4830 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 10 End   }t  Œ‰ (ѕ€P(>€Select background colour of the cells chosen for highlighting..Nu€ЅTahomagrA!€X€,'{5€ЅTahomagr€H€,ћ{5€ЅTahomagr (€Highlight Cellskg Ou€ЅTahomagr(€Cancellr“ Ou€ЅTahomalrH(8€Place the number or number series in the text box below.ё{ ї€@ЅМTahomalr<(*€For a range of integers use the form '2-4'№Ї5€ЅTahomalrD(3€For a range of decimal value use the form '2.0-4.0'e№Ї5€ЅTahomalr|(k€For a series of values not in a contiguous range separate the individual values with a comma e.g. '2, 6, 9'№{5€ЅTahomalr2pLabel1lrЇд(х €<combColourCeі"$х€4txtMyNum"(х €@cmgHighlightOR(х €8cmdCancelght1R(ѕ€2pLabel2umЇq(ѕ€2\Label3um{Р (ѕ€2dLabel4um{; (ѕ€ 2œLabel5um{Жўџ џџџџMicrosoft Forms 2.0 FormEmbCompObjџџџџ1џџџџgaVBFrameџџџџџџџџџџџџiNfmCommentAuthor џџџџџџџџ4phˆЉѓЃЪphˆЉѓЃЪfџџџџџџџџџџџџoŽedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmSetCellBackColour Caption = "Highlight cells based on numeric criteria" ClientHeight = 3780 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 13 End    }t љ`ˆ (ѕ€o35џџџџp\CompObjџџџџ6џџџџ„aVBFrameџџџџџџџџџџџџ†>PROJECTwmџџџџџџџџџџџџ‹$(€Comment AuthorshipЁ{ ї€@МTahomaumt(c€This form is designed to remove the name of the author for all the comments in the active workbook—{u€ЅTahomaumЈ(–€The text box below shows the name of the author of the comment associated with the active cell. This process will only affect comments by this author.Ф"u€ЅTahomaum€H€,{7€ @ЅTahomaum(€OKе O ї€@ЅМTahomaum(€CancelumO ї€@ЅМTahomaumЌ(™€If you want to change the message string so that a new "Author" appears in bold at the beginning of the string, enter the new name in the text box below.—#u€ЅTahomaum€H€,{5€ЅTahomaum2LLabel1umOд(ѕ€2”Label2umд"(ѕ€2ШLabel3umЇE(х ‚ƒўџџџ…ўџџџ‡ˆ‰ŠўџџџŒŽўџџџ’“”•–—˜™š›œžŸ ЁўџџџЃЄЅўџџџЇЈЉЊЋўџџџ­ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€8txtAuthorRan{; $х€<cmdOK3umЇЂ(х €@cmdCancelRan‰Ђ(ѕ€2ЬLabel4umд‰(х €4txtNewAuthor{ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fmCommentAuthor Caption = "Change the Author of Comments" ClientHeight = 4350 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 12 End ThisWorkbookThisWorkbookSheet4Sheet4fmLockCellsfmLockCellsModule1Module1fmRelHyperfmRelHyperfmCopyRightFlagfmCopyRightFlagfmSetCellBackColourfmSetCellBackColourSheet1Sheet1modCellBackColormodCellBackColorfmCommentAuthorfmCommentAuthorID="{FFF0D801-8707-432C-9AB3-F312187248AB}" Document=ThisWorkbook/&H00000000 Document=Sheet4/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=fmLockCells Module=Module1 BaseClass=fmRelHyper BaseClass=fmCopyRightFlag BaseClass=fmSetCellBackColour Document=Sheet1/&H00000000 Module=modCellBackColor BaseClass=fmCommentAuthor Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="1E1CD7FBEB070D0B0DPROJECT7џџџџ‘ SummaryInformation(џџџџ:џџџџЂрDocumentSummaryInformation8џџџџџџџџџџџџІDCompObjџџџџџџџџџџџџЌm0B0D0B0D0B" DPB="3C3EF5190D360E360E36" GC="5A58933FB040B0404F" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=110, 110, 706, 528, Sheet4=0, 0, 0, 0, C fmLockCells=44, 44, 435, 462, , 0, 0, 391, 418, Module1=22, 22, 618, 440, fmRelHyper=0, 0, 596, 418, , 44, 44, 640, 462, fmCopyRightFlag=0, 0, 0, 0, C, 110, 110, 706, 528, fmSetCellBackColour=88, 88, 696, 450, , 66, 66, 674, 428, Sheet1=0, 0, 0, 0, C modCellBackColor=132, 132, 535, 494, fmCommentAuthor=176, 176, 784, 538, Z, 88, 88, 696, 450, ўџр…ŸђљOhЋ‘+'Гй0А@H`x  œЈфStephen AllenStephen AllenMicrosoft Excel@€XИ] Ш@€†ЉѓЃЪўџеЭеœ.“—+,љЎ0 PXh px€ˆ  дфACBA' CellColourListSheet3CellColourList!ColorChart  Worksheets Named Rangesўџ џџџџ РF!Microsoft Office Excel WorksheetBiff8Excel.Sheet.8є9Вq