аЯрЁБс>ўџ ўџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ5G6  !"#$%&'()*+,-./01234ўџџџ;789:<D=>?@ABCERFHeIJKLMNOSQўџџџcTU_WXYZ[\]^P`abdmfўџџџgkijўџџџlvopqrstuhwxyz{|}~ўџџџRoot Entryџџџџџџџџ РFЯoяЄЗЧ НA„"Ч]WorkbookџџџџLa_VBA_PROJECT_CUR"џџџџџџџџ  *Q{"Ч№$иQ{"ЧCtls џџџџџџџџœўџџџ ўџџџ !"#$%&'()ўџџџ+,-ўџџџ/ўџџџ123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZўџџџ\]^_`abcdefghўџџџjkўџџџmnopqrstuvwxyz{|}~€@2зiЮЭЇwн k+›…—ˆФрVсxфкŽ“ƒOy Њˆфi(‡~hЧ §Чœњрвt.;7•˜ЬЯЮ] b…єи KНЩSЏЈе,z?хP%ˆЂŠШ№.™|ˆy=х]ьЇбЁvеNєp,šŸDфј|˜чDѓТѕiviД9н|шРО+ЦYдБФ.cшZ%ѓNч{ЕЪ†<єHДр|ZQЋ^ѓŠс[ѓ­Њеbо9Ћ^­–‘‡ŽWсZ5/˜oU­фk™п&пЊZmцлХЋеnШC#е„oE­’§щк4ПдТZ}Ь;їЁWЋЏ!ЩyЄ žђнeЭтY э_ѓeФШ.у§ы>‹s>Д‡˜ІqРИЧ. Іез`S~ЈЛнћf йКџџ7М:зOlўЎ'рJЄыІRj[,>ѕ/?"Hђ6TU[|GФ`ЉъУ( Ч‹х˜ЇSBЌН‹)H'У1ќ%tУќ§(ЯзhзёyЁ8ŒtГ8——~HђQ?К•mтёŽь@<№ aФЩЃп ѓ8фиkылJžDY?ЫsЗеЇХэ?їЌо“‹Доˆ~оЗ”Л{џ§LДЌћЫf?qюЇ>юЙK0я,ЬС$P3ГHп-љŽ†н№Ж О›sЃѕб9ЃЌдух\dzвg^єqюКЧ’ЦЗ$iмЕIу.Jg'iЌб^ФAіaњ7u0і("№ВэЇжdn‡~!њуu|”H…џŽ@=№†эЇжdn‡~!њуu|”H…Є ]& _ F…Tўxк­MOSApvпkK[а*д ()Ѕ…^TB4iє ŸЃ&Ц•ƒM%`MьЁ?РИ"'Z ђ?m#`€цй qŽъЃcF~1щХ\ьa|?т—Œ^ЄўO=–2о’”qзІŒЛ(eœ”QЃ}-l7Тјoƒњь23 №ПAР@@ё  їќrцžBDMCustomerest k$Expected Order DateExpected Ship DateWinning chance Quantities Products Order NrDecember86146BDec86120B86122AN4373A861202CAA981B5433V E6090A-ATO E6062A-022 E6062A-023 E6062A-903NovemberNov123a321ProduktSummeStatus Comments: Product LineMonat123081508110812OctoberOct8122979797555151Oct 141131132444441 SeptemberSep44Product464547321l81000FIN4373A N4373A-3008163B81618A81623B8169A8164B81635A81000KI81000LI81001LA81619A81624B81578A 81594B-009 81594B-062 81595B-009 81595B-062 81600B-13281634B81570A81654A81655A 81655A-E0181000NI81940A N4385A-002 N4385A-A01 N4385A-008 N4385A-40081000SI81000HI81000MI8166B81000FAN4370A N4373A-102 N4373A-202 N4373A-30381576A81000KA81010BL81626B86038B 86038B-100 86038B-120 86038B-400 86038B-50181610CC81613A81571A81003LA 86122A-1CM81980A N4373A-399 8163B-1CM81577A81000VI81002LI81651A N2604A-101 N2605A-135N2596A W1205-251690 N2640A-200 N2643A-250 N2605A-137 N2610-96100 N2610A-100 N2604A-100 N2605A-134 N2600A-130 N2640A-100N2647MM N2620A-001 N2644A-100 N2620A-051 N2644A-101 N2595A-095 N2620A-050 N2610A-FG N2643A-150 N2604A-301 N2614A-001 N2604A-056 N2600A-150 E6020B-012E6000C E6000C-003E6008BN3900AN3910AME6003CE6000CIE6003BE6081A E6020B-013E6007AN3970AN3993AE6006AџЂ №{@Ы–!уnЉOк†а[Њwе`+Ж зb,З—"ќ‡cюБ<ccО ЉЭЩФ  iv Ž$)*  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?U} ’ iџџџџџџџџџ џ џ џ џ џџџџџџџџџџџџџџџџџџџ§ 3О #§ 8О #§ 9О ###§ :О #§ ;О )§ <О )§ =О )§ >О -§ ?О --§ @О --§ AО --§ BО --§ CО -§ DО -§ EО -§ FО -§ GО #§ HО #§ IО )§ JО )§ KО -§  § L§ M§ N§ O§ P§ Q§ R§ S§ T§ UзDhl џ!џ"џ#џ$џ%џ&џ'џ(џ)џ*џ+џ,џ-џ.џ/џ0џ1џ2џ3џ4џ5џ6џ7џ8џ9џ:џ;џ<џ=џ>џ?џ§ V§ !W§ "X§ #Y§ $Z§ %[§ &\§ ']§ (^§ )_§ *`§ +a§ ,b§ -c§ .d§ /e§ 0f§ 1g§ 2h§ 3i§ 4j§ 5k§ 6l§ 7 § 8m§ 9n§ :o§ ;p§ <q§ =r§ >s§ ?tзD@l@џ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џ[џ\џ]џ^џ_џ§ @u§ Av§ Bw§ Cx§ Dy§ Ez§ F{§ G|§ H}§ I~§ J§ K€§ L§ M‚§ Nƒ§ O„§ P…§ Q†§ R‡§ Sˆ§ T‰§ UŠ§ V‹§ WŒ§ X§ YŽ§ Z§ [§ \‘§ ]’§ ^“§ _”зD@l`џaџbџcџdџeџfџgџhџ§ `•§ a–§ b—§ c˜§ d™§ eš§ f›§ gœ§ hз2 ьк№в№№К№( № №№‚’ № s №HПA ?Р@џ€УCommandButton1№№гА Ф№]` @1R1 6$ˆиQ6Forms.CommandButton.1L>Ж@я7К Sheet2 ЉЭЩФ =Š1ЏBЩH  dќЉёвMbP?_*+‚€%џСƒ„M–\\wbbnip01\BIDP5002мИ?€ dXXA4”.HP LaserJet 8100 Series PCL 6М2U†xœeЙJƒQ…чќї&зlЦB‘ˆћŠˆњj‘ˆZYEp 3‰I@—”ZD ХЦЮW0ŠyKпУЮ}Йї'С)Ю9ї+fцNБјП<аa-‡kт!Ш7qк“Q№8x…1Шxм €v‘ ќ>xцР>IŽРЧ nAХƒ 8T00AЬ6B”свz)Зš%йYбѓ-TU%HюtхR•Ї 3ЎѓRd-MЮОфм… 8ЋЩЎ*.[п@‚W• ХuЏG4‡Е„ДдЕд”1юŒ&ъыƒrzoW™іOВ cЯcйazOцчЪх<эYSВнЪP|H'У2ї3!oЙЩЎ‘ХЄНЏN§я”МХзћ9ю^‹Ё" dXXр?р?U} $ } m } m 0} Ж-} $ *} $} m } л } m } m /} m $} m %} m Column OXtt=hРў€ џ€џ€ўџџџџ џ џ џ џ џџџџџџџўџџџџџџџџџџџ§ 2О(33333333333§ § § § § § § § § § § §  §  §  О §  § § ! О!!"!!!!!!!! § # $^@џМ:0ed elџР eBф%џМ:0ed elўР eBф~ №?О &&§  § # ~ '^@ (§ # $6@џ%ўО &&§  § # ~ '5@ (§ #$№?џ%џО &&§  § #~ '№? (§ # $№?џ%џ~ @О &&§  § # ~ '№? (§ )$№? џ% џО &&§  § # ~ '№? &§ ) $(@ џ % џ~ @О &&§  § )~ '№? &§ ) $?@ џ %€^@ џ~ @О &&§  § )~ *(@§ + $@@ џ % џ~ @О &&§  § )~ *@§ + $@V@ џ % џ~ @О &&§  § )~ *.@§ + $@џ %РX@џ~ @О &&§  § )~ *&@,$џ%џ~  @О &&§  § -~ *&@§ +$џ%7@џ~ "@О &&§  § -~ *5@§ +$џ%џ~ $@О &&§  § -~ *FЁ@§ + $џ%uЧ@џ~ &@О &&§  § -~ *@V@+$џ%џ~ (@О &&§  § -~ *@+$ˆB_§%џ§ !О!!"!!!!!!!! +~ 6@О &&§ § -~ *@^@+~ 7@О &&§ § -~ *№?+~ @@О &&§ § -~ *7@+~ €@@О &&§ § -7~ *№?+~ .Рk@§ § - ~ *uЧ@~ .\‘@§ § -~ *РX@~ .ђw§ § -~ *№?§ § -~ *№?§ § #~ *"@§ § #~ *@§ § #!~ *Y@зDl`фіœŽŽœŽœ’’’Ž’’’ŽŽ8PPPP888*** џ!џ"џ#џ$џ%џ&џ'џ(џ)џ*џ+џ,џ-ў.џ/џ0џ1џ2џ3џ4џ5џ6џ7џ8џ9џ:џ;џ<џ§ § #"~ *&@§ !§ !)#~ !*Y@§ "!$О""!"!§ #%§ #)&~ #*№?§ $%§ $-&~ $*№?§ %%§ %-'~ %*@§ &%§ &-(~ &*@§ '%§ '-)~ '*(@§ (*§ (-+~ (*(@§ )%§ )--~ )*(@§ *%§ *-,~ **(@§ +%§ +-.~ +*(@§ ,%§ ,-/~ ,*№?§ -!0О-"!"!§ .1§ .-2~ .*№?§ /1§ /-2~ /*"@§ 01§ 0-5~ 0*"@§ 11§ 1-4~ 1*$@§ 21§ 2-6~ 2*&@§ 31§ 3-6~ 3*"@456789:;<з>в0** ********** ****** ьЊ№Ђ № №Š№( № № №R’ № C №ПџП№ч№]F!5R ю&#а>Ж@х  я7ВО;  #О+  #К Sheet1 ЉЭЩФ )3PѓTmV  dќЉёвMbP?_*+‚€%џСƒ„M–\\wbbnip01\BIDP5002мИ?€ dXXA4”.HP LaserJet 8100 Series PCL 6М2U†xœeЙJƒQ…чќї&зlЦB‘ˆћŠˆњj‘ˆZYEp 3‰I@—”ZD ХЦЮW0ŠyKпУЮ}Йї'С)Ю9ї+fцNБјП<аa-‡kт!Ш7qк“Q№8x…1Шxм €v‘ ќ>xцР>IŽРЧ nAХƒ 8T00AЬ6B”свz)Зš%йYбѓ-TU%HюtхR•Ї 3ЎѓRd-MЮОфм… 8ЋЩЎ*.[п@‚W• ХuЏG4‡Е„ДдЕд”1юŒ&ъыƒrzoW™іOВ cЯcйazOцчЪх<эYSВнЪP|H'У2ї3!oЙЩЎ‘ХЄНЏN§я”МХзћ9ю^‹Ё" dXXр?р?U} } I} I)џџџџџџџџџ џ џ џ џ џџџџџџџџџџџџџџџџџџџ§ 1§ 13§ 1О #О #О #О #О )О )О )О -О -О -О --О --О --О -О -О -О #О #О )О )О )О -О -О -О -О -О -О -О -О -О -О -О -зDxl* џ!џ"џ#џ$џ%џ&џ'џ(џО -О !-О "-О #-О $-О %-О &-О '-О (-з2 ьк№в0№№К№( № №№‚’ № s №HПA ?Р@џ€УCommandButton1№ ` K№]` М7R0 6$ яQˆ6Forms.CommandButton.1LP>Ж@  я7АџџџџБџџ; €zeroК Sheet4 ЉЭЩФ 6Yš]ж`  dќЉёвMbP?_*+‚€%џСƒ„Ё"џр?р?0U6џџџџџџџџ џ џ џ џ џџџџџџџџџџџџџџџџџџџ џО #'О #'О #'О #'О #'О )'О )*О )*О )*О )*О -*О -*О -*О -*О -*О -*О -*О -*О -*О -*О -*О -*О -*О #*О #*О #*О #*О )*О )*О -*О -*О -*зD€l!џ"џ#џ$џ%џ&џ'џ(џ)џ*џ+џ,џ-џ.џ/џ0џ1џ2џ3џ4џ5џО !-*О "-*О #-*О $-*О %-*О &-*О '-*О (-*О )-*О *-*О +-*О ,-*О --*О .-*О /-*О 0-*О 1-*О 2-*О 3-*О 4-*О 5-*з.є>Ж@џ?џя7К Sheet3 VBAџџџџџџџџ  *Q{"Ч0uЛQ{"ЧThisWorkbookџџџџџџџџ$Sheet1џџџџџџџџ~__SRP_4 џџџџ*фџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}џџџџ€ўџџџџџџџ(џџџџџџџџџџ%џџџџ ƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ` Єџџџџџџџџџџџџџџџџџџџџџџџџeџџџџœiƒўџџџџџџџџџџџџџџџџџ 04џџџџ8 џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџh8@TTџџџџџџџџџџџџџџџџџџџџџџ0IњFпўЪ€ џџџџ"€ џџџџ џџџџx– oџџџџџџџџџџгАAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’BustomiЦzD2 P€€ Sub …’_Open()  End <фjxЬМ#Xџџ#ˆЖџџџџџџџџ<џџx}lnI‰QЛгe“іƒ РF,—љѕt,Ь@‘e-bЩ‡PJџџџџџџџџџџџџx,—љѕt,Ь@‘e-bЩ‡PJx}lnI‰QЛгe“іƒџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@HHџџџџџџџџџџџџџџџџџџџџџџ0IњF$*\Rffff*2A46f4f617пџџџџ4ўЪџџџџџџџџxџџџџЈАAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2rU€€€ Иa ‰ Б џџџџ9 4й ё џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹`rU€€€ џџџџџџџџ@n__SRP_5џџџџџџџџџџџџ.BSheet2 џџџџ0Д __SRP_bџџџџ[t__SRP_aџџџџџџџџiŽ0фИЃН Мф3џџcˆЖџџџџџџџџDџџцˆђ/Ь‚OЄФеЇ 6 РF<ЮІиеƒIŽ-ш… 7…џџџџџџџџџџџџx,CommandButton1, 1, 0, MSForms, CommandButton<ЮІиеƒIŽ-ш… 7…цˆђ/Ь‚OЄФеЇ 6џџMEџџџџџџџџџџпџџ,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ [LџџџџSџџџџS”џџџџsџџџџ(џџ46"џџџџџџџџ”џџџџLџџџџLџџџџџџџџ<0џџ<4џџ<8џџ<<џџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}p €ўџџџџџџџ(џџџџџџџџџџ% %ƒўџџџџџџџ`џџџџџџџџџџџџџџ%‚ џџџџўџџџџџўџџџџџџџџџџџ%џџџџ`*€“џџџџ4H0@џџџџџџџџ ”џџџџ`џџџџџџџџЈЈўkџџџџџџџџT”iƒўџџџџџџџџџџџџџџџџџ 00%Ш џџџџџџџџџџџџ6а@4дџџ@ўџ`pџџџ џџ џџџџ`„Ьџџџџxџџџџџи „Юџџџџtџџџ(лџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџXHџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџ@ўџ`џџџ џџ ђ@ўџ€\џџџ џџ ѕ@ўџLџџџ џџ @ўџЈ<џџџ џџ @ўџР,џџџ џџ @ўџиџџџ џџ @ўџ№ џџџ џџ @ўџPќўџџ џџ @ўџ ьўџџ џџ @ўџ8мўџџ џџ @ўџџџџџЬўџџ џџ @ўџhМўџџ џџ @ўџџџџџЌўџџ џџ @ўџџџџџЈўџџ џџ џџџџ`Шџџџџџџџџ џџџџШџџџџџџџџ џџџџџџџџh8HXHџџџџџџџџџџџџџџџџџџџџџџ0IњF*\R8004*#5d$*\Rffff*1846fa1c69*\R1*#1c8*\R1*#41*\R1*#2ac*\R1*#e8*\R1*#f1*\R1*#228п 8џџџџ<ўЪ"€€ $f((qP"VxџџџџЈџџџџx–Шoџџ]ђx]ђ 6 а!вЌ$@%!8'ЬыэЌЌ$@ ЬЌ$@$4.ЮЖListб Юбк д!жB@иѕџџџџXџџџџЅБAttribute VB_Name = "She@et2" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Control–CommandButton1, 0, MSForms,6 ŠP<@ Sub‹ 1_Click() Dim lngLast As Long BereicТh Rang}= Cells(Rows.Count€D).End€(xlUp).  Set Љ…#= ‚(У2 ?@,@$ActРLWorkbook.rs.Add A:="List", RefersToR1CШ1:=D @"С< rU€€€ p 9 9QЁ! yQЩIQ‰ yџџџџ9 8С  Ј§џџ`С џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<й ё џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹ E y Я „4fўС џОяџџ%pџ! ˜pџa`џvќ"§iLџ%(,џ%\џ! а\џўЂьўџ>мўџAЬўќ"qxџ)pџ\џ6`џьўмўЬўq(Lџ%(,џ%pџ! аpџўЂ`џќ‹lxџ§i џ%(Мў%\џ! а\џўЂьўќ‹Јўќэьўќэ`џ! QЈўtџ)pџ\џ6`џьўV:Lџ%ltџќјЈўЈў§“ @\џpџ$ Hpџ \џўЊЕ lЈў=tџ)pџЈў\џд4(tџ(pџ\џЈў`џьўмўЬў4 8ArU€€€ џџџџџџџџH$Й `Tџџџџџџџџ 1џџџџ@HY4n0tИD^> Мс]џџcˆЖџџџџџџџџDџџрДрyХ|KЄФpІЃя/џ РFpjxšммGПУƒ‘У+џџџџџџџџџџџџx,CommandButton1, 1, 0, MSForms, CommandButtonpjxšммGПУƒ‘У+рДSheet4џџџџџџџџl› __SRP_2џџџџЃT__SRP_3џџџџџџџџџџџџЙŽModule1 џџџџVЅрyХ|KЄФpІЃя/џџџMEџџџџџџџџџџпџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ [LџџџџSџџџџS”џџџџsџџџџ>"џџџџџџџџLџџџџLџџџџ”џџџџџџџџџџџџџџџџ<4џџ<8џџ<<џџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}и0€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџ %џџџџ0*€“џџџџ4H@@џџџџџџџџ ”џџџџ`џџџџџџџџˆxўkџџџџeTœiƒўџџџџџџџџџџџџџџџџџ Inџџџџƒўџџџџџџџџџџџџџџџџџџџџџ%‚ Rџџџџўџџџ8џџўџџџџџџџџџџџ%xPџџџџџџџџџџџџ(џџџџ6R4hvЈ@Аџџ`„ЦџџџџzџџџџџџџџџџџџџшџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX џџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџ@ўџ@hџџџ џџ ‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂўџџџЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИўџџџКЛўџџџНОўџџџРўџџџТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыўџџџэюя№ёђѓєѕіїўџџџљўџџџћќ§ўџџџџџ@ўџpXџџџ џџ џџџџ@ўџИTџџџ џџ џџџџ@ўџˆDџџџ џџ џџџџ@ўџ4џџџ џџ џџџџ@ўџа$џџџ џџ и@ўџ џџџ џџ Р@ўџШџџџ џџ џџџџ@Мџџџџџџџ џџџџџџ@ўџ0№ўџџ џџ џџџџ@ўџјьўџџ џџ џџџџ@ўџHмўџџ џџ џџџџ@ўџ`Ьўџџ џџ џџџџ@ўџxМўџџ џџ џџџџ@ўџАЌўџџ џџ џџџџџџџџШџџџџџџџџ˜џџџџ @ўџœўџџ џџ Sh@ўџџџџџŒўџџ џџ E1X\O.DLL#i@ўџџџџџˆўџџ џџ fi@ўџџџџџxўџџ џџ jeџџџџ0xџџџџџџџџPџџџџxџџџџџџџџPџџџџџџџџрHXHџџџџџџџџџџџџџџџџџџџџџџ@IњF*\R8004*#5d$*\Rffff*0c46f50c2b*\R1*#41*\R1*#dc*\R1*#e8*\R1*#2ac*\R1*#4f*\R1*#1c8*\R1*#68пP8џџџџ<ўЪ"€ џџџџ€А&Yˆ€ џџџџ€ џџџџN} € џџџџ€ џџџџ€ џџџџ€ И&UР#ш\!8Ё`(w˜џџџџШџџџџx–xoџџџџџџа hбfЖA2:B2 R%4бjЗбlЖD6:E6000ЖSheet1$v%4B@dџџџџhџџџџ`џџџџx 6ЖA65536 R%4%!8'МC]ђpр 6ЖA65536 R%4%!8'Ц1!ЖC2$4B@H[1]) ІЖH=SUMIF(Sheet1!R[2]C[2]:R[59998]C[2],RC[-1],Sheet1!R[2]C[3]:R[59998]C[3]) Ј(Њ$4ЌЌ$@ ЦЌ$@$4бЎ Абl \B@ЌЌЌ$@ ЦЌ$@$4B@HџџџџXџџџџSВAttribute VB_Name = "She@et4" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Control–CommandButton1, 0, MSForms,6 ŠP<@ Sub‹ 1_Click() Dim var As Integer lreihŒƒЯ.Range("A65536").End(xlUp).Ro’w" ‚s(ƒш1€„D6:E6е€Advanc€edFiltection:=xBlCopy1pHyTo:=Œ2:B2"), U€nique:=CK‘У' A1= Ь -”, D(CР.S€elect СA&veCell.AVulaR1C1`_УС"=S UMIF(B1! R[2]CР:R@[59998,€RC[-1],ЪФ3]Ш3])РiСƒУРC.AutoDl DestinaIУ*С$s(2,| 3@A=РT ypРDBSlDefјaulФ3оF?РuA‹ rU€€€ P` 9 9 й! yQ 1 й Q y Б б IqСљ™Сс‰ Љџџџџ9 8С  Ј§џџ`Сџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<й ё џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‹EyЯмŒYўСDџОяџџ%Tџ'Xџ%:hџ%$ TџўЂ$џє§ѓ џ џaџќ"§i№ўќіџ)Tџ џ6$џџ}ўСмў%Tџ'Xџ%:hџ%$ QTџ§o$џ%cЌў%:4џ%ьў:Dџ% џ$ И џ d ьўўšŒў §ŸўІ  ) џьў6$џŒўUўСDџОяџџ%Tџ'Xџ%:hџ%$ TџўЂ$џє§ѓ џ џaџќ"фpzџ)Tџ џ6$џџ#Tџ'Xџ%:hџ%! Tџў ыTџ!:hџ%Tџ$ (Tџ,TџЁ(hџ%(Dџ%Tџ! аTџўЂ$џќ‹kzџD№ў%(Ьў% џ! а џўЂџќ‹ьўќэџќэ$џ! Qьў§oŒў%ўСœў%ˆўѕ $ АˆўўІ)Tџ џˆў6$џџŒўw(hџ%(Dџ%Tџ! аTџўЂ$џќ‹kzџD№ў%(Ьў% џ! а џўЂџќ‹ьўќэџќэ$џ! ьўў ы)Tџ џьў6$џџŒ(џ(Tџ џьўˆў$џџŒў4 8ArU€€€ џџџџџџџџH$Й`Tџџџџџџџџ 1џџџџ@HY4nrU€€€€~|  0 ќЦ8  kџџџџџџџџџџџџxrU€€€ џџџџџџџџ$ el. Diese cden mit dem EinzelprDei>undr Gesamta nzahlƒneu:‰ Ўgeg eben.wDЂ4‚% wird errechne†tchriЁ€Pn Kl€!-€Jt€Oppermann, Oktob 2005  .VariabBl€=dekleren Dim iziel A s IntGr ' LetzЫ@gefќllZfe•"az  ,' ZфhlMfќr€ЋrayfelderE#" ' Sc@ifenz‘ƒ(ArРs A&len€A6tЗbe t„sРYittelarr()ѓ‚YntTPР-‚)@)?ti•abe Ai ƒb= Range("A65536").End(xlUp).јRow”c@ŒІС&D (@ОSpaAjAгФФHdiРЕsбРО9ReKС0Т, ќ0)0B0Т-ƒ•DТWBо` For i@ю4 To шUBoРP(€W”' `\frn Zei@s2 bis, T€& On!t AIf Ap‚a „.W xshee tFunc"C€PtIf(Ѓ+C€Ws(i, 5), v_Cc1a€(.@Value)р1И Th hДР'рƒТnf† das@2 “а MalХŠt u8 ..РzE 0azЙЂ/= nЅї'С о І?"3Ÿl@– }хu= €+ 1W 8Ѓ ‘x pluиs 1#) V 2_ +Z  e‚ЉA#ЛunРg Nex€К? з=ˆ'@ЁhтfЁs Ё­ DrM4",ё б" &‰ZCР7j hn лnУ`gK€YрЕe в s Мeni€Т!lЁhtЅhЂ63Ÿ 0ЕhбhhУNРS1Ц4aћiSumЅihТ(232,тjУn4jЁ 3 $*FH4:Fр")Eƒ'уЄs@Jge ap ,џ‚ПUя…Q+р„‘ џh@џџџ џџ џџџџhџџџ џџ џџџџ@ўџџџџ џџ @ўџџџџџџ __SRP_cџџџџџџџџџџџџМˆ__SRP_dџџџџПgModule2џџџџџџџџџџџџСР __SRP_6 џџџџьш`§џџџџџџџџџџџn 0№ЌдиџџџџwћМж,џџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP6 џџџџџџџџš"џџџџLџџџџџџџџ”џџџџLџџџџџџџџџџџџџџHџџџџ8ƒ`џџџџџџ0џџџџџџџџџџџџџџ% „џџџџ`xИиˆўkџџџџџџџџџџ„5Macro recorded 12/14/2006 by Patrick Shane Costanigrons\ 14`„ЦџџџџzџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџ6R4Ј@А\џџџџ@ўџЈhџџџ џџ џџџџ@ўџиXџџџ џџ џџџџ@ўџ Tџџџ џџ џџџџ@ўџ№Dџџџ џџ џџџџ@ўџP4џџџ џџ џџџџ@ўџ8$џџџ џџ р@ўџА џџџ џџ Ш@ўџрџџџ џџ @ўџhџџџ џџ @ўџ€№ўџџ џџ @ўџ˜рўџџ џџ @ўџјаўџџ џџ @ўџШЬўџџ џџ @ўџџџџџШўџџ џџ @ўџџџџџИўџџ џџ @ўџЈўџџ џџ @ўџ(˜ўџџ џџ @ўџџџџџˆўџџ џџ џџџџИ8џџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџIњF$*\Rfff№ д(џџџџ2 VМm џџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 6 џџџџ<4џџ<џџ<џџ< џџ<џџ<џџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<8џџ<<џџ<џџџџџџP№ ƒџџџџџџ0џџџџџџџџџџџџџџ% &џџџџ`џџџџџџџџџџџџt§Jџџџџџџџџџџ##„`„(џџџџzџџџџџlpre`„*џџџџxџџџџџer G`„,џџџџvџџџџџ neu`„.џџџџtџџџџџ „0Рpџџџis w€рјџџџџ8p(@: џџ `џџџ џџ @ џџџџџџџџаџџџџџџџџџџџџџџџџџџџџxџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаџџџџ0Pџџџ џџ џџџџpLџџџ џџ Р@ўџ<џџџ џџ џџџџ@ўџ,џџџ џџ џџџџh@џџџ џџ џџџџhџџџ џџ џџџџ@ўџџџџ џџ @ўџџџџџџ ј p€џџџџ ИШЈєўџџ џџ @ўџфўџџ џџ @ўџдўџџ џџ @ўџФўџџ џџ ј(Рўџџ џџ @ўџМўџџ џџ @ўџЌўџџ џџ @ўџœўџџ џџ @ўџŒўџџ џџ @ўџ|ўџџ џџ pXlўџџ џџ Ш(hўџџ џџ @ўџdўџџ џџ @ўџTўџџ џџ @ўџDўџџ џџ  4ўџџ џџ @ўџ$ўџџ џџ Шўџџ џџ ј(ўџџџџ @ўџўџџџџ 0 ўџџџ 8џџџџўџџ џџ @ўџј§џџ џџ @ўџш§џџ џџ @ўџи§џџ џџ џџџџд§џџ џџ @ўџФ§џџ џџ @ўџД§џџ џџ @ўџЄ§џџ џџ @ўџ”§џџ џџ @ўџ„§џџ џџ @ўџt§џџ џџ џџџџџџџџ08џџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџIњF$*\Rffff*2G46f4f6f9пўЪ$€" € :€ BP€ <˜€ &и€ <€ џџџџ€ @€$`€&ˆ€.А€Hр€((€ џџџџ€ џџџџVUP€ Ј$"Ш€ џџџџ€ №@†ьPBMи4 X( x€  PDИ€ џџџџ@‚+H( ај€ џџџџ€ џџџџџџџџ(Эџџx–8р4 findet in einer Liste, die nicht sortiert sein mussр< alle vorkommenden Artikel. Diese werden mit dem EinzelpreisXр6 und der Gesamtanzahl in einer neuen Liste ausgegeben.р Der Gesamtpreis wird errechnet.р5 Geschrieben von Klaus-Dieter Oppermann, Oktober 2005р Variablen deklarieren]ђxр, Letzte gefќllte Zelle]ђр, Zфhler fќr Arrayfelder]ђЈр, Schleifenzфhler (Arrays fќllen)]ђРр,: Schleifenzфhler (Gesamtpreise und Gesamtanzahl ermitteln)]ђир, Array fќr Artikelausgabe 6ЖA65536$4%!8'(р,. Letzte gefќllte Zelle ermitteln (in Spalte A)р Arrays dimensionieren€Ю (ЮЌс0`р, Artikelџр Arrays mit Werten fќllenџ ,ўЌ 0‘’рH# laufe von Zeile 2 bis TabellenendeІ ,Ќ$@ЌЌ$@$4 ,Ќ$@!B :!<%>ЌœрH. wenn Artikel das erste Mal vorkommt, dann ... ,Ќ$@!B *Ќ+0рH ... Name in Array einlesen *Ќ '*рH ... Zфhler fќr Arrayfeld plus 1is ikрH Ende der Auswertungџ ,ўШрH Schleifenzфhler plus 1р Inhalte ausgeben 0ЖM4ЖM 0‘+4рH) Artikelnamen in Ausgabebereich schreibenџ .ўЌ *Ќ ’рH! laufe von Zeile 2 bis ListenendeІЌшЌ$@ЌЌ$@$4 .Ќ $@ЖF4:F232$4 :!<%H .Ќ+@рH Gesamtmenge berechnenџ .ўШрH Schleifenzфhler plus 1oџџџџџџИџџџџјџџџџ8џџџџџџџџџџџџEДAttribute VB_Name = "Module1" Option Explicit Sub liste_auswerten() ' findet in einer LH, die nicht sorti` s@ musslalle vorkoˆmmeAn A&kf*2a46f51b56*\R1*#41$*\Rffff*0c46f50c2b*\R1*#e4*\R1*#1c8*\R1*#2ac*\R1*#e8*\R1*#68пўЪ"€ € € <0€ p€ € џџџџ€ x&U((€\!˜8АP(†јџџџџ–8oџџpрр Macro1 MacroA1 р6 Macro recorded 12/14/2006 by Patrick Shane CostanigroррЖC2$4B@HІЖH=SUMIF(Sheet1!R[2]C[2]:R[59998]C[2],RC[-1],Sheet1!R[2]C[3]:R[59998]C[3]) Ј(ЊЌЌ$@ ЦЌ$@$4B@H]ђР 6ЖA65536 R%4%!8'ЦSЌЌ$@ ЦЌ$@$4бЎ Абl \B@ЌџџџџpџџџџЛБAttribute VB_Name = "Module2" Sub Macro`1() АL.ЬDescrip0tiontX recorded 12/14/2006 by Paиck Shane Costan0igrohZPr@ocDatafInvoke_Funcf \n14с6' ' -ƒ Dim var As Integer   =€[eet4.Range("A65536").End(xlUp).Row & C2Selectƒ ActiveCell.FormulaRh1C1€h_ƒ"=SUMIF(Sh€61!R[2]C€:R[59998,RC[-H1],Š3]ˆ3<])€'ƒ?€Я.AutoFill !кtinaк:=У*С$s(2, 3x), =РT€ype:=xlРDefaulФ3о.E?I @“ rU€€€€~|  ` 9 IС! yQсСљ(мUўСDџОяџџ%Tџ'Xџ%:hџ%$ TџўЂ$џє§ѓ џ џaџќ"фpzџ)Tџ џ6$џџ(Tџ'Xџ%:hџ%$  Tџў ыTџ!:hџ %Tџ$ (Tџ,TџА(hџ%(Dџ%Tџ$ XTџўЂ$џќ‹kzџDџ%(рў% џ$ X џўЂџќ‹Ьўќэџќэ$џ$  QЬў§oИў%ўС˜ў%Шўѕ $ АШўўІ  )Tџ џШў6$џџИў†(hџ%(Dџ%Tџ$ XTџўЂ$џќ‹kzџDџ%(рў% џ$ X џўЂџќ‹Ьўќэџќэ$џ$  Ьўў ы)Tџ џЬў6$џџуу•єм$ (Tџ џЬўШў$џџИўk__SRP_7џџџџџџџџџџџџјoSheet3џџџџџџџџџџџџњс_VBA_PROJECTџџџџџџџџџџџџn.dirџџџџџџџџџџџџ ŠrU€€€ џџџџџџџџ$`§џџџaйn№ддџџџџл/М§.џџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ( ўџџџ   ўџџџ !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRўџџџTUVWўџџџYZўџџџ\]^_`abcdefўџџџhijўџџџlmnopqўџџџsўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџSLџџџџSџџџџS”џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџH€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџ0џџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8IњFпўЪџџџџџџџџxџџџџЈАAttribute VB_Name = "She@et3" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2†Г€0* pH‚dф VBAProjeˆct4@j = r IњF” 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€ CopytosheetЩFilterAktualisierenў@€џSheets Tabelle2SŠ€џSheet[ж €џ_B_var_SheetHšSheets2 U€џ_B_var_Sheets2XModule3dЌ(Macro1еNModule4eSchnellUndSchmutzigВŸ€џActivate—| €џWorkbooksBь €џ_B_var_Action†ЭMSFormsCCommandButton1|дCommandButton1_ClickфС€џClickŠу €џActiveWindowУ+ €џSmallScrolltmDown;†€џџџ_B_var_CopyToRangeщХShhet2l €џџџ_B_var_Shhet2Ћц Workbook_Open›с„џџџMacro2жN €џActiveCellНЗ €џFormulaR1C1S€џAutoFill_ €џDestinationаЛ €џxlFillDefault]jletzereihe_sheet1ж!letzereihe_sheet2з!letztereihe_sheet16letztereihe_sheet26€џџџ_B_var_Destination2­lreiheёB„џџџMacro4иNE\CellЏ‰ €џџџ_B_var_Cellя„џvarут €џџџ_B_var_lreihešНName_definieren/lngLastЮLBereich2€џRowsЁUCount0v€џActiveWorkbookЂ€џNamesЮПAddїr €џRefersToR1C1Еcџџœџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ S џџџџџџџџџџџџџџџџџџџџџџџџџџa џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ~ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџМThisWorkbook0i46f50c69џџThisWorkbookџџŸŒMџџ Sheet12A46f4f617orms>SFЇrms3€ІD452EE1-E08F`A-8-02608C@4D0BB4SFиM20L'B Р_Ь&ш/;"1РƒjIqAHq00}#0Bq#Р €ž50Ј € ŠРA1A12BB85-175D-4726-96D5A8A8@FEF8A3ˆ6DOCUME~1\pcostani€\LOCALS@Temp\Exc`el8.0РcB8.xexdШdU=#€с.E р…€.`ŒM ДAв"ТгТМТНThisWorkbookGЊРT@ПimW‚okbРok*Ю 2к РЊHB1ТсMРїBE,Т!ŸŒ""+ЂтrSheetT1Gт S eр`tм1 ЁvЃ2Ўя вэ #Xє *2э 2щ 2э 2Iя я ф3є 4Uэ 4щ 4э 4№ D2 я с]ы "sodXule*#souwA*2Dw Џ\тЏm !Њ8‡ Р*_­+Џq+p+жV,ЋІC3m+3i+3•m+3p+5pG§.i+"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“K*yџџџџrU€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  ЙЉG1OјL€ўЧЇ?:—  фџџџџ џџџџџџџџџџџџЙƒŠe ! џџџџџџсƒŠe Й __SRP_0џџџџw__SRP_1џџџџџџџџџџџџS-PROJECTwmџџџџџџџџџџџџX­PROJECTџџџџ[јЬ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\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{1A12BB85-175D-4726-9626-D5A8A8FEF8A3}#2.0#0#C:\DOCUME~1\pcostani\LOCALS~1\Temp\Excel8.0\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д џџџџџџIњFџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџМThisWorkbook0i46f50c69џџThisWorkbookџџŸŒMџџ Sheet12A46f4f617џџ Sheet1џџ#Xвџџ Sheet21846fa1c69џџ Sheet2џџф30 џџ Sheet40c46f50c2bџџS Sheet4џџс]xD џџModule12G46f4f6f9џџModule1џџm `\џџModule22a46f51b56џџ`Module2џџж,xџџџџH џџ Sheet30K46f8409fџџ Sheet3џџ§.5џџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџsЊЙГYCОфSм$HХџџџџосb…аxМL€№@ =ќвЫџџџџ;f?Іƒ|nJЁ\уйtџџџџ_БT8Г”AЙЕ–›Ће.`”†MІŽ‘П@”ДрЅhTymџџџџBXы8НOCЌё4ѓ)їТ–џџџџW §Wѓ{@›ьЋ`Б$ џџџџџџџџPаЅ)РЬœ™/џџџџџџџџ№ЃHєЁ5ЪџџџџџџџџАџџџџšљЎРппІ+џџџџџџџџа€mqџ€4 €џAsR€џFALSEД€џTrue Excel€+ VBAїтWin16С~Win32MacГВVBA6­#Project1  stdole“` VBAProjectОП Officeu ThisWorkbook|у €џ_Evaluateй Sheet1ш Sheet2щ Sheet3ъ Module1b„џhalloуOWorkbookk WorksheetСўЌ(liste_auswerten[Žizielˆaz”\i`tkarr uarr2}D€џRangeк €џxlUp ч€џRow‰Я €џApplicationЅ*€џWorksheetFunctionѓ&€џCountIfƒ€џCells€џValueфK€џValue2Ђ €џNumberFormatеR€џSumIf- €џColumnsp9 €џEntireColumnє•€џAutoFit& €џ_DefaultjТ Sheet4ыSheet5ьwhereж €џ_B_var_whereУQsdasd6Ќ €џSelectionZЎ€џp Module2c €џActiveSheet%N€џAdvancedFilterbzActionнR €џxlFilterCopy„П CopyToRange‡дUniqueТ  €џ_B_var_SubН’kopieren"/џџџџ џџљƒŠe Й џџџџ џџAˆa бџџџџ`џџџџq џџ)ˆa бџџџџXџџџџЙџџq џџџџџџџџџџџџy‰i‰i ThisWorkbookSheet1Sheet2Sheet3Module1Sheet4Sheet5Module2Module3Module4 VBAProjectяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA йџџџџ i0РF4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel бџџџџљq@0РFC:\WINDOWS\system32\stdole2.tlbstdole сџџџџ QPLај-њ[НхЊDоR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice Сџџџџщq`с.E р….`ŒM ДC:\WINDOWS\system32\FM20.DLLMSForms сс Qp…Л]&G–&еЈЈўјЃ7C:\DOCUME~1\pcostani\LOCALS~1\Temp\Excel8.0\MSForms.exd СсщQ€Macro1  F1РFйРF)Qџџџџ D4:E60000 Sheet1зРF Range ActionCopyToRange UniqueAdvancedFilter)ЈиРFx}lnI‰QЛгe“іƒ РF,—љѕt,Ь@‘e-bЩ‡PJDРF Worksheet @FilterAktualisierenпЋјнцJЗ Ь’РМ=ЯК-^|f`HŸюЯ?bЄ"С{lЏЮŸFЊWJOMacro2CommandButton1@2зiЮЭЇwнЏи;ЁEЊу]џ‘mŽќj>пgšhB›иHю/ѓ™m D4:E6000liste_auswertenSchnellUndSchmutzig Sheet4 Sheet2 A1 D2:E6000 A1:B1й1хѕКJ”ЧŽСx•`' >Х›ЅaHЎѕЌ‚ј|†/ D2:E60000јbEю.DПУUЈ…Цœ BlKF2eOЉH•Бт7ЎрДрyХ|KЄФpІЃя/џpjxšммGПУƒ‘У+ A2:B2 A65536EndRow E2 x=SUMIF(Sheet1!R[2]C:R[46]C,RC[-3],Sheet1!R[2]C[1]:R[46]C[1]) E2:E33DestinationTypeAutoFillFРF# „=SUMIF(Sheet1!R[2]C:R[59998]C,RC[-3],Sheet1!R[2]C[1]:R[59998]C[1]) E2:E3 E2:E & lreihe E2, E & lreiheMacro4 E2, E Select C2& =SUMIF(Sheet1!R[2]C[2]:R[59998]C[2],RC[-1],Sheet1!R[2]C[3]:R[59998]C[3]) D6:E6000цˆђ/Ь‚OЄФеЇ 6<ЮІиеƒIŽ-ш… 7… ListкРF"rU€€€€~~~y џџџџџџџџџџџџџџџџ   џџџџ5Macro recorded 12/14/2006 by Patrick Shane Costanigro 14 ‰й  a1 CommandButton1 aY (QThisWorkbookThisWorkbookSheet1Sheet1Sheet2Sheet2Module1Module1Sheet4Sheet4Module2Module2Sheet3Sheet3ID="{44C576A9-D002-45A0-936C-0518813DB430}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Module=Module1 Document=Sheet4/&H00000000 Module=Module2 Document=Sheet3/&H00000000 Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="E9EB667E6A7E6A7E6A7E6A" DPB="F7F5788A88969797979797" GC="05078A9896A797A79758" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={00020818-0000-0000-C000-000000000046};Excel8.0;&H00000000 [Workspace] ThisWorkbook=132, 174, 817, 629, C Sheet1=44, 58, 729, 513, C Sheet2=22, 29, 707, 484, Module1=0, 0, 831, 308, C Sheet4=0, 0, 831, 308, Z Module2=44, 58, 721, 471, I Sheet3=132, 174, 813, 587, C ўџр…ŸђљOhЋ‘+'Гй0Ш@SummaryInformation(џџџџgјDocumentSummaryInformation8џџџџџџџџџџџџkŒCompObjџџџџџџџџџџџџrmџџџџџџџџџџџџ§џџџ‚ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHl Ј ДРфPatrick Shane CostanigroPatrick Shane CostanigroMicrosoft Excel@€W]DцЧ@€’­Q{"ЧўџеЭеœ.“—+,љЎ0\ PX| „Œ”œ Є фAgilent Technologies, Inc.Ћ PartsSheet1Sheet2Sheet3Sheet1!ExtractSheet2!ExtractSheet3!ExtractList  Worksheets Named Rangesўџ џџџџ РF!Microsoft Office Excel WorksheetBiff8Excel.Sheet.8є9Вq