аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ K D$  ўџџџ# !"ўџџџQ&'(9*+,-./012345678%:;<=>?@ABCўџџџEFGHIJLўџџџMROPўџџџaS\UVWXYZ[N]^_`bўџџџcўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РF cв$‘С r)эџЇС@3WorkbookџџџџџџџџU_VBA_PROJECT_CUR" е€нJ‘С`gЂнJ‘СVBAџџџџџџџџ`§‰нJ‘С@ЦšнJ‘С  !"#$%&'()*+,-./0123456789ўџџџ;<=ўџџџўџџџ@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvўџџџxyz{|}~€ ЬI‡сАСт\pwr BАa=гКDieseArbeitsmappeœЏМ=xxL;ƒ"<X@"Зк1ШџArial1ШџArial1ШџArial1ШџArial3#,##0\ "Ќ ";\-#,##0\ "Ќ "=#,##0\ "Ќ ";[Red]\-#,##0\ "Ќ "?#,##0.00\ "Ќ ";\-#,##0.00\ "Ќ "I"#,##0.00\ "Ќ ";[Red]\-#,##0.00\ "Ќ "q*6_-* #,##0\ "Ќ "_-;\-* #,##0\ "Ќ "_-;_-* "-"\ "Ќ "_-;_-@_-k)3_-* #,##0\ _Ќ _-;\-* #,##0\ _Ќ _-;_-* "-"\ _Ќ _-;_-@_-,>_-* #,##0.00\ "Ќ "_-;\-* #,##0.00\ "Ќ "_-;_-* "-"??\ "Ќ "_-;_-@_-{+;_-* #,##0.00\ _Ќ _-;\-* #,##0.00\ _Ќ _-;_-* "-"??\ _Ќ _-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р ѕџ јР р,ѕџ јР р*ѕџ јР “€џ“€џ“€џ“€џ“€џ“€џ`…= Tabelle1Œ11ЎќA$A$1$B$2$D$4$E$5$F$6$H$8$I$9$J$10џњ эќ&я`Юbь.яTШbˆЪb”0ќэ˜/яџџџџ _bЋЫr0|.я тЭr0 „.яєУbџџџџџџџџDџџџч№Џ0џџџфТbDIЩr0ц&я ŠФbIЩr0p.я рУb  рУbp.я ммЪbDУbьЪb„цS0œУb]Ч0Х00 ˜0ы^n0Ч0гоУbќ ѓG0Х0њЧ0#G0p.я рУb l.ярХb]‚Y0мУb џџџџш-яЦb Wфhrung [0]_< ZцS0lФbќ&яpХbьЮ0r‡lХb‰0ZT0в_T0Qw0в_T0# э‰h‡ЌФb-Q0 Є‰‡ќ‡њ‰;e0!Цb ‡v‰0 ‡!ЦbvРЧ0 ‡!Цb;NJT0e0№YT0ь‰L‰0ь‰№YT0LNJT0њХbЦb1v0 $<цbшM0ŒХbxјьАР‰Ї=s0{=s0?0lХbќ&яX/яјх$ќ&яX/я|Б0ќ&яэ‡иХbјХbt/я$Цb”s0ЦbЦbУЕ0 ЬI љ   dќЉёвMbP?_*+‚€%џСƒ„Ё"џFvŠ<ќ§~п?Š<ќ§~п?NJU џT0џbџbџ16џС џџџb§ § § § § § § § § § § § § § § § § § § § § § § § з№Œ*******>Ж@К Tabelle1 rU€€€ Ё Щ џџџџy 41 бY џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ{crU€€€ џџџџџџџџ@prU€€€€~} DieseArbeitsmappe$ џџџџџџџџTabelle1џџџџb__SRP_4 џџџџ:к__SRP_5џџџџџџџџџџџџ>@џџџџџџџџPџџџџXхЎA1:B10$ .2х ЎD8:D20$ $&.х ЎE4:E7$ $&.х @.V01 V $>!D!\Є •-Џ J(L-а-Є %4!6 0(2-а"-Џ J(L-P&-aџџhЄ'j VЄ %4$>!D!\Є • j'jaџџ(lhџџ VЄ %4$>!D!\Є • j'jaџџ€Є'jhџџp j %4!6 0(2hџџHС@Џ'bхЎA1:B10$ .х ЎD8:D20$ $&.х ЎE4:E7$ $&.х @.V V $>!D!\Є •Џ J(LЄ %4!6 0(2Џ J(LaџџhЄ'j VЄ %4$>!D!\Є • j'jaџџ(Є'jhџџ VЄ %4$>!D!\Є • j'jaџџ Є'jhџџ j %4!6 0(2hџџш r!ЎTabelle1”FugZъџџџџџџџџАџџџџРџџџџШZъџџџџZъџџџџZъџџџџZъџџџџџџџџШџџџџџџџџPх 0.rџџџџ иnur bei Tabelle1 r!ЎTaЖџџџџџџџџ<џџXдPб?§еЉ,t‰ 2РFWдPб?§еЉ,t‰ 2џџџџџџџџџџџџxњJPџџџџЅБЇБџџ#ˆWдPб?§еЉ,t‰ 2XдPб?§еЉ,t‰ 2џџfђђZџџџџ4џџџџпџџ4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@[LџџџџSџџџџS”џџџџJ0дўџџџџи Јџџџ џџ џџ@ўџџџџ џџ џџ@ўџџџџ џџ џџ@ўџџџџ џџ џџ@ўџєўџџ џџ џџ@ўџфўџџ џџ џџ@ўџдўџџ џџ џџ€ џџџџH ˜ АФўџџ џџ џџџџ@ўџДўџџ џџ џџџџ@ўџЄўџџ џџ џџџџ@ўџ”ўџџ џџ џџџџ@ўџ„ўџџ џџ џџџџ@ўџtўџџ џџ џџџџ@ўџdўџџ џџ ( ."џџџџ А Tўџџ џџ @ўџDўџџ џџ @ўџ4ўџџ џџ @ўџ$ўџџ џџ @ўџўџџ џџ џџџџ@ўџўџџ џџ џџџџ@ўџє§џџ џџ џџџџ@ўџф§џџ џџ џџџџ@ўџд§џџ џџ џџџџ@ўџФ§џџ џџ џџџџ@ўџД§џџ џџ џџџџˆ џџџџ  џџџџАЄ§џџ џџ џџ@ўџ”§џџ џџ џџџџ@ўџ„§џџ џџ џџџџ@ўџt§џџ џџ џџџџ@ўџd§џџ џџ џџџџX `§џџ џџ џџџџ@ўџP§џџ џџ ˆ  џџџџ№ џџџџh џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@@hhџџџџџџџџџџџџџџџџџџџџџџаMEџџџџџџџџџџўЪ Јџџџџxаlџџlџџџџџџџџ€џџџџ8Џ'bџџџџ8belle1”F rApgиnur bei Tabelle1џџџџ№ZъџџџџъџџџџџџџџxџџџџЇАAttribute VB_Name = "DieseArbeitsmappe" "  Bas 0{00020819ъ-0C$ 0046} |Cr@eatabl†False ^Pre declaIdTru "ExposeTemplateDeriv$eCustomizD2•Є %4!6 0(2 јaџџ№Є %4!6 0(2hџџШhџџРlџџИaЏ'bhЄ %4!6 0(2t(ActiЏ J(L) ThenЏ J(LЏ J(L *!6т4!х @.VQЏ J(L €dB@J b•aЏ'bх ЎD8:D20$ $&.Џ J(L €fB@JЏ J(LЎ$D$8HQE b•aЏ'bЄ %4!6 0(2Ў$B$10HQE!\Џh V $>!D!\Є •Ў$A$1HQEЎ$D$20HQEhџџ№ b•aџџрЏ'bhџџаЏ'bи sprung = Falseх ЎE4:E7$ $&.Є %4!6 0(2Џ J(L €NB@JЏ J(LaџџЏ'bhџџЎ$E$4HQE b•Є %4!6 0(2aџџИЏ'bhџџЈPEЎ$E$7HQEџџџџ и sprung = Falseи sprung = Falseи sprung = Falseи sprung = Falseи sprung = FalseџџџџјaџџР j %4!6 0Жџџџџџџџџ<џџВ|— §еЉ,t‰ 2 РFБ|— §еЉ,t‰ 2џџџџџџџџџџџџxњКPџџџџЅБЁБџџ#ˆБ|— §еЉ,t‰ 2В|— §еЉ,t‰ 2џџжђђТџџџџ4џџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@[LџџџџSџџџџS”џџџџ<@џџ6"џџџџ<,џџ!D!\Є • j'ja8Є'jh( VЄ %4$>!D!\Є • j'ja(Є'jhЄ'jџџџџuџџˆџџџџ€џџџџœАAttribute VB_Name = "Tabelle1"  јBas|0{00020820-; C$0046} |Creatabl†False МPredeHclaId‡Tru "ExposeTempla€teDeriv$eCustomizˆ2Modul1 џџџџ)№<__SRP_3џџџџџџџџџџџџ?о __SRP_2 џџџџw–_VBA_PROJECTџџџџџџџџџџџџT•€ џџџџ€ J  € џџџџ€X€ џџџџ€€€@€€ џџџџ"8 P8 @ € џџџџ"… (€`€( €ˆ0 а +№    И  6’H #ј p6’8 6’€ PFЄh NЗИ X ` x'ˆ  Ј АИ№€ џџџџB €€€ р@(tˆ ш  X(t` P А И РH€ џџџџ" Ј И Ра и #шј$u ' (0 а и € џџџџ€ џџџџB h€ `H<ŠpАИРШа и€ џџџџ" ш ј   $u(р ј    №€ џџџџ" Xh €а иP р ш№p `€ џџџџ"  € (8H`hp€˜ $uЈ А ,†€  Р ј€ џџџџ" 8а€и.р$q8 #№$r` XˆЈ€ џџџџ"  А И&Ш №$ ((8 `$p ˜ЈАИ€ џџџџ" Р Ши€ џџџџ" р шј€ Жџџџџџџџџџџџџџџџџџџџџџџxо~єџџџџЅБHЄџџџџšжжц5џџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ џџџџ”џџџџџџџџLџџџџLџџџџ”џџџџLџџџџ”џџџџџџџџ@ўџџџџџ<џџџ џџ џџџџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџФbтџџ џџ @ўџџџџџxџџџџџ  иџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџЬЈЄ0Jрўџџџџ@ўџЈtџџџ џџ џџ@ўџиpџџџ џџ џџ@ўџ№`џџџ џџ џџ@ўџ\џџџ џџ џџ@ўџџџџџLџџџ џџ џџ@ўџџџџџHџџџ џџ џџ@ўџ88џџџ џџ џџ@ўџџџџџ(џџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџш џџџџ@ўџџџџџdџџџ џџ џџџџ@ўџџџџџ`џџџ џџ @ўџџџџџPџџџ џџ р€ @ўџА§џџ џџ @ўџ §џџ џџ @ўџ§џџ џџ @ўџ€§џџ џџ @ўџp§џџ џџ @ўџ`§џџ џџ @ўџP§џџ џџ L§џџ џџ @ўџ<§џџ џџ Ш8§џџ џџ @ўџ(§џџ џџ џџџџM ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрИЄ0Jџџџџџџџџр tџџџ џџ џџџџ@ўџpџџџ џџ џџџџ@ўџ`џџџ џџ џџџџ\џџџ џџ џџџџ@ўџLџџџ џџ џџџџр(Hџџџ џџ @ўџ8џџџ џџ џџџџXџџџџРџџџџШџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџШ(тџџIџџџџIШxџџџџџ @ўџ(џџџ џџ џџџџШXџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„џџџџШа ` џџџџH џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx џџџџџџџџџџџџџџџџџџџџџџџџШИtџџџ џџ йoI@ўџpџџџ џџ @ўџ`џџџ џџ р\џџџ џџ zI@ўџLџџџ џџ Ш@<џџџ џџ @ўџ,џџџ џџ ЂoI@ўџџџџ џџ ­pIџџџџ˜xџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџ0 џџџ џџ ŠpIџџџџцIџџџџtџџџ џџ ŒoI@ўџdџџџ џџ шpTџџџ џџ @ўџDџџџ џџ ш@@џџџ џџ ьyI@ўџ<џџџ џџ •oI@ўџ8џџџ џџ @ўџ(џџџ џџ ЋmI@ўџџџџ џџ †mI@ўџџџџ џџ џџџџџџџ џџ џџџџџџџџИа џџџџиџџџџџџџџ џџџџЈџџџџџџџџџџџџџџџџ@ џџџџџџџџџџџџџџџџџџџџџџџџџџџџШ MEџџџџџџџџџџ ўЪЖ€ $ € ,H € "x џџџџ"    € џџџџ"  ( 8 € џџџџџџџџx Z@ъиZъџџџџџџџџhZ@ъџџџџРСЄ Є%!DB@ІaХZъ $ЂŠ'ЈЄ'Ь` Zъˆ Њ$ЂЄ Њ$ЂЎ:=~Є $оU 'Ќ`9F Њ$Ђ Њ$ЂЄ Њ$ЂЎ:=~ Є $А'ЎF Ў ЌЄЄ Є%,Daџџ0lРZ@ъXf Њ'Фhї ЊіРu МЄ•ordeZъ иASh = ActiveSheet.IndexPџи=Sheets(ASh).ScrollArea = ThisWorkbook.Sheets(1).Cells(ASh, 1)ahlџџ@Є Њ$ЂЎ:~'М%eЄѕ%esШЎa1:a8Ўb7:b9A@ИXї ЊіЄ Ј‹%e„ї%eh0 Ш!6 ЊЄЄ Є%%D• Ш!6 ЊЄЄ Є%%D•sџџиhџџаї ЊіРlich a b•Є'Ф Њ'Фs(ASh)џџџџ ИlЄ'Ь Ъ$Ђ 0(2F ЪahЄ$Ђ Ј ”FЄЄ+ЂgЄ$ЂЄ ”FЄЄ+ЂgZ@ъЈЎ 0(2 Њ Ј •Єaџџ Њ'Ь ”Fhџџx ЬЄ•hЎ 0(2aџџPhXfZъ ЬЄЄ Є%%D 0(2ї ЊіЄ Ј‹Є'дС @ ЊЄЄ Є%%D$ $>!D!\Є •ll,R д'дaџџ Њ'дsџџ€hџџxї ЊіРinterslџџX дЄ•as lЄ'Ьaџџ8 д'Ьhџџ( ЬЄЄ Є%%D 0(2A@жиlџџш `$ФЄ•Џ'b @$ФЄ•Џ'baџџ Џ'bhџџ @$ФЎ  bA@–aџџPЏ'bhџџ@l ЊЄ”Fugas LonZъи` ЊЄ • ЬЄ 'Ь Ь Ј ”FЄ'ЬgЄ'`aџџШ ЬЄ 'Ь@ ЬЄ ”F Ј'ЬgЄ'`hџџ ЬЄЄ Є%%D 0(2С8Zъx 0!2Ў•Ў 0(2e_arah @$ФЄ•%Џ'ba 0!2ЄЄЄ Є%,DЄЄЄ Є%%D 0(2ЎЄЄЄ Є%,DlџџH ь$ютЎRHЎRIGHTHЎRECHTSHQE ђ J(№ЎDHЎDOWNHЎUNTENHQE є J(№ЎUHЎOHЎUPHЎOBENHQE і J(№ЎLHЎLEFTHЎLINKSHQE ј J(№PEkџџ@lџџ8@ЎRA@ъlџџ€ЎLA@ъlџџјРЎUA@ъlџџи ЎDA@ъlџџИџџџџАџџџџа `$ФA@тVBAPџџџџР hџџи џџџџа Ь `Є Є%%D 0% B@JЏ J(L ЄЏ J(LA@–Џ'bhџџˆ @$ФЄ•Џ'baџџ` Џ'bhџџP џџџџH иentwickelt von Winfried Radnerи&e-mail: Wolf.W.Radzinski@onlinehome.deиBenutzung frei - ohne GewфhrиC+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++џџџџШ Є'ЬaџџH Њ'Ьhџџ0 Ў 0(2aџџ ЬЄЄ Є%%D 0(2hџџи Њ$Ђ МЄ $о$ !6 Њ  ЄЄ Є%,Dџџџџ№ $ЂŠ 'ЈЄ Ј$ЂŠ Є Ѕџџ •ЎZu viele Bereiche!A@– uhЄ'ЈZъРџџџџ  а lџџ Њ$Ђ$ !6 Њ  ЄЄ Є%,DЊ Њ$Ђ$ !6 Њ  ЄЄ Є%,D Њ$Ђ Њ$Ђ М $А$ !6 Њ  ЄЄ Є%,DЄџџџџˆ ЈЄ ' $ї ЊіЄ$ЂŠ‹ Њ$Ђ$ !6 Њ  ЄЄ Є%,D,џџџџј 9ЖAttribute VB_Name = "Modul1" 'entwickelt von Winfried R adner€-mail: Wolf.W..zinski@onlinehome.dePBenutzung frei - ohne `GewфhG +? OptiЉExplicitPriva!сr AsЙngcsprI Boolean  ParamAnzahlLongactive`_areaub; Sub delete_SAs() ThisWorkbook.Sheets(1).Cell8s.C<‚ 8= Р0 End%‚a ,f€Ќ,ƒrra@y pa()DV@ariant9D0im iNug‹jIntegsOn Erro@r Resu@‚NDexРOIf &+ UBound() + 1 > 65535 The€O MsgBox "Zuˆ vi€A BeР|0che!Р”РExit69If j Р&=L1Ta=F РЫ FР+i!­0 ToŠ& ™](i@/ug,Ш 1)РRaР…5i)).Addr(ess‚jIn@Str(1,AYiР), ":"XРпGСХ>%2eт3]Els@Л€e!шLeft#", Zj v1,#_ + 6,B ˆRighf Lьen.€ j С_!CУр AQ i ЩnBd0is_randтz@ie(AтrСj!#Уш2}= FaE"f#ёfTruЃ%Eс€yqЉˆFun` @ŒъaўcAi‚HТpЃ… Ќp пщ`Kр|€ХX1СXшmчBPррacхR [|, Р8ЦqР@Ь-џ ) rEсdsЯ@@gš(iт>{љ_ %1Cх@ЁчёъЎset`Ѓ€{`КЁ0uAbs(i)џ@•i™ІЮJ  ІC‹ џb$Eт"ЧСрRGЁуQО.ScrollAџAЦ€ьDЁ…Q:=hс˜ЯЭi>_cЏ1 Џ1U_qЄ1№$v5 jdр_acSASiу0fџf2–Г11#yЂAбkrsectј ,}S~(Џ *M&x0mtќ <аl*+ЩЖЂё(џ&"СЉ‡-Ÿ5‚w5-ўo@t-Ѓ ™šgї›*аsБ X v џ•Џ(4+џјИЃ( §џ'eЏY7&ЏYџ'Aј'PЧ‘switchЅТ‘zY Эzяaq яa Аd0Й! i• ƒ_qБ(Šz)Уч "4= Vf— џх‰ d5p6‘ѕЪMс3пЂvœБС3RH (‚:љr< )# !й€c![Py>:š щ=ъ d'z2G›§й-uь9LrсО3ф$o,o,ОИ(H )c,Ap‘ФaQХ.E€nableEv`бўs№ є*‰cЄ22ЁУЄ, А".S ВcЖŸ–##™!'/temАpNoSVаЯn/Мм !"Q1S№оЬ /"<> є""7l  пЫеЫaБо4б4ЯС3 Я’їvp€~•p ЯEsxНрЙ4…7р"#x7†џp3 c{Dirs@f х(dgрУ @Case UQ(FdC"R"аТRIGHT‚ECH0TS":CљMoveAfterR`eturnж` xИlTorГRcDбDOWNqUNT|ENE0ErDowЪАn Case "U", $"O UPPBEN":€Œ Application.MoveAfterRetur@nDirec0 @= xlUpЈL!’LEFTINKS1ЄToLefBtVElse™E@nd Sel~   ub PubЌ Sub scrRight()?ScroФllА"R":Ѕ”L™Up”U™PDown”D‹ ) i A ‘ Й с ! Y Й бб ™ ™‘ щ 1 ё  ЄdP`џ(dџ%tџxџѕ "$ Рxџ Рtџ d`џWPџ§Ÿў˜)xџtџ`џ5Pџ ѕ™,d$ xџtџ`џPџˆ0Kџџ”€ єќЫЊѕЊѕџџлS+' џ'0џ'@џѕ:`џNPџPџ 6Pџ@џ0џ џ”ѕЊqtџltџ€ єќЫЊ™ѕxџ€ єќЫўdџо’lxџltџЊ§iшў%(иў%џ'Pџ%lxџ€ ќВ`џ%"$  џa@џь`F0џ%јў(ќў% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў6Pџ@џ0џ#ѕlxџ€ ќВ`џ:ќўѕўўPџUprџ krџєЦu’lxџltџЊ§iшў%(иў%џ'Pџ%lxџ€ ќВ`џ%"$  џa@џь`F0џ%јў(ќў% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў6Pџ@џ0џ’lxџltџЊ§iшў%(иў%џ'Pџ%lxџ€ ќВ`џ%"$  џa@џь`F0џ%јў(ќў% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў6Pџ@џ0џвЄkrџє­чlxџ€ ќДPџ  lxџltџЊ§iќў%(шў%џ'@џ%ќэPџ"$  џa0џь`F џ%јў(`џ% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў6Pџ@џ0џ џЗlxџ€ ќВ`џћыPџkrџDќўћœ@џќ"lxџ€ ќД0џ lxџltџЊ§iиў%(Иў%џ' џ%ќэ0џ"$  џaШўь`FЈў%јў(шў% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў60џ џШўЈў xџfџŽ ѕ™ 'џ"$ (џ^ ѕЧџ є˜( єџ˜д0$( 4 џџ џјўPџ@џ0џ џШўЈў€4 ѕqxџѕtџ”ўdlџ.tH a\џь`F џ]tџ§“@(0џ%@џ(Dџ%TџXџѕ "$ РXџ РTџ d@џўšџћ/џ)XџTџ@џ6\џ џџ\Ё ltџИqxџtH a\џь`F џ]tџ§“@(0џ%@џ(Dџ%TџXџѕ "$ РXџ РTџ d@џўšџћ/џ)XџTџ@џ6\џ џџ\"ltџqxџ tџflџ!|4$" (XџTџ@џ\џ џџџh$€ М”л ѕ™ - € М™ ” ѕЧe#:hџ %xџ"$ @xџў› xџмu §“@(Pџ%`џ(hџ%dџxџѕ "$ Рxџ Рdџ d`џўš<џ%Lџ"$ @Lџў› )xџdџ`џLџ5<џ'xџ"$ (xџ^ ѕЧxџ є˜ єџ˜@$$ xџdџ`џLџ<џ0 ќЦX  0 ќЦ  „Tl ^ ѕЧ! є˜O “Bl ^ Yxџ M єџ˜T$O а€ ѕЧ€ ѕбY” ѕЊ™ ” ”лO ѕ™ єpzџ” ѕЎ™ ” ѕб‰ ”™ єpzџu §“@(Lџ%\џ(`џ%pџtџѕ "$ Рtџ Рpџ d\џўš8џ%Hџ"$ @Hџў› )tџpџ\џHџ58џ єtџ"$ tџ Дtџ† §“@zџ§“@\џ(`џ%pџtџѕ "$ Рtџ Рpџ d\џўš8џ%Hџ"$ @Hџўš(џ§Ÿў˜)tџpџ\џHџ68џ(џ єџtџ"$ tџ ДtџTа$ $tџpџ\џHџ8џ(џ0 ќЦР  0 ќЦ  0 ќЦ@  0 ќЦ€  0 ќЦР  0 ќЦ       *rU€€€ џџџџџџџџ$ўџџџƒ„…†‡ˆ‰Š‹Œўџџџ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВўџџџДЕЖўџџџИўџџџКЛМНОПРўџџџТУўџџџХЦЧШЩЪўџџџЬўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`§џџџџџџџџџџџ(Љ`ќ§џџџџџџџџџџџao,б`ќџџџџџџџџџџџ‘=q(љ`§џџџџџџџџџџџЁ($!`ќџџџџџџџџџџџ$I`§џџџџџџџџџџџ,q`§џџџџџџџџџџџБ=q(™`ќџџџџџџџџџџџЁ($С`§џџџџџџџџџџџ(щ `§џџџџџџџџџџџС0$ `§џџџџџџџџџџџ$9 `§џџџџџџџџџџџ$a `§џџџџџџџџџџџ$‰ `§џџџџџџџџџџџpЮВ€0* pH‚dф VBAProjeˆct4@j = r q0/<” J< r€stdole>stdo€le f%\*\G{00€020430-C 0046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.Tlb#OLE Autom`ation^€MSFor ms>SFErmsа/z€ p€FC29D6160-F580-11€D4-A92CF374890932F3.TWD#Microsoft = ` ObА LibrarŽy9P0r€P1F1147C2-EE9D P5"P€JP\VBWorksheetsМј €џџџWorksheet_Шј€џџџ_B_var_Worksheet_ѓf workshhet€џџџ_B_var_workshhetQ €џџџ_B_var_callЗй€џRun_а €џџџ_B_var_sprungIƒ€џџџ_B_var_rЂ Modul1Э€џџџ_B_var_Worksheet…ј€џSheets xo€џџџ_B_var_xЂMsgBox—R €џџџ_B_var_ShФѓnurџК €џџџ_B_var_nurxbeizxresetSAeФpaІ^ €џThisWorkbook|уClearуЭ ParamAnzahl’Јi`ixК]sx,_Right set_SAsiЉ IsMissing˜эdef_SAsr  Ќ(define_SAsxЁpgja _B_var_LeftQс _B_var_Right9йtest4Ћ is_randzelleа€ €џџџ_B_var_ForjLac}\pa0ЋТ active_areaЊЌ(set_SA3… define_acSAфGaa{\ find_acSAЇџЌ(set_acSAШ6 Ќ(switch_SAsŠC spinge_vonЩN€џџџ_B_var_spinge_von3Н israndzelleК€џџџ_B_var_israndzelle springe_vonи€џџџ_B_var_springe_vonћЙЌ(tempNoSAйUtempRЊЌ(ScrollDirectionZfd[UCase5 €џMoveAfterReturnDirectionБ €џxlToRight|Ъ€џxlDown0D€џxlUp ч€џxlToLeftWYЌ(scrRightйqЌ(scrLeftHbЌ(scrUp˜AЌ(scrDownžl€џActiveWorkbookЂModul2Ю Ќ(delete_SAsщ €џџџ_B_var_UBoundлduge_џџlџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџ6Adirџџџџџџџџџџџџ‚в__SRP_0џџџџџџџџŽ __SRP_1џџџџџџџџџџџџГСPROJECTwmџџџџџџџџџџџџЗh$E\…(EXЇ(с.E р….Р`ŒM ДA”Cx OfficDxO@u ficBx‹Р+Ф,2DF8D04C-5BFA-101B-BDEв5UAA@w4Р UPROGRAMM+ICROSOFTOFFICE\„MSO97.D LLYC" 8.0ERYЛТЅБ'DieseArbeit€smappe“X2"A 7e@Œe@Arb€9iEЕs@‘ap@eD@ HB1С‚ЦZB,BЇБA+Т РTab@elle1J2ЄСaBlЯj1PТPЁLrMАodul` g2‚sbM aduр Б цт5oHЄ! eЁ“K)^џџџџrU€€€~~~~~~~~~~~~~~~P VдPб?§еЉ,t‰ 2 ф џџџџџџџџџџџџЉƒŠa y џџџџџџйˆa йџџџџPџџџџб 1QЁЙйб )Iq‘ЉСџџљёё щйDieseArbeitsmappeTabelle1Ьa^џ ф*\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAMME\GEMEINSAME DATEIEN\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.2#0#C:\Programme\MicrosoftOffice\Office\EXCEL8.OLB#Microsoft Excel 8.0 Object LibraryИ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.Tlb#OLE Automationр*\G{C29D6160-F580-11D4-A92C-000374890932}#2.0#0#C:\WINDOWS\SYSTEM\MSForms.TWD#Microsoft Forms 2.0 Object Libraryф*\G{1F1147C2-EE9D-11D5-A92C-000374890932}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\PROGRAMME\MICROSOFTOFFICE\OFFICE\MSO97.DLL#Microsoft Office 8.0 Object Libraryџџџџџџq0/<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЅБ"DieseArbeitsmappe d23c2f3624*DџџЇБZџџTabelle1 113c2efa6b*DџџЁБТџџ Modul1 1a3c2f30a7*DŒџџHЄhц5џџ0ˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЃзaeќеЉ,t‰ 2џџџџЅзaeќеЉ,t‰ 2џџџџџџџџ(Љ,t‰ 2џџџџџџџџЉ,t‰ 2џџџџџџџџ:э0mќеЉ,t‰ 2џџџџџџџџH€…Ёџ8 €џas€џBoolean€џCall€џCase=€џdimD€џElseH€џendifQ€џexplicitR€џfS€џFalseU€џFor`€џIfk€џintegerl€џIsy€џlong‡€џNothingˆ€џNullŒ€џoption€џoptional–€џPublicž€џResumeЅ€џsetА€џSubГ€џthenД€џToЕ€џtrueИ€џUBound Excel€+ VBAїтWin16С~Win32MacГВProjekt1вA stdole“`MSFormsC VBAProjectОП Officeu DieseArbeitsmappeЏ €џ_EvaluateйŒЈџTabelle1RŠTabelle2SŠTabelle3TŠri€џRangeк Worksheet_Activate+ „џWorksheetСў€џUnionљВWorksheet_SelectionChangeб4TargetЌF€џColumn i€џRow‰Я €џActiveSheet%N €џScrollAreav€џAreasќK€џAddressЇХ€џActivate—|€џSelectionChangeуnWorkbookk €џIntersect1 €џActiveCellНЗ €џџџ_B_var_IfPђ€џCells isnothing3С€џџџ_B_var_isnothingxЪ €џApplicationЅ* €џEnableEventsмС€€џd20T€ €џџџ_B_var_d20e=€€џa10$p€џ_DefaultjТtk €џџџ_B_var_Set€џџџ_B_var_tЂCount0v €џџџ_B_var_On6ѓzqsprung €€џe7]€€џb10}u Workbook_Open›сaX€џџџ_B_var_aЂ€џџџ_B_var_Worksheet_ActivateЕBWorkbook_SheetActivate№7sh_ €џSheetActivate‘  €€џtabelle1!ќё€џџџ_B_var_tabelle1!Aћ €џModul1 VBAProjectяРF?C:\PROGRAMME\GEMEINSAME DATEIEN\MICROSOFT SHARED\VBA\VBA332.DLLVBA 1џџџџ Yс(РF .C:\Programme\MicrosoftOffice\Office\EXCEL8.OLBExcel Iџџџџqй80РFC:\WINDOWS\SYSTEM\StdOle2.Tlbstdole switch_SAs IџџџџqЙH`aТ€ѕдЉ,t‰ 2C:\WINDOWS\SYSTEM\MSForms.TWDMSForms aA‰бXс.E р….`ŒM ДТGюеЉ,t‰ 2C:\WINDOWS\TEMP\VBE\MSForms.EXD iA‘бhLај-њ[НхЊDоR -C:\PROGRAMME\MICROSOFTOFFICE\OFFICE\MSO97.DLLOffice 1џџџџYСx define_SAs is_randzelleFРFset_SA find_acSAset_acSA springe_vontempNoSAScrollDirectionscrRightscrLeftscrUpscrDown РF ИйРF A џџџџкРFзРFCellsClear : VBA332.DLL 9 џџџџi Ш 9 џџџџk р 9 џџџџP јиРFВ|— §еЉ,t‰ 2 РFБ|— §еЉ,t‰ 2DРF Worksheet @ ScrollArea RangeSelect 9 џџџџS 8еРFModul2 delete_SAs Zu viele Bereiche!6rU€€€€~~{ џџџџџџџџџџџџџџџџ  pa ёyacizd ё1 bDieseArbeitsmappeDieseArbeitsmappeTabelle1Tabelle1Modul1Modul1ID="{1F61D81D-FC65-11D5-A92C-000374890932}" Document=DieseArbeitsmappe/&H00000000 Document=Tabelle1/&H00000000 Module=Modul1 Name="VBAProject" HelpContextID="0" CMG="3E3C98DCE8242228222822282228" DPB="7C7EDA1A265927592759" GC="BAB81C605B615B61A4" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] DieseArbeitsmappe=55, -3, 648, 421, C Tabelle1=22, 22, 615, 446, C Modul1=66, 66, 659PROJECTџџџџЙЩSummaryInformation(џџџџџџџџСДDocumentSummaryInformation8џџџџџџџџџџџџФ CompObjџџџџџџџџџџџџЫh, 490, ўџ р…ŸђљOhЋ‘+'Гй0„8@LX p|фwrwrMicrosoft Excel@€k~iСўџ еЭеœ.“—+,љЎDеЭеœ.“—+,љЎФ PXd lt|„ Œ Ёф-lГ   Tabelle1  Tabellen˜ 6> _PID_GUIDфAN{1F61D81E-FC65-11D5-A92C-000374890932}ўџ џџџџ РFMicrosoft Excel 8.0-TabelleBiff8Excel.Sheet.8є9Вq