аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ o O#  ўџџџ" !ўџџџ^%&';)*+,-./0123456789:$<=>?@ABCDEFGHIJўџџџLMNўџџџP_RSTUVWXYK[\]ўџџџnhabcdefgZijklmpўџџџўџџџqrўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РFРxЯ/о™СL­АЈС@$Workbookџџџџџџџџt _VBA_PROJECT_CUR"`жЩЦџЇСЧуЦџЇСVBAџџџџџџџџ`жЩЦџЇСЧуЦџЇС  !"#$%&'()*+,-./01ўџџџ345ўџџџўџџџ89:;<=>?@AўџџџCDEFGHIJKLMўџџџOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwўџџџyz{ўџџџ}ўџџџ€ Ь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Ўќ  $E$4:$E$27Tabelle1џњ  }Lr0 рТb‚Lr0ХbmїПї€’џџџџ _bЋЫr0X/я тЭr0 `/яєУbџџџџџџџџDџџџч№Џ0д’(РРР„“^ ЧDIЩr0–э ŠФbIЩr0L/я рУb  рУbL/я $УРРРИ2“ф„цS0œУb]Ч0Х0вŽфвŽф$Loы^n0Ч0гоУbќ ѓG0Х0њЧ0#G0L/я рУb H/ярХ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ŒХbХЙїП$Fk‡К=s0З0{=s0?0lХbь'я@эhь'я@э|Б0ь'яhэ‡иХbјХb\э$Цb”s0ЦbЦbУЕ0 ЬI и .  dќЉёвMbP?_*+‚€%џСƒ„Ё"џFvŠ<ќ§~п?Š<ќ§~п?NJU џT0§ § § з>>Ж@К Tabelle1 rU€€€ QЩ yџџџџy 41 бY џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ{crU€€€ џџџџџџџџ@prU€€€ џџџџџџџџ$DieseArbeitsmappe$ џџџџџџџџ Tabelle1џџџџb__SRP_4 џџџџ2к__SRP_5џџџџџџџџџџџџ6@џџџџџџџџ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 џџџџ(€L__SRP_2 џџџџQ„__SRP_3џџџџџџџџџџџџ7Л_VBA_PROJECTџџџџџџџџџџџџ`$`€ €ˆ0 Ш +ш    А  6’@ #  x *w˜ˆ FЃ ,:А #ј p6’0 6’x PFЄ` NЗА X ` x'ˆ  Ј АИ№€ џџџџB €€€ р@(~h (tˆ ш  X (t` P А И p  РH€ џџџџ" € Ј И Ра и #шј(€р 2.•` 6     Ј$u ' ( Ш а € џџџџ€ џџџџB h€ `H(~(<Šp А И Р Ш а и€ џџџџ" ш€ ј   (€Ш0№.” 5 @ H P$u('и  № ј   №€ џџџџ" а &p№8(и€ џџџџ"  Xh €а иH р ш№h `€ џџџџ"  €€X (8H`hp€˜ (€P0@.”€ 5` x € ˆ№$uЈ Ј ,†x  И ј€ џџџџ"8а€РЖџџџџџџџџџџџџџџџџџџџџџџxоМ$ђџџџџЅБHЄџџџџи$жжCџџџџпџџ,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ џџџџ< џџ<(џџџџџџLџџџџ”џџџџџџџџLџџџџLџџџџLџџџџ”џџџџџџџџLџџџџLџџџџ”џџџџLџџџџ!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С8 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,џџџџј h МЄ•tr(1aЄ Њ$ЂЎ!~'М Њ$Ђ Њ$Ђ М $А Њ+Ђ Њ 0! ЬЄЄ Є%%D•hhh Њ$Ђ МЄ $о$! Њ  ЄЄ Є%,D 0! ЊЄЄ Є%%D•hџџ( 0! Њ  ЄЄ Є%,D 0! ЬЄЄ Є%%D•hhZъРї шіЄ !\‹r 0! ЊЄЄ Є%%D• 0! ЬЄЄ Є%%D•r hї шіР$r 0!ЄЄЄ Є%,D 0!ЄЄЄ Є%%D•ї шіЄ !\‹% ш$B@8ЎЄЄЄ Є%,Dџџџџ€ ї шіЄ !\‹etZъш ш$B@8 ш$B@8 ш$! ЬЄЄ Є%%D•ivї шіЄ !\‹ ш$!ЄЄЄ Є%%D•hџџАї шіР ш$! ЬЄЄ Є%%D•rџџhhџџ`ї шіР ш$! ЬЄЄ Є%%D• ш$B@8hџџї шіРџџџџZъxџџџџРиlџџРlЄ'Ј ЈЄ 'Ј ЬЄ”Fug ЬЄ •hџџHџџџџ@ ЬЄ A@тЄ Є%!DB@,џџџџ( іЩ4 ЬЄ Є%%*B@,џџџџZъ@џџџџгЕ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СХ>%4A;B‘‚ƒ.п@El~sРЈ€Ђ0B„•Lˆeft2, jк.14 niBš^– n- ж)џЫƒRХ 2gyp1'iI#ScrollA?Ё{РŽ$iХ01 \Y <ю>€џ{ѕ{(˜ Л&б,"=`r№iZ.Ctпuг„[‘)r`)џ ƒиgPњ’р(§ƒ)o ‡#P5џсEшŸ”O8(+*ў1ѓeE™4ПKе ПK~ ПKПKW” +Д e, А”d_acSAу“џƒ*Ÿ‘,L–аРKŸKџГЃ" yсx?;@>lK@БšrsectѕH,3­(џ+Cp€Їљ( ”# ‚ Row:).Dђп shiftР:=xlUpБЉдYыЮ- ) iШ_љсі(-Y жrSЕq5™зсswitch-всzЇ˜/zsЁžГThen sprung €= FalserE@IfxИФinge_von (is_randzelle(z)>)€H†`ФTruТ@nd If o ESub Priva8te ‚o(i As LongAhDim zInteger atemp Фi о0 У Exi’tU ‚ < ƒ [active_0area€‰+ 1€‰ > ParamAnzahVlƒ0 =z€'2/ƒ ‡Œ‹‰-7< о12ˆAƒ1737Ў- \=> DA@Sheet.Name <>РisWo€rkbook.‚@s(1).C@|sТ(-, 4)'Т0For ‚b€@ To .CounZt& €„(A )§C=4€”€Ф'УB3џ@‘ХР‚Р&‰H@с€Next.BAЄЉЩEScrollRAУˆTh%G1@ЌApplication.Enabl€eEvents‡гDп Ra@й(g@пР.SelecXXsсЩкub Bmс&NoSA(€On ErrР8Resu?@A!#TlB9t$ H""чB л;1, 5)пР!“ Є6Z" 6-AYУdД= ""$(——`fщ?bl@c, рљщЅ ŸaƒO?bPpџ У aЂ0bуЪbBяscBж*}55 M"џРB†4НB@G:d“^z˜Dir g s(dСЧ8Str€Ю€#j C ase UЁ(dC""R", " RIGHTEC`HTS":CI‰pMoveAfterРReturnІ €xlToRigh уЂУ DЁ DOWNСсUNTEN… €%џ ѓ= xlDoVwƒќƒ U O" P}BBoдIя Ут Upђ CL‘LEFсђLINKцŸ у№LefA8SЯ2TMџђcrтAKќ мР€=„Q“Q "LicRR`scrUp_RU__WёrD{$ @tџWTџ:dџ]ћ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\VBrU€€€€~} $1 ё ) i A ‘ Й с QiY Й ! бб ™ ‰ ‘ щ Ё i‘Сй)AYyЁЙсЄdP`џ(dџ%tџxџѕ "$ Рxџ Рtџ d`џWPџ§Ÿў˜)xџtџ`џ5Pџ ѕ™џџџ,d$ xџtџ`џPџИKџџ”€ єќЫЊѕЊѕџџлS+' џ'0џ'@џѕ:`џNPџPџ 6Pџ@џ0џ џ”ѕЊqtџltџ€ єќЫЊ™ѕxџ€ єќЫўdџg’lxџltџЊ§iшў%(иў%џ'Pџ%lxџ€ ќВ`џ%"$  џa@џь`F0џ%јў(ќў% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў6Pџ@џ0џ#ѕlxџ€ ќВ`џ:ќўѕўўPџUprџ krџєЦШwlxџltџЊ§iќў%(шў%џ"$ @џWPџ %јў(`џ% џџѕ "$ Рџ Р џ dјўўœ)џџ џјў5PџЇЃkrџє­чlxџ€ ќДPџ lxџltџЊ§iќў%(шў%џќэPџџ"$ Иџ dџW@џ %дў(`џ%јў џѕ "$ Р џ Рјў dдўўœ) џџ џјўдў6Pџ@џ:lxџ€ ќВ`џћыPџkrџDќўћœ@џќ"lxџ€ ќД0џ 0џlxџ€ ќЕ50џ#ѕlxџ€ ќВ`џ:ќў ѕўўPџUprџ krџєЦў’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џŽ ѕ™ 'џ"$ (џ^ ѕЧџІ є˜Б єџ˜иИ$Б 8 џџ џјўдўPџ@џ0џ џФўЄўД ѕqxџѕtџ”ўdlџЎ~hџ"$ @hџW,џ tџ§“@(<џ%Lџ(Pџ%`џdџѕ "$ Рdџ Р`џ dLџўšџћ/ џ)hџdџ`џLџ6,џџ\ЂtH a,џь`Fџ]tџ§“@(<џ%`џ(Pџ%dџhџѕ "$ Рhџ Рdџ d`џўš џћ/ќў)hџdџ`џ6,џџ џ\ ltџИqxџtH a,џь`Fџ]tџ§“@(<џ%`џ(Pџ%dџhџѕ "$ Рhџ Рdџ d`џўš џћ/ќў)hџdџ`џ6,џџ џ\ ltџqxџ tџflџ!€Д$Ђ ,hџdџ`џLџ,џџ џќўД€ М”л ѕ™ - € М™ ” ѕЧe#:dџ%tџ"$ @tџў›tџl€tџ"$ @tџW8џ  §“@(Hџ%Xџ(dџ%\џ`џѕ "$ Р`џ Р\џ dXџўš(џћ<џ)tџ`џ\џXџ68џ(џ\ѕ2ѕxџџtџ"$ Иtџ 0lџtџўd џѕ•`џlxџ§idџ%tџ"$ Иtџ d`џW8џ  §“@(јў%џ(Hџ%Xџ\џѕ "$ Р\џ РXџ dџўš(џћ/џ) tџ`џ\џXџџ68џ(џ\щ6`џlxџ§idџ%tџ"$ Иtџ d`џў˜)tџ`џѕ xџf џu §“@(Hџ%\џ(dџ%`џtџѕ "$ Рtџ Р`џ d\џўš8џ%Xџ"$ @Xџў›)tџ`џ\џXџ58џ'tџ"$ (tџ^ ѕЧtџЁ є˜Ќ єџ˜„Д$Ќ ,tџ`џ\џXџџ8џ(џџ0 ќЦX  0 ќЦ  0 ќЦи  0 ќЦи  Рp€ ѕЧ€ ѕбY” ѕЊ™ ” ”лO ѕ™ єpzџ” ѕЎ™ ” ѕб‰ ”™ єpzџ” ѕЧЅ€tџ"$ @tџW8џ  §“@(Hџ%Xџ(\џ%lџpџѕ "$ Рpџ Рlџ dXџўš(џћ<џ)tџpџlџXџ68џ(џ\/0єxџџtџ"$ Иtџ 0lџфtџўcџ/”pџkxџD\џ%tџ"$ Иtџ dpџW8џ  §“@(ќў% џ(Hџ%Xџlџѕ "$ Рlџ РXџ d џўš(џћ/џ) tџpџlџXџ џ68џ(џ\#5pџkxџD\џ%tџ"$ Иtџ dpџў˜)tџpџ/ xџdџUu §“@(Hџ%lџ(\џ%pџtџѕ "$ Рtџ Рpџ dlџўš8џ%Xџ"$ @Xџў›)tџpџlџXџ58џ єtџ"$ tџ Дtџ† §“@zџ§“@lџ(\џ%pџtџѕ "$ Рtџ Рpџ dlџўš8џ%Xџ"$ @Xџўš(џ§Ÿў˜)tџpџlџXџ68џ(џ єџtџ"$ tџ Дtџ€p$/ ,tџpџlџXџ џ8џ(џџ<ьKџџ.tџ"WorksheetsМј €џџџ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_kb€џIndexёП €џџџ_B_var_IndexоƒItemзz €џџџ_B_var_ItemCрfir{Ž €џџџ_B_var_firŒK €џџџ_B_var_tempsheet[ж €џџџ_B_var_sheetHštmpый €џџџ_B_var_tmpќ–deleteSAH{ €џџџ_B_var_SubН’Ќ(deleteactiveSA”k€џRowsЁU€џDeleteИx sprinbe_vonŒf€џџџ_B_var_sprinbe_vonюW deleteallSAs6кshiftфыupn_ _B_var_UCaseaЮџџlџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџ6AdirџџџџџџџџџџџџBв__SRP_0џџџџџџџџN{ __SRP_1џџџџџџџџџџџџxС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р Б тCoHЄ! eЁ“K)^џџџџrU€€€€~~~~~Ь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џџџџџџ‰дD< џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЅБ"DieseArbeitsmappe d23c2f3624*DџџЇБZџџTabelle1 1a3c5550ca*DџџЁБТџџ Modul1 53c44d9ac*DŒџџHЄhCџџ0ˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЃзaeќеЉ,t‰ 2џџџџЅзaeќеЉ,t‰ 2џџџџџџџџ(Љ,t‰ 2џџџџџџџџЉ,t‰ 2џџџџџџџџ:э0mќеЉ,t‰ 2џџџџџџџџH€œИџ; €џ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ћ €џ~~~~~~~~~~~~~~~6 РœцНљжЉ.t‰ 2 ф џџџџџџџџџџџџЉƒŠa y џџџџџџйˆa йџџџџрџџџџб 1QЁЙйЙб )Iq‘ЉСџџљёё щйDieseArbeitsmappeTabelle1Modul1 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! !NameActivatedeleteactiveSARowsDelete deleteallSAsйœцНљжЉ.t‰ 2иœцНљжЉ.t‰ 2 R  9 џџџџ 8 RIGHT RECHTS D DOWN UNTEN U O UP OBEN L LEFT LINKS?rU€€€€~~{ џџџџџџџџџџџџџџџџ  pa ёyacizd ё1 bDieseArbeitsmappeDieseArbeitsmappeTabelle1Tabelle1Modul1Modul1ID="{1F61D81D-FC65-11D5-A92C-000374890932}" Document=DieseArbeitsmappe/&H00000000 Document=Tabelle1/&H00000000 Module=Modul1 PROJECTџџџџ~ОSummaryInformation(џџџџџџџџ…ДDocumentSummaryInformation8џџџџџџџџџџџџˆ CompObjџџџџџџџџџџџџh‚ƒ„ўџџџ†‡ўџџџ‰Š‹ŒŽўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Name="VBAProject" HelpContextID="0" CMG="1012B6BCBABCBABCBABCBA" DPB="989A3E413F413F41" GC="202286C987C98736" [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, 659, 490, Z ўџ р…Ÿђљ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