аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ - ўџџџ  (/% !"#$&'ўџџџ)*+,0ўџџџўџџџ@123<56789:;.=>?AўџџџBўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РFРžцYС aЙ„С€1Workbookџџџџџџџџ _VBA_PROJECT_CUR"рј_EС YИ`EСVBAџџџџџџџџРп`EСР&`EС  !"#$%&'()*+,ўџџџ./0123456789:;<=>?@ABCDEFўџџџHIJўџџџўџџџMNOPQRSTUVWXYZ[\]^_`abcdefghijklmўџџџopqўџџџstuvwxyz{|}ўџџџ€ ЬI‡сАСт\pwrH BАa=гКDieseArbeitsmappeœЏМ=x;U#<X@"Зк1ШџArial1ШџArial1ШџArial1ШџArial#,##0\ "DM";\-#,##0\ "DM"##,##0\ "DM";[Red]\-#,##0\ "DM"$#,##0.00\ "DM";\-#,##0.00\ "DM")$#,##0.00\ "DM";[Red]\-#,##0.00\ "DM">*9_-* #,##0\ "DM"_-;\-* #,##0\ "DM"_-;_-* "-"\ "DM"_-;_-@_->)9_-* #,##0\ _D_M_-;\-* #,##0\ _D_M_-;_-* "-"\ _D_M_-;_-@_-F,A_-* #,##0.00\ "DM"_-;\-* #,##0.00\ "DM"_-;_-* "-"??\ "DM"_-;_-@_-F+A_-* #,##0.00\ _D_M_-;\-* #,##0.00\ _D_M_-;_-* "-"??\ _D_M_-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р ѕџ јР р,ѕџ јР р*ѕџ јР “€џ“€џ“€џ“€џ“€џ“€џ`…а Tabelle1Œ11ЎќA:AџР Ф§џџ…<ч}‚A ь§}‚ŸŸ рУbЉєe/„A ШУbИм тЭr0 РмјУbЯќ‚џџџџџџџџ8Ѕ~‚џџџчќ‚ќ‚G˜‚f№Џ0Є ?eЌ‚А.r0ЈSm0рЄє ќ‚#5‡Є є IЩr0Ќм фУb  фУbЌм DїП3#іПTУbX.0xo0€Є С\Уb„цS0 Уb]Ч0Х0c6їПЄ шbЦbы^n0Ч0гтУbќ ѓG0Х0њЧ0#G0Ќм фУb ЈмфХb]‚Y0рУb џџџџ$м Цb Wфhrung [0]_< ZцS0pФb\мtХb Я0v‡pХb‰0ZT0в_T0Qw0в_T0# кp‡АФb-Q0 Фк‡ќ‡#к?єФb-P0Фк-‡"Цb Цb‡XNJT0e0№YT0ькL‰0ьк№YT0LNJT0ўХbЦb1v0 $@цbшM0ХbИЄкЇ=s0{=s0?0pХb\м”м\\м”м|Б0\мМ м‡мХbќХbАм(Цb”s0 Цb ЦbУЕ0 ЬI Œ Ц  dќЉёвMbP?_*+‚€%џСƒ„Ё"џ"ЦbŠ<ќ§~п?Š<ќ§~п?NJU џT0§ з">Ж@К Tabelle1 Жџџџџџџџџ<џџЗјЖˆеН DEST РFЖјЖˆеН DESTџџџџџџџџџџџџxњ8џџџџŠ|Ž|џџ#ˆЖјЖˆеН DESTDieseArbeitsmappe$ џџџџџџџџ ЭTabelle1џџџџ-R__SRP_6 џџџџGк__SRP_7џџџџџџџџџџџџK@Ј›`џџџџрЎ R(( resџџџџ€џџџџˆџџџџpџџџџplџџ€ЎA:TЎЎ $A$5:$C$65536ЎA:AЎA@rи+setze die Scrollareas fќr Sheet1 bis SheetN%eќі%eџџџџ  8ЄЄ †%>%ˆ 8$>((џџџџ` R!<ЄЄ †%>%ˆ R((џџџџ˜ЇАAttribute VB_Name = "DieseArbeitsmappe" "  Bas 0{00020819ъ-0C$ 0046} |Cr@eatabl†False ^Pre declaIdTru "ExposeTemplateDeriv$eCustomizD2ЗјЖˆеН DESTџџ.ђђВџџџџ4џџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ([LџџџџSџџџџS”џџџџ6"џџџџџџN0{00020820-0000-0000-C000-000000000046}ЗЄj;$*\Rffff*413b6a81fcп8Xўџџџџџџџџџ(џџџџџџџџџџ$џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџЖџџџџџџџџ<џџжјЖˆеН DESTРFејЖˆеН DESTџџџџџџџџџџџџxњАџџџџŠ|ˆ|џџ#ˆејЖˆеН DESTжјЖˆеН DESTџџ.ђђ"џџџџ4џџџџпџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ [LџџџџSџџџџ[”џџџџ6"џџџџ<4џџ<џџ<џџ<џџ<џџ< џџ<$џџ<(џџ<,џџ<8џџ<<џџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}ЗЄj;$*\Rffff*cd3b6a8508пЈрўџџџџџџџџџ(џџџџџџџџџџ2.$џџџџ $ $ $ $ $ $ $ƒўџџџџџџџ8џџџџџџџџџџџџџџџџџџ $ $Шiƒўџџџџџџџџџџџџџџџџџ  $ $ $ƒўџџџџџџџ@џџџџџџџџџџџџџџƒўџџџџџџџаџџџџџџџџџџџџџџ‚ џџџџўџџџиџџўџџџџџџџџџџџƒўџџџџџџџрџџџџџџџџџџџџџџ $ $ $`„Rџџџџxџџџ џџ€ $ƒўџџџџџџџˆџџџџџџџџџџџџџџџџџџ‚ џџџџўџџџџџўџџџџџџџџџџџџџџџƒўџџџџџџџ˜џџџџџџџџџџџџџџџџџџƒўџџџџџџџ`џџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџџџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџРџџџџџџџџџџџџџџџџџџ $ $ $ƒўџџџџџџџџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџ0џџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ`џџџџџџџџџџџџџџџџџџ $ƒўџџџџџџџџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџРџџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ№џџџџџџџџџџџџџџџџџџ $ƒўџџџџџџџ џџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџPџџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ€џџџџџџџџџџџџџџџџџџ $`„Rџџџџxџџџ џџ€ $ƒўџџџџџџџаџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџџџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ0џџџџџџџџџџџџџџџџџџ $ $ $ƒўџџџџџџџШџџџџџџџџџџџџџџџџџџ‚ џџџџўџџџаџџўџџџџџџџџџџџџџџџƒўџџџџџџџРџџџџџџџџџџџџџџџџџџ $ƒўџџџџџџџ8џџџџџџџџџџџџџџџџџџ‚ џџџџўџџџ@џџўџџџџџџџџџџџџџџџƒўџџџџџџџ@џџџџџџџџџџџџџџџџџџ $ƒўџџџџџџџpџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџ џџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџаџџџџџџџџџџџџџџџџџџ $ $ $ƒўџџџџџџџџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџ@џџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџpџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџ˜џџўџџџџџџџџџџџИƒўџџџџџџџ џџџџџџџџџџџџџџ e8 „џџџџiƒўџџџџџџџџџџџџџџџџџ џџџџ`„Rџџџџxџџџ џџ€ $ƒўџџџџџџџиџџџџџџџџџџџџџџџџџџ‚ џџџџўџџџрџџўџџџџџџџџџџџџџџџƒўџџџџџџџџџџџџџџџџџџџџџџџџџ $ƒўџџџџџџџXџџџџџџџџџџџџџџџџџџ‚ џџџџўџџџ`џџўџџџџџџџџџџџџџџџƒўџџџџџџџhџџџџџџџџџџџџџџџџџџƒўџџџџџџџ8 џџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџh џџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ˜ џџџџџџџџџџџџџџџџџџ $ $ $`„Rџџџџxџџџ џџ€ $ $ƒўџџџџџџџ џџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџ0 џџўџџџџџџџџџџџџџџџ $ƒўџџџџџџџ` џџџџџџџџџџџџџџџџџџ $џџџџ‚ џџџџўџџџPџџўџџџџџџџџџџџƒўџџџџџџџИџџџџџџџџџџџџџџџџџџ ƒўџџџџџџџHџџџџџџџџџџџџџџ‚ џџџџўџџџ џџўџџџџџџџџџџџџџџџƒўџџџџџџџџџџџџџџџџџџџџџџџџџ`„Rџџџџxџџџ џџ€џџџџƒўџџџџџџџ  џџџџџџџџџџџџџџ‚ џџџџўџџџЈ џџўџџџџџџџџџџџ $ $ $`„Rџџџџxџџџ џџ€џџƒўџџџџџџџШ џџџџџџџџџџџџџџ џџƒўџџџџџџџа џџџџџџџџџџџџџџа  $ $p џџџџH ‚ џџџџўџџџЈ џџўџџџџџџџџџџџ џџа `„Rџџџџxџџџ џџ€џџџџ`„Rџџџџxџџџ џџ€џџƒўџџџџџџџА џџџџџџџџџџџџџџ џџЈ `„Rџџџџxџџџ џџ€џџџџˆ `„Rџџџџxџџџ џџ€џџџџш џџџџ ƒўџџџџџџџИ џџџџџџџџџџџџџџџџџџ‚ џџџџўџџџ( џџўџџџџџџџџџџџџџџџƒўџџџџџџџ0 џџџџџџџџџџџџџџџџџџ8ўџxџџџ8 џџџџџџџџp џџџџш џџџџ№ џџџџј џџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџа џџџџ˜phџџџ џџ @ўџXџџџ џџ @ўџHџџџ џџ @ўџ8џџџ џџ @ўџ(џџџ џџ џџџџ˜џџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№и `„Rџџџџxџџџ џџ€џџџџ0 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx @hhџџџџџџџџџџџџџџџџџџџџџџ0MEџџџџџџџџџџўЪџџџџЈСplџџhxlџџџџС`uџџџџрџџџџџџџџи'mit resetSA string1,string2,...,stringnџџўџџџџџџџџџџџ $ $iƒўџџџџџџџџџџџџџџџџџ ƒўџџџџџџџшџџџџџџџџџџџџџџџџџџ $ $ $iƒўџџџџџџџџџџџџџџџџџ ƒўџџџџџџџ˜џџџџџџџџџџџџџџџџџџА‚ џџџџўџџџ№џџўџџџџџџџџџџџџџџџƒўџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџЈƒўџџџџџџџаџџџџџџџџџџџџџџџџџџ $‚ џџџџўџџџџџўџџџџџџџџџџџ џџ $ƒўџџџџџџџ0џџџџџџџџџџџџџџџџ $џџџџXџџџџџ џџ4џџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџи@џџџџџџџџџџџџџџџџџџџџџџ MEџџџџџџџџџџўЪ08 .'(lџџplџџ`ЎA:T'.џџџџHџџџџœАAttribute VB_Name = "Tabelle1"  јBas|0{00020820-; C$0046} |Creatabl†False МPredeHclaId‡Tru "ExposeTempla€teDeriv$eCustomizˆ2rU€€€  Йё сџџџџЁ 4A ‘i џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ{crU€€€ џџџџџџџџ@prU€€€€~}  Y1!‰™СсaI i 1 ь Kџџ.tџ"$ @tџWTџ :dџ ]ћYh WЈX&`0` €€ >Ј€ @€ D`p€ џџџџ"˜  "€*„Ш(€p #А0€ џџџџ" аи "р*„№ €( #0@€ џџџџџџџџ№lџџpaџџPhџџ@С8 :!(Ў•aЎ :(( Cџџџџxџџџџx$xŠ'‚l аї pіРetSA(iЄ$xЏ”FЄ †%>!ˆB@”g nurї pіЄ ‚‹nberќcЄ p$xЎ:=~Є •иidentisch mit setSA(index) istС`ulи'eine Scrollarea mit resetSA фndern willџџџџh›`С :!<'8s loЈhџџџџрZъШ Ў :(( :l 8ЄЄ †%>%ˆ 8$>((ЎЎAA@rџџџџhlџџЈЏШЎA:AA@r p$x pЄЄ †%>,ˆah p$xЖџџџџџџџџџџџџџџџџџџџџџџxокhџџџџŠ|їџџџџіжж~џџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџLџџџџLџџџџ”џџџџLџџџџ6 џџџџ”џџџџ<џџџџџџЗЄj;$*\Rffff*683b6aa520*\R0*#c*\R1*#ac*\R1*#c1*\R1*#20c*\R1*#b8*\R1*#20bпH№ dа`џџџџџџџџ@ џoџџџџџџџџџџ „џџџџ$ƒbџџџџџџpџџџџџџџџџџџџџџDСB$$$$$$$$$ƒbџџџџџџ@џџџџџџџџџџџџџџџџџџ$$$џџџџџџџџhаШџџџџ8 $$$$ƒbџџџџџџxџџџџџџџџџџџџџџџџџџƒbџџџџџџˆџџџџџџџџџџџџџџџџџџ$0џџџџа)ƒxџџџџ џџџџџџџџџџ$$$$ƒbџџџџџџ€џџџџџџџџџџџџџџџџџџƒbџџџџџџ˜џџџџџџџџџџџџџџ@$€ƒbџџџџџџˆџџџџџџџџџџџџџџџџџџРlџџџ џџ ƒbџџџџџџрџџџџџџџџџџџџџџ( rh`џџџџџџџџџџџџhўLАџџџџџџ „?џџџџ  џџџџ џџџџ@\џџџ џџ ƒbџџџџџџ0џџџџџџџџџџџџџџџџџџџџџџрƒbџџџџџџ№џџџџџџџџџџџџџџџџџџƒbџџџџџџшџџџџџџџџџџџџџџџџџџƒbџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№ƒbџџџџџџЈџџџџџџџџџџџџџџџџџџƒbџџџџџџиџџџџџџџџџџџџџџџџџџаLџџџ џџ џџƒbџџџџџџџџџџџџџџџџџџџџџџџџƒbџџџџџџ џџџџџџџџџџџџџџџџџџƒbџџџџџџ џџџџџџџџџџџџџџџџџџЈž:>џџ џџƒbџџџџџџАџџџџџџџџџџџџџџџџџџџџџџЈ ƒbџџџџџџ(џџџџџџџџџџџџџџџџџџƒbџџџџџџшџџџџџџџџџџџџџџџџџџ .Ш`џџџџџџџџ (џkџџџџџџџџџџ „џџџџ Hџџџ џџ џџџџа Іџџџџ`џџџџџџџџ˜ (џkџџџџџџ '„ џџiƒpџџџџ џџџџџџџџ€џџџџƒbџџџџџџаџџџџџџџџџџџџџџџџџџƒbџџџџџџрџџџџџџџџџџџџџџџџџџƒbџџџџџџ@џџџџџџџџџџџџџџџџџџ8xDџџџ џџ џџџџ@ўџ@џџџ џџ џџџџ(0џџџ џџџџџџ џџџ џџџџџџ@ўџџџџ џџ џџџџ№џџџџџџџџ џџџџ(џџџџШаџџџџџџџџџџџџРџџџџџџџџџџџџ8џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаHџџџџ(џџ џџ РИ№ўџџ џџ h@рўџџ џџ @ўџаўџџ џџ ˜Рўџџ џџ@ўџАўџџ џџ @Р@ ўџџ џџ @ўџўџџ џџ Р€ўџџ џџ˜џџџџџџџџџџџџџџ@pўџџ џџџџџџ@ўџlўџџ џџ џџџџ@ўџhўџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџи џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџР № џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ џџџџџџџџ:†>. џџ @ўџ xџџџ џџ @8џџџџhџџџ џџ@ўџџџџџXџџџ џџ @ўџ8 Tџџџ џџ @ўџP Dџџџ џџ @ўџh @џџџ џџ џџџџ@ўџџџџџ0џџџ џџ џџ@ўџ€ ,џџџ џџ H@ўџџџџџ(џџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџh џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP € џџџџА џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8 џџџџџџџџ:†>џџ џџ @ўџ˜ xџџџ џџ @8џџџџhџџџ џџ@ўџџџџџXџџџ џџ @ўџр Tџџџ џџ @ўџј Dџџџ џџ `„fџџџџxџџџџџџџџџ@ўџ @џџџ џџ џџџџ@ўџџџџџ0џџџ џџ џџџџ@ўџ( ,џџџ џџ џџџџ@ўџџџџџ(џџџ џџ џџџџџџџџџџџџШ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј ( џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџр џџџџџџџџ:†@ўџX tџџџ џџ @ўџ  dџџџ џџ @ўџ@ Tџџџ џџ @ўџџџџџDџџџ џџ @ўџp @џџџ џџ @ўџˆ <џџџ џџ @ўџџџџџ8џџџ џџ @ўџИ (џџџ џџ @ўџа џџџ џџ @ўџџџџџџџџ џџ џџџџ€џџџџџџџџџџџџџџџџШџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџјMEџџџџџџџџџџўЪ1" €Ј.($qи #@8$r XА€ џџџџ"… xx,i`€  p$xЄ p$xЎ:=~ Є $ž'œ œ ˜ЄЄ †%>,ˆџџџџ(ШС`8 :!<'8 pЄЄ †%>%ˆ 8$>((uџџ№›`шЎ :((lџџаџџџџШlџџИЏЎ3:=A:AA@r p$xЄ p$xЎ:=~Є $оU '˜џџџџ˜ЎЄЄЄ †%>,ˆl :!(ЄЄЄ †%>,ˆЄЄЄ †%>%ˆ :((ШЎA:AA@rџџџџpиASh = ActiveSheet.Indexи=Sheets(ASh).ScrollArea = ThisWorkbook.Sheets(1).Cells(ASh, 1)и7Aufruf von setSA bzw setSAi jetzt zwingend erforderlichџџџџ†ВAttribute VB_Name = "Modul1" Public Sub tempNoSA() On Error ResudNext  DimJ As SЊng If ActiveSheet.ScrollArea <> "" Then'  isWorkbook..s(1@).Cell,ј 2)œLAiвЬa Elseљ,ThC„ І=Фnd€† E€€Ј ŠЏresetЏParamArray pa()ІVariant'МВ0)ЉTr ue‚ЊšЇ.Cle arcnzahl@+UBoundІ(Р AF@z‚iР1 To ˆ 'СU@xIn|(1,,i), ":€=") > 0"!Ф ix@CL€ng(LeftУ - 1)B ‚mBsARighF L„en) - —cЦкjix,€'snx HŠœІiMi3‡,yIf„AШ i'Aufruf von B| bzwCi jetzt zwinge@‰erford”erРрhУSh)ЁIЙIndeТ,'ЬPASh)Iй=š(?€ ЁЕRcR€F~Go€@err_hndўl u_1}F uHxitЁ %:BŠУ|гki(iссiLong_Ъ–Ц,я_Q"D!E(Є @tџWTџ %8џ(dџ%<џ@џѕ "$ Р@џ Р<џ d8џўœ)tџ@џ<џ8џ5Tџ#:dџ %tџ"$ @tџў› tџ˜r((џ%(џ%<џ(dџ%@џtџѕ "$ Рtџ Р@џ d<џўšTџ%8џ"$ @8џў› )tџ@џ<џ8џ5TџX((џ%(џ%:џ %<џ(dџ%@џtџѕ "$ Рtџ Р@џ d<џўœ)tџ@џ<џіGt (˜xџ$tџ@џ<џ8џTџDџTрKџџѕ€ ќВ\џclџ]ћstdo€le f%\*\G{00€020430-C 0046}#2.0#0#C:\WINDOWS\SYSTEM\c2.tlb#OLE Automation#^€MSForms>!SFEr€ms/z€ p€FD5ABE868-40E4-11D2-BD9B-0CF0686C5HF3.twd#Micro soft = ` ObА Libprary9P04r€PECD840A2-8(15BP5PA0-4445535‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌўџџџЎЏўџџџБўџџџГДЕЖЗИЙўџџџЛМўџџџОПРСТУўџџџХўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џCells€џџџ_B_var_i Ђ €џClearContents{мtest4Ћ€џџџ_B_var_ParamAnzahlsŠ €џUsedRangeШ‰ClearуЭ €џџџ_B_var_SubН’ixК] _B_var_LeftQсsx,_Right  _B_var_Right9й €џџџ_B_var_ixbђ €џџџ_B_var_sxдѓЌ(setSAiuBџџlџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџc6  dirџџџџџџџџџџџџrк__SRP_0џџџџџџџџ~” __SRP_1џџџџџџџџџџџџ­ЏPROJECTwmџџџџџџџџџџџџАh4P1P€JP\VˆBE\…(EXDІ(с.E р….`ŒM ДƒA”CxOfficDx‚O@uficBx ‚Р+xФ,2DF8D04C-5BF@A-101BР,E5@xAA@w4DE52Ш,MICROSOFT OFFICE\„MSOР97.DLL. P 8.0WТИТŠ|Р$DieseArbeitsmapˆpe“2"A Р4eŠeArTb@7iРВsaDp@e@ HB1BФ",B,Bˆ|A+Т РTabelleD1J2СЊaBlТЬ1PВ€ъ MŽLсpModuVl` g2brM€`dLuр Б ~oї! eЁ“K)^џџџџrU€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~v 9`}Ъ@IˆеН DEST фƒ џџџџџџџџџџџџџџЉƒŠa iџџџџџџйA б џџџџ8џџџџБ  Сџџ™   щЩDieseArbeitsmappeTabelle1Tabelle2Tabelle3 VBAProjectяРF?C:\PROGRAMME\GEMEINSAME DATEIEN\MICROSOFT SHARED\VBA\VBA332.DLLVBA Yџџџџ  PРF %C:\microsoft office\Office\EXCEL8.OLBExcel qџџџџ™ё`0РFC:\WINDOWS\SYSTEM\stdole2.tlbstdole aџџџџ‰бphшЋеф@вН› №fХC:\WINDOWS\SYSTEM\MSForms.twdMSForms aA‰б€с.E р….`ŒM ДЂ@иь[еН DESTC:\WINDOWS\TEMP\VBE\MSForms.EXD iA‘бLај-њ[НхЊDоR $C:\MICROSOFT OFFICE\OFFICE\MSO97.DLLOffice 1џџџџYБ кРFВЁpћ%‡еН DESTРFБЁpћ%‡еН DESTDРFWorkbook Workbook_OpenWorkbook_SheetActivaЬ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:\microsoft office\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{D5ABE868-40E4-11D2-BD9B-0CF066C50000}#2.0#0#C:\WINDOWS\SYSTEM\MSForms.twd#Microsoft Forms 2.0 Object Libraryф*\G{ECD840A2-815B-11D5-BDA0-444553540001}#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:\MICROSOFT OFFICE\OFFICE\MSO97.DLL#Microsoft Office 8.0 Object LibraryџџџџџџЗЄj;џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŠ|"DieseArbeitsmappe cd3b6a8508*Dџџˆ|"џџTabelle1 413b6a81fc*DџџŽ|Вџџ Modul1 683b6aa520*Dbџџїh~џџ0ˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЃЁpћ%‡еН DESTџџџџЅЁpћ%‡еН DESTџџџџџџџџ(Н DESTџџџџџџџџН DESTџџџџџџџџ…в!i-‡еН DESTџџџџџџџџH€SlџЈ0 €џas=€џdimD€џelseE€џElseIfH€џendifU€џFor_€џGoto`€џIfk€џIntegerl€џIsy€џLong‡€џNothingˆ€џNull €џParamArray–€џPublicœ€џReDimž€џResumeЅ€џSetА€џSubГ€џThenД€џToЕ€џtrueИ€џUBoundН€џvariant Excel€+ VBAїтWin16С~Win32MacГВProjekt1вA stdole“`MSFormsC VBAProjectОП Officeu DieseArbeitsmappeЏ €џ_Evaluateй Tabelle1RŠTabelle2SŠTabelle3TŠ WorksheetСўRangeк Worksheet_SelectionChangeб4TargetЌFWorksheet_Activate+ €џScrollAreavmyareaG(setMyScrollAreaпіЌ(setSAlз€џActivate—| €џџџ_B_var_setSAY›Workbookk Workbook_Open›сASh&u €џActiveSheet%N€џIndexёП€џSheets Count0v €џџџ_B_var_redim•Вsheet[ж €џџџ_B_var_sheetHšsa_ €џџџ_B_var_saНѓ €џџџ_B_var_Set €џџџ_B_var_On6ѓWorkbook_SheetActivate№7Sh_ €џSheetActivate‘  €џџџ_B_var_ASh72€џ_DefaultjТ €џџџ_B_var_ifPђIsNullЏФ €џџџ_B_var_ShФѓerr_hndlIх Modul1ЭЌ(tempNoSAйUtempRЊ€џџџ_B_var_ScrollAreaƒф €џџџ_B_var_temp €џџџ_B_var_ElseIfqm tempSAstringvi`Ќ(resetSAeФ „џparameterhˆ „џparameters`щpaІ^ €џџџ_B_var_paNѓ €џџџ_B_var_ForjL €џџџ_B_var_UBoundлdShAnzahlњп ParamAnzahl’ЈpxН^ €џThisWorkbook|уte @зРF A:T A:C $A$5:$C$25 Index ScrollAreaиРFЋЁpћ%‡еН DEST РFЊЁpћ%‡еН DESTDРF WorksheetWorksheet_Activate ::@ Фl РE№ПжЁpћ%‡еН DESTеЁpћ%‡еН DEST A:A VBA332.DLL Љ џџџџ0 иЁpћ%‡еН DESTзЁpћ%‡еН DEST -в!i-‡еН DEST€в!i-‡еН DEST $A$5:C $A$5:$C$65536Modul1tempNoSA РFё €йРFё 1џџџџresetSA 88 ene\eЂјЖˆеН DESTЁјЖˆеН DESTЋјЖˆеН DESTЊјЖˆеН DEST 3:=A:A 88 @Œ0AЎјЖˆеН DEST­јЖˆеН DEST 88 ƒўџџџџџДјЖˆеН DESTГјЖˆеН DESTCellsЗјЖˆеН DESTЖјЖˆеН DESTsetSAtest A ClearContents UsedRangeClear := Љ џџџџi Ј Љ џџџџk РsetSAi 5:=A:ArU€€€€~~{ џџџџџџџџџџџџџџџџ   СSh A paifDieseArbeitsmappeDieseArbeitsmappeTabelle1Tabelle1Modul1Modul1ID="{FB70A1AE-8725-11D5-BDA0-444553540001}" Document=DieseArbeitsmappe/&H00000000 Document=Tabelle1/&H00000000 Module=Modul1 Name="VBAProject" HelpContextID="0" CMG="02009C9C9AA09AA09AA09AA0" DPB="04069AA69EA99FA99FA9" GC="060498A098A09BA19BA164" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] DieseArbeitsmappe=44, 4PROJECTџџџџВЩSummaryInformation(џџџџџџџџКДDocumentSummaryInformation8џџџџџџџџџџџџН CompObjџџџџџџџџџџџџФh4, 617, 408, C Tabelle1=22, 22, 595, 386, C Modul1=88, 88, 661, 452, ўџр…ŸђљOhЋ‘+'Гй0„8@LX p|фSCHSCHMicrosoft Excel@ ыє!СўџеЭеœ.“—+,љЎDеЭеœ.“—+,љЎФ PXd lt|„ Œ ЁфlГ   Tabelle1  Tabellen˜ 6> _PID_GUIDфAN{FB70A1AF-8725-11D5-BDA0-444553540001}ўџ џџџџ РFMicrosoft Excel 8.0-TabelleBiff8Excel.Sheet.8є9Вq