ࡱ> CB  !"#$%&'()*+,-./0123456789:;<=>?@AIgEFGHJjKLMNOP[RSTUVWXYZkf^_`abcdehiumnopqrst\vwxyz{|}~Root Entry F@@NnDWorkbook5'~_VBA_PROJECT_CUR"3oNn@@NnVBA'"oNn0Nn (ـ`\pAdminst Ba=DieseArbeitsmappe~˯=x_-* #,##0.00\ " "_-;\-* #,##0.00\ " "_-;_-* "-"??\ " "_-;_-@_-{+;_-* #,##0.00\ _ _-;\-* #,##0.00\ _ _-;_-* "-"??\ _ _-;_-@_-+#,##0" ";\-#,##0" "5#,##0" ";[Red]\-#,##0" "7#,##0.00" ";\-#,##0.00" "A#,##0.00" ";[Red]\-#,##0.00" "e0_-* #,##0" "_-;\-* #,##0" "_-;_-* "-"" "_-;_-@_-_-_-* #,##0_ _-;\-* #,##0_ _-;_-* "-"_ _-;_-@_-u8_-* #,##0.00" "_-;\-* #,##0.00" "_-;_-* "-"??" "_-;_-@_-o5_-* #,##0.00_ _-;\-* #,##0.00_ _-;_-* "-"??_ _-;_-@_-#,##0" DM";\-#,##0" DM"!#,##0" DM";[Red]\-#,##0" DM""#,##0.00" DM";\-#,##0.00" DM"'"#,##0.00" DM";[Red]\-#,##0.00" DM";6_-* #,##0" DM"_-;\-* #,##0" DM"_-;_-* "-"" DM"_-;_-@_->9_-* #,##0_ _D_M_-;\-* #,##0_ _D_M_-;_-* "-"_ _D_M_-;_-@_-C>_-* #,##0.00" DM"_-;\-* #,##0.00" DM"_-;_-* "-"??" DM"_-;_-@_-FA_-* #,##0.00_ _D_M_-;\-* #,##0.00_ _D_M_-;_-* "-"??_ _D_M_-;_-@_-#,##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_-;_-@_-FA_-* #,##0.00\ "DM"_-;\-* #,##0.00\ "DM"_-;_-* "-"??\ "DM"_-;_-@_-FA_-* #,##0.00\ _D_M_-;\-* #,##0.00\ _D_M_-;_-* "-"??\ _D_M_-;_-@_-HC_-* #,##0.000\ _D_M_-;\-* #,##0.000\ _D_M_-;_-* "-"??\ _D_M_-;_-@_-D?_-* #,##0.0\ _D_M_-;\-* #,##0.0\ _D_M_-;_-* "-"??\ _D_M_-;_-@_-@;_-* #,##0\ _D_M_-;\-* #,##0\ _D_M_-;_-* "-"??\ _D_M_-;_-@_-% 0.000000000000000000000000000000 yyyy\-mm\-dd0.00_ ;[Red]\-0.00\ !#,##0.00_ ;[Red]\-#,##0.00\ #[$-407]dddd\,\ d\.\ mmmm\ yyyy h:mm;@[$-F400]h:mm:ss\ AM/PM 0.000000 #,##0.00\ " "                      8  1  1 $  <   #4 1 1 1" 1! 1 1" 1 1" 1" 1 " 1!  1"  1" " "  " 1"@ @ 1"!@ @ 1" "@ @ 1"@ @ "@ @ "!@ @  """@ @  " "  1# @ " @ "! @ 1 !@ @ 1"!@ @ !@ @ !!@ @ 1" @ 1# 1 1 1" 1  1!  1  1 " " "  "  1 "@ @ + "@ @ +  @ @ +  @ @ + "@ @ + "@ @ + "@ @ +  " 1  1" 1  1!@@ + 1!@ + 1! @ +  1" `& Reisekostenj? Pauschalen|__Goal_Metadata11  _KAW999120:  _KAW999934:  ;TfNf8@ZR3 A@@  | Landmindestens 24 Stunden*weniger als 24, aber mindestens 14 Stunden)weniger als 14, aber mindestens 8 Stunden$Pauschbetrag fr bernachtungskostengyptenquatorialguinea thiopien AfghanistanAlbanienAlgerienAndorraAngola ArgentinienArmenien Aserbaidschan AustralienBahamasBahrain BangladeschBarbadosBelgienBeninBolivienBosnien-HerzegowinaBotsuana Brasilien Bulgarien Burkina FasoBurundiChileChina- Peking Costa RicaDnemarkDominikanische Republik DschibutiEcuador El SalvadorEritreaEstlandFidschiFinnland FrankreichGabunGambiaGeorgienGhana Griechenland GuatemalaGuinea Guinea-BissauGuyanaHaitiHondurasIndien- Bombay IndonesienIrakIran, Islamische RepublikIrlandIslandIsraelItalien - MailandJamaikaJapan- TokioJemen Jordanien KambodschaKamerunKanada Kap Verde KasachstanKatarKenia Kirgisistan KolumbienKomorenKongo"Korea, Demokratische VolksrepublikKorea, RepublikKroatienKubaKuwaitLesotho%Laotische Demokratische VolksrepublikLettlandLibanonLiberiaLibyen LiechtensteinLitauen Luxemburg MadagaskarMalawiMalaysia MaledivenMaliMaltaMarokko Mauretanien Mauritius MazedonienMexikoMonacoMongoleiMosambikMyanmar (frher Burma)NamibiaNepal Neuseeland Nicaragua NiederlandeNigerNigeriaNorwegen sterreich- WienOmanPakistanPanamaPapua-NeuguineaParaguayPeru PhilippinenPolenPortugal - LissabonRuandaRumnien - BukarestRussische Fderation- Moskau- St. PetersburgSambiaSamoa San MarinoSao Tom und Principe Saudi-Arabien- RiadSchwedenSchweizSenegal Sierra LeoneSimbabweSingapur SlowenienSomaliaSpanien- Kanarische Inseln Sri LankaSudan Sdafrika SwasilandSyrien, Arabische Republik TadschikistanThailandTogoTongaTrinidad und TobagoTschadTschechische RepublikTrkei- Ankara, IzmirTunesien TurkmenistanUgandaUkraineUngarnUruguay Usbekistan Vatikanstadt VenezuelaVereinigte Arabische Emirate- DubaiVereinigte Staaten- LondonVietnam WeirusslandZentralafrikanische RepublikZypern DeutschlandAntigua und BarbudaRio de JaneiroSaoBrunei - HongkongShanghaiTaiwan Cte d'Ivoire -KopenhagenDominica- Paris - Straburg- AthenGrenada - Kalkutta - Tel Aviv- Rom Jugoslawien (Serbien/Montenegro)- DualaKongo, Demokratische RepublikMoldau,- Lagos - Islamabad- Warschau, KrakauSlowakische Republik- Barcelona, Madrid- Palma de MallorcaSt. Kitts und Nevis St. LuciaSt. Vincent und die GrenadinenSurinameTansania- Boston, Washington- Houston, Miami- San Francisco- New York Staat, Los Angeles%Vereinigtes Knigreich und Nordirland - EdinburghDatumUhrzeitTage 14 - 24 Std. 8 - 14 Std.24 Std.VerpflegungsmehraufwendungenSumme:-bernachtungskostenTage x PauschbetragKosten lt. Beleg FahrtkostenFlugBahnsonst. kmkm-GeldBetrag BezeichnungReiseziel / Zweck: RckfahrtHinfahrtReisekostenabrechnungReisenebenkosten 0 - 8 Std. KAW999120K0000016Reisekosten Summe:Name: Unterschrift _KAW999934JJ r4+X?aH /D<Sc%3  i!!O ! S" " {#= $ $Q $ ]% (ـ '1+;=  dMbP?_*+%Seite &P von &NQN&C&8K und K Steuerberatungsgesellschaft mbH | Bayerische Str. 5 | 10707 Berlin&M&d2?'M&d2?(M&d2?)M&d2?MBrother HL-2030 series (von DA4C 4dXXA4DINU"4Z" dXX `? `?U }  }  %}  }  $} J} $} }  $}  '}  $} m } m 'J @@J@@@ @ @ @  @ @@ @ @@@ @ @@@@ @ @   N""#### FFZ[[[\ FFZ[[[\ GE-M 4#;D B DeutschlandEEEE~  V k@  !( GEMEEEE  L!( 1 1 ) )) ! !1I!!!( $' $$ * UO! ! SO!I!!!(  $ ' $$ H HHHH , $ $' $ / 3 3 3 0  , $ $' $] 4 GD  2D  D D "B 2 D  mD  TD   BD   B"1D D   "B/ 2$D  D  D  ,D   " BD  (D   " B"XD D  .D D   " "B 2(D  mD  TD   BD   B"1D D   "Bs 5,]D  ED  ,D   D  "" B  & $ $' $< =I>@ 3D  ;D "BI>(@ 3D  ;D "BI?8@ 3D  ;D "B&  $ $'$ 9 @=:0 'D  D DB=:4 'D  D DB=;8 'D  D DB?6 )D  %B  $ $'$ ]]]]]]$   A;+<%D  D B 'g-@ QD  <D  ;Z ""B c6 MD  8DDD  $DD"B AP7 +'87 ]]]]]] * $ $ $ $QRRT%.D333333? )6 %D ]]]]]]$K   $ * $$ $$$K  SZ[\T  K  SZ[\TK  SZ[\TK  SZ[\TK   SZ[\T# 6# %  K  @D$$$(hPz/H"7"""FrBd>666! " # %&!BCCDDDDK ! ""K "  #A-#6 DDDD %Y %WX &% & GP6:?(  R  C @ 3]h 4 $# L$  L;>@R  7 Tabelle1ggD (ـ ,>@IQZtc@4@$@I@ C@:@*@U@ >@4@$@[@ >@4@$@W@  >@4@$@V@  H@@@0@T@  @@5@&@T@  E@<@,@[@  E@<@,@@U@   E@<@,@V@  8@0@ @V@  >@4@$@a@  C@:@*@V@ C@:@*@Y@ E@<@,@R@ >@4@$@R@ E@<@,@[@ E@<@,@Y@ @@6@&@R@ 8@0@ @@P@ 8@0@ @Q@ @@6@&@@Z@ >@4@$@Q@ B@8@(@a@ B@8@(@V@ B@8@(@@U@ 6@.@ @R@ >@4@$@Q@ D@<@,@@W@ A@8@(@P@ B@8@(@T@DlF000000000000000000000000000000 !"#$%&'()*+,-./0123456789:;<=>?  R@H@8@b@ ! !E@<@,@V@ ""E@<@,@Y@ ##E@<@,@^@ $!$>@4@$@V@ %%B@8@(@V@ &"&E@<@,@Q@ ''E@<@,@a@ ((B@8@(@T@ )#)>@4@$@Y@ *$*C@:@*@^@ +%+C@:@*@Q@ ,&,B@8@(@Y@ -'-;@2@"@@`@ .(.;@2@"@@U@ /)/@@5@&@L@ 0*0E@<@,@^@ 1+1C@:@*@Y@ 22H@@@0@Y@ 33C@:@*@R@ 4,4H@@@0@Y@ 5-52@(@@Q@ 6.6>@4@$@a@ 7/7>@4@$@@Z@ 808>@4@$@@U@ 99B@8@(@`@ ::B@8@(@@Z@ ;1;>@4@$@V@ <2<8@0@ @V@ =3=>@4@$@N@ >4>B@8@(@V@ ?5?E@<@,@V@Dl0000000000000000000000000000000@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ @6@>@4@$@Y@ A7A@@6@&@V@ B8B@@6@&@a@ CC8@0@ @a@ D9DC@:@*@[@ E:EC@:@*@U@ F;F8@0@ @Y@ G<GE@<@,@@`@ H=HR@H@8@g@ I>I@@6@&@R@ JJF@>@.@[@ K?KB@8@(@Y@ L@LB@8@(@a@ MMB@8@(@[@ NANH@@@0@[@ OBOE@<@,@V@ PCPR@H@8@a@ QDQ2@(@@@Z@ RER@@6@&@Q@ SS8@0@ @@U@ TFT@@6@&@Q@ UGU@@6@&@N@ VV@@6@&@Y@ WHWB@8@(@Y@ XIX>@4@$@K@ YJY>@4@$@[@ ZKZF@>@.@Y@ [L[C@:@*@[@ \M\2@(@@Q@ ]N]8@0@ @K@ ^O^C@:@*@U@ _P_L@C@3@@\@Dl0000000000000000000000000000000`abcdefghijklmnopqrstuvwxyz{|}~ ``N@D@4@f@ aQaE@<@,@V@ bRbP@F@6@f@ cSc=@4@$@L@ dTdE@<@,@V@ eUeC@:@*@@`@ fWf;@2@"@N@ gVg8@0@ @Q@ hXh2@(@@T@ iYiB@8@(@W@ jZjC@:@*@U@ k[kE@<@,@N@ l\lG@@@0@T@ m]m;@2@"@Y@ n^nC@:@*@U@ o_o>@4@$@@P@ p`p;@2@"@T@ qaq;@2@"@K@ rbrC@9@(@@W@ scsC@:@*@T@ tdt>@4@$@V@ ueuE@<@,@V@ vfvB@8@(@@U@ wgwH@@@0@a@ xhx8@0@ @Y@ yiyB@8@(@[@ zz2@(@@V@ {j{D@<@,@J@ |k|;@2@"@K@ }l}8@0@ @T@ ~m~C@:@*@R@ n>@4@$@T@Dl0000000000000000000000000000000 o@@5@&@R@ pE@<@,@Y@ q>@4@$@Y@ rC@:@*@Y@ s>@4@$@K@ tE@<@,@Y@ E@<@,@f@ uP@F@6@`c@ vB@8@(@Q@ wB@8@(@@W@ xB@8@(@V@ y8@0@ @Q@ 8@0@ @b@ zF@>@.@[@ {B@8@(@V@ |8@0@ @I@ }B@8@(@V@ ~>@4@$@V@ 8@0@ @Q@ >@4@$@V@ @@6@&@W@ B@8@(@W@ ;@2@"@Q@ 2@(@@K@ ;@2@"@^@ B@8@(@T@ H@@@0@`@ B@8@(@[@ >@4@$@@U@ =@4@$@L@ D@<@,@@S@ E@<@,@R@Dl0000000000000000000000000000000 H@@@0@T@ H@@@0@[@ N@D@4@d@ H@@@0@@V@ E@<@,@V@ @@6@&@V@ 8@0@ @^@ B@8@(@Y@ 2@(@@[@ >@4@$@W@ C@:@*@Y@ B@8@(@@Z@ B@8@(@b@ B@8@(@V@ B@8@(@@_@ 8@0@ @N@ B@8@(@Y@ F@>@.@@Z@ B@8@(@[@ @@6@&@[@ >@4@$@R@ >@4@$@R@ C@:@*@U@ ;@2@"@Y@ 8@0@ @I@ @@6@&@V@ @@6@&@Y@ @@6@&@T@ @@5@&@B@ B@8@(@Y@ E@<@,@[@ 8@0@ @@X@Dl0000000000000000000000000000000 >@4@$@N@ >@4@$@Q@ @@6@&@Q@ 8@0@ @N@ >@4@$@W@ >@4@$@^@ 8@0@ @T@ 8@0@ @I@ B@8@(@Q@ B@8@(@[@ >@4@$@^@ H@@@0@Q@ H@@@0@^@ B@8@(@[@ K@B@2@^@ H@@@0@[@ B@8@(@^@ H@@@0@b@ E@<@,@[@ N@D@4@c@ E@<@,@@e@ 8@0@ @N@ 8@0@ @Y@ =@4@$@J@ B@8@(@[@ 8@(@@80000000000000000000000000>@7 Tabelle3 (ـ l}}  dMbP?_*+%"<~?<~?U     `>@7 DieseArbeitsmappe$h__SRP_2__SRP_3 %kTabelle1QR  !"#$&()*+,-./012345689:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`bcdefghijklmnopqrstuvwxyz{|}~#P4st:[7NeF@nPG֓`?Ix@nPG֓`?I4st:[7NeME(SLSS>"N0{00020819-0000-0000-C000-000000000046}(0 % % `@l+p%B4 @bD@  End If Endub@l .a0p0pT-G$*\Rffff*1L4930118dH " D(px]0''>If Worksheets("Reisekosten").Cells(8, 15) = "" Then Daten.ShowoNAttribute VB_Name = "DieseArbeitsmappe" " Bas0{00020819-0C$ 0046} |GlobalSpacIFalse dCreatablPredeclaIdTru BExposeTemplate`DerivBustomizD2Dim x_old, y As Integer` P(, Sub Workbook_Ope`n() W7 = 3 'Ifsheets("Reisekosten").Cells(@8, 15)"" Then D2n.Show  End7 rU 0aH ) ` P (l4 D $ HXrU T$`n'#Tabelle3'Bewirtung]natkenn7Z Uhrzeit lxME (SLSS<N0{00020820-0000-0000-C000-000000000046}@(%H@0-GxAttribute VB_Name = "Tabelle3"  Bas|0{00020820-; C$0046} |GlobalSpac False dCr@eatablPredeclaDIdTru BE xposeTemplateDeriv$Bust0omizD28PhL xME(SPSSS0{B141F162-B958-4F3A-92E6-8F8D11883F2A}{26EAB674-D2B7-4108-96DD-507D94253723} R@ p v ` `(!. j`(A@rp% %@p-G"  "  ( 8H "P X hx"  4,  " (04H 4A@ro`@ r(l t(lo0 r(l  t(lXo] *!.'((d x!BG Deutschland ( $@(Bj( z!BG t!B ( $@(Bj 4A@rendo]X (S~1* ( Pauschalen ~%%@!B tB@|70OxophEAttribute VB_Name = "natkenn" Basx0{B141F162-B958-4F3A-92E6-8F8D11883F2A}{26EAB674-D2B7-4108-96DD-507D94253723} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustohmizDP Sub abbrechen_Click() Unload End  usland ueberschrift.Visio auswa hl4deut&KWI5ok4Dim y As Integ,erA@Ay@lAct^Cell.Row@MIf *`.Valu? TX s(y, 11)"D7@H<% U?C$Cu ?UserForm_Initializ~eBB @H= 2 To 220G $AddItem LWork book.sheets("P #xME (SLSS<$N0{00020820-0000-0000-C000-000000000046}P0   pbb)"h %@& `(%B  b00 -Gd "   ( 8 HP Xx      (@>X  8Ph    (0H  P`x  (   0@X p "   (8 @ `p       ( 8] 0] *!,'& *!.'(002( Spalte Reiseziel Land & ( 4B@6$kX persnliche Daten ($ & G0j' & G0j$ 8B@6k & ( G0j (% G0jGanze Zeile lschen? >Belegzeile lschen?$<': : ($@(B ($@(B ($@(B ($@(B ( $@(B ( $@(B ( $@(B ( $@(B ( $@(B ($@(Bk`kX & ( G0j (% G0j DB@6 4B@6 ($@!BG FB@6j ($@B@Hk & ( G0j (% G0j DB@6 4B@6 ($@!BG FB@6j ($@B@Hk & GJjx Spalte Kilometergeld &  ( G0j (% G0j LB@6 ( $@B@Hk`If x = 11 Then GoTo abfrage Spalte Reiseziel Land &  ( G0j (% G0j 4B@6k Spalte bernachtung &  ( G0j (% G0j NB@6kH0@J8 ( G0j (% G0j FB@6 ( $@B@H0o(Attribute VB_Name = "Tabelle1"  Bas|0{00020820-; C$0046} |GlobalSpac False dCr@eatablPredeclaDIdTru BE xposeTemplateDeriv$Bust0omizD2Dim x_old, y As Integer  P(, Sub Worksheet_SelectionChange(ByVal Target Excel.Rq ) 1/ -xEtA"veC.Column by RowCGoTo endHok:' lReiseziel Land  If 2 And A7 The@natkenPn.ShE@IfCpersnliche D<7 @3< 4 H#> 9 = 2 a*y < C(y > 3OwertIMsgBox("Ganze Zeils@0n?", vbYesNo, "Bkgzf @" 6# bs(y,P 3).uu"@457R910V1V2Vv1%B'C5@5en8Uhr`/^t@+P 1.01 BewirtungdIBgT n#T?K0KlC}@,xfabfrag { &{KiloPmete@l{1_PKM)MQ'd?111B~ԏDbernachC" 1fࡒue( D$GK  `$b bZ0 > a /chalen").IDI NextQ4,50 Inland / 20% Ausland bGLl xME(SPSSS0{76EBB !dG !d$ (dj !dG (djd !d G (djko !dG0 !d (dj !dG00 (djo0 !d$V !dG !d$ (dj !dG (djd !d G (djkpohp !dG0 !d (dj !dG00L7 W xME(SPSSS0{C9EFAC72-8B5B-425A-BF6B-992697D08D73}{3E09152B-67C0-4B47-99E9-DC30C7EEB4E3}X R@ T Z ^`(nd `p`( j`(%  %@pp (-GD" " (<@" " "  8P hx"  b 4( d` $ B 08  hx"    & 8 H X h x &      (0@ FA@ro`@ X!d$V X!d G X!d X!d $ X(dj X!dG X(djXdP X!d; G X(djk(o  XB@\Go] *!.'( ( $@(B ( $@(B ( $@(Be FA@r>o]X *!.'( 4,50 Inland / 20% Ausland bG@X ( $@(Bj<- Worksheets("Definitionen").Cells(3, 2).Value dG X!dX ( $@(Bj^ If Frueh_adresse = True Then Cells(y, 9).Value = Worksheets("Definitionen").Cells(4, 2).Value fG ( $@(Bj hG ($@!BX? ( $@(Bj ($@G ( $@(Bj FA@rop] *!.'( ($@!B DB@6k( ( $@!B 4B@6k ( $@!B Deutschland f(l b(l d(l X(l n(l h(lk` ( $@!B Deutschland f(l b(l d(l X(l n(l h(lkoAttribute VB_Name = "Bewirtung" " Bas0{C9EFAC72-8B5B-425A-BF6B-992697D08D73}{3E09152B-67C0-4B47@E9-DC30C7EEB4E3} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustohmizDP Sub abbrechen_Click() Unload End  eingabe_f]h_ChangeIf Not IsNum Oc(.Text) T95 Len> 1 LLeft , - 1A7Y=Z" E{P%> 59,R IfTRsper atHdSetFocusloesch_pauuDim y As Integer y@QActCell.Row As(y, 9).Valu-101 dok9( ' 4,50la)/ 20% Adus J(normal`k2CDbl(-4.5) ' Worksheets("Definitionen").3, 2 se6 OG) * (-T `Fjadre.s4nichtsA@@KB/= +(.8&aa-0.2'3) <> 0W5K"UserF@@_Ia8alizL`bha! Uhrzeit.Sha{7&1bHnatke nn_#pDeut;y."]b8.Visi#΁2#)a/W2kU Ll2 E(D[&A08 v2@ !(S qx 0 (djo !d$V !dG !d$ (dj !dG (djd !d; G (djkXoPHӳAttribute VB_Name = "Uhrzeit" Basx0{A207A63D-6CD5-4224-BF0D-441B91A52B2B}{16B8DF1B-11DB-4B89-8A38-B60A6B4980E6} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustohmizDP Sub abbrechen_Click() U@nload   End B loes Dim y As Integer D ymActPCell.Row  s(y, 3@).Valu" 4 #minab_AfterUpd72 If Len(.Text)@$1 T < "0" R+ 00/FIH_Change#Not IsNum@ncJ&QA% -2PLeftH, 1o=- EBDp> 59: I2fօokwstdab@d":2HGHDn n_X_reiseart 1' labe`.VisiCxsa2tren@Pr#+ c nB2c a /S2) IH/ M Dz 3} @Hb6T S  4 4  7-"_W_6Km _dSd\dGVd'\dd7hddGodtJrodhd)b[hd= ddGbdld?sG kd> 23cdjdsnwn|B |'{xCxh||'mxva|C { |  6A2{swgttr0l oxtr|_= k o.$"0"@h p " $$   "( 0 @ P ` p  Daten  a% KM uebernachtung W _VBA_PROJECT167E-86D7-46B9-A3E1-BE8F03D0A779}{A31AB6D7-740F-490E-97E0-C3B668021E99} @ j!!% %@@LUxME(SPSSS0{A207A63D-6CD5-4224-BF0D-441B91A52B2B}{16B8DF1B-11DB-4B89-8A38-B60A6B4980E6} R@ `(!.   `p`(   0 p   0 p    %H  %@p0pp0H P-Go"  " ( 0@X p ".$"0"@h p " $$   "( 0 @ P ` p   "        0@"H P ` p     "      0 @ P` "h.p$"0" H Ppx".$"0"8` h".$"0 "Px   DA@ro`@] *!.'( ($@(B ($@(B DA@rox !dG0 !d (dj !dG00 (djo !d$VAn !dG !d$ (dj !dG (djosod !d; G (djkho`]X *!.'(ETZ~ :  ($@(B v :  ($@(B DA@rop (l (l (l (l (l (l (l (loH (l (l (l (l (l (l (l (lo (l (l (l (l (l (l (l (lo(0 (l (l (l0x (l (l (l (l (lop !dG0 !d (dj !dG00 (djo0 !d$V-G'"( HX "` h (@Xp0H`x  !d$@(Bw !d$@(B  8A@r`o @$@!B (dx$@!B (dG  Januar 2005C@|d Februar 2005C@|( Mrz 2005C@| April 2005C@|AnMai 2005C@|G  Juni 2005C@|dj Juli 2005C@| August 2005C@|September 2005C@| Oktober 2005C@| November 2005C@| Dezember 2005C@| Januar 2006C@|v Februar 2006C@| Mrz 2006C@| April 2006C@|Mai 2006C@| Juni 2006C@| Juli 2006C@| August 2006C@|September 2006C@| Oktober 2006C@| November 2006C@| Dezember 2006C@|qoAttribute VB_Name = "Dat en" Basp0{76EBB67E-86D7-46B9-A3E1-BE8F03D0A779}{A31AB@740F-490E-97E0-C3B668021E99} GlobalSpacAoFalse CreatablPredeclaIdTru BExpose0 TemplDerivCustomizDP Sub CommandButton1_Click() Cells(3, 4) .Valudperson.Tex t8monatUnload  End7 >UserForm_Initialize9> 5# "With .AddItem "Januar 20 05vFebr!SMrz AprilMaiP(JunlAuFgnSep1bBeQ0OktoSNovemDezJ6JLJJ JLJC%G% J%lH%,I%LI%AZLM\L'ΟxME(SPSSS0{64D5BE90-64AF-47BE-A6DA-E56E97CE05F8}{2DD52C10-AA1B-4AB8-B5B0-2D09D69E6200} R@  ` `( j`(`X0%` %@H0`-G"  " 6(`p  " 0 HX "`h p @  LA@ro`@ !d$VGNur Zahlen eingeben!A@<j !d$V !B$4333333?'kh $X  (o@] *!.'(( !d$V !B$4333333?'nk  ( Reisekosten ~%%@(B LA@ro] *!.'(r 20 ( Reisekosten ~%%@!B333333? (do80uAttribute VB_Name = "KM"D Basd0{64D5BE90-64AF-47BE-A6DA-E56E97CE05F8}{2DD52C10-AA1B-4AB8-B5B0-2D09D69E6200} GlobalSpacAoFalse CreatablPredeclaIdTru BExpose`Template DerivCu@stomizDP Sub abbrechen_Click() Unload KM End kmanzahl_ChangeIf Not IsNumMc(.Text) T5 MsgBox ("Nur ZA"en ei"ben!"A$"*+kmgeldb etragRCDeValue) * 0.3 4 If.CaptionStr(Format@0ber0G, 2)) + " TFokRDim y As Integer yActmCell.RowAV?;b.;Workbook.sheets("Reisekosten").A&s(y,p 10)-IY UserR_InitializErFj#N"I(/A[0L7΍xME(SPSSS0{58D2F77E-755B-471F-8A64-D122B473FA02}{8F381FF1-FE41-446B-9FCE-E59D79E4B448}X X`(  %0 %X8-G "  0PXfh      "(0Pp "<"@ Hhp]@ *!.'(` !Bd !BX ( $@(Bingek( !Bd H=INDEX(Pauschalen!C[-7],MATCH(Reisekosten!RC[-1],Pauschalen!C[-11],0),1) ( $@( ( $@B@H (G (k NA@roX !BG (lj !BG (lj !BG (lj !BG (ljoH !d$V !d G !d !d $ (dj !dG (djd !d; G (djkoʲAttribute VB_Name = "uebernachtu ng" Bas0{58D2F77E-755B-471F-8A64-D122B473FA02}{8F381FF1-FE41-446B-9FCE-E59D79E4B448} d@GlobalSpacoFalse CreatablPredeHclaIdTru BExpose0TemplateDerivCustomibzD P Sub CommandButton1_Click () Dim y As I@nteger yXAct;Cel l.Row If pauschbetrag.Valu Then,s(y, 12)CDbl@(rechnsI#End If[RFormu@laR1C11_$%"=INDEX(P1alen!C[-7],MATCH(Rei@sekostRQ1],K 1@0),1)G =Selection.Loc>ktC0Hidden1 HUnload < K p_ChangewA\ waehrn.Visi "~LG$l&'k''Not IsNum vc\Text)G!BLen> 1aALeftR, - 1bl:=<"^E t (> 59}&-S0* pHdReisekostenbeleg"L@ h_normal frueh_seperatMD frueh_nichts frueh_auslandUserForm_Initialize5cVisibleLabel2, ausland_Click` ueberschriftS landauswahl+deutschland_Click deutschlandfausland+ AddItem ActiveWorkbook Worksheetsloeschen_ClickwNminab_AfterUpdate$minab_ minab_ChangestdabBstdanNminan_reiseart1_Clickv$labelabtrennabe@labelantrennanq@reiseart2_Clicklreiseart3_Clickreiseart4_Clickstdab_AfterUpdatek stdab_Changestdan_AfterUpdateo stdan_Changeminan_AfterUpdatep minan_ChangeCommandButton1_Clickperson"umonatkmanzahl_Changekmanzahl! kmgeldbetragēkmgeldaCaptionx FormatNumber/ pauschbetrag@rechnungsbetrag*q FormulaR1C1S SelectionZLocked  FormulaHiddenpauschbetrag_ChangenwaehrungXrechnungsbetrag_ChangeYWorkbookk      !"$&'()+:-./0123456789;<=>?@ABCEGHIJLXNOPQRSTUVWYZ[\]^`bcdegijklmnopqrstuvwxyz{|}~5 9 EG QMO-5BFA-101B-BDE5-00AA0044DE52}#2.2#0#C:\Dokumente und Einstellungen\Daniel.Kracht\Desktop\Platte-Dz:DeskdirW__SRP_0&__SRP_1natkenn0NnNnB???=+8  -G 4<stdole>stdoleP *\G{00020430-C 0046}#2.0#0#C:\Dokumente und Einllungen\Daniel.Kracht\Desktop\STDOLE2 .TLB# AutomatioFn@MSForms>BSFVr@ms3UD452EE1-E08F-1 01A-8-02608C4D0BB4UWIND@OWS\syRm32\FM20.DLL#Micr@osoft : o Object Library/;D100}#0# 0@EY75F516E0-802E-4C3@.A4D-32EB35DB3AD3IYOKUME~1\dk\LOKALTem@p\VBE\J.8exd`2@!.E .`M OfficOf@ic A@2DF8D04C-5BFA^B-BDE5@@AA42 0Platte-D z:flder:MSO97Lm,p 8.0m@+ @DieseArbeitsmappeG"i@;sArTbisaDp@e2E H1"vs",D΁+$TaleD1GTalmx1i2ro&mw3qJ3k3q3o-Sm B ewirtGV`2w4r2ung2I/ W #( @ /natkPennGn/tk`n`2o5$/aoUhrz UcUh`Sz`aSc'c oUDa`G @ De"F2L 3ml !KMGaKM@;-#2& -0) =ueberna"Ju )!}jrah(KNas *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.4#0#C:\Programme\Microsoft Office\Office10\EXCEL.EXE#Microsoft Excel 10.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Dokumente und Einstellungen\Daniel.Kracht\Desktop\STDOLE2.TLB#OLE Automation*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{75F516E0-802E-4C3A-8A4D-32EB35DB3AD3}#2.0#0#C:\DOKUME~1\dk\LOKALE~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M V*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.2#0#C:\Dokumente und Einstellungen\Daniel.Kracht\Desktop\Platte-Dz:Desktop Folder:MSO97.DLL#Microsoft Office 8.0 Object Library   ??????-G "DieseArbeitsmappe1L4930118d"DieseArbeitsmappeTabelle11D4930118dTabelle1&Tabelle31E4930118dQTabelle30-Bewirtung1F4930118dGBewirtungW H natkenn1G4930118d5natkenn`Uhrzeit1H4930118dEUhrzeitUx Daten1I4930118d9 Datenl  KM1J4930118dMKM-uebernachtung1K4930118dOuebernachtungH0`xmn J l)xK0=j9p9@@aiGB:· Md*(9n߄;NHQRxmԏU|E)]@c;w4ItKV s hiL4 Excel+ VBAWin16~Win32MacVBA6# Reisekostenbeleg'stdole`MSFormsCOfficeu DieseArbeitsmappe _Evaluatex_oldy_old Workbook_Open Tabelle1RWorksheet_SelectionChange4TargetFRange xoyl ActiveCellColumniRowendeCok^ natkenn(]Show Daten1wertK6MsgBoxRvbYesNoCellsValueK Uhrzeit# Bewirtung Activate|abfrage KM] uebernachtungG Tabelle3Tabbrechen_ClickuNeingabe_frueh_Change IsNumeric$* eingabe_frueh\Bfrueh_sperat_Click7SetFocusloesch_pausch_Click3 ok_ClickR frue2Y`W QK*srU~~~~~~~~h D+^oC=CUj  a q I  ) Ii ReisekostenbelegDieseArbeitsmappeTabelle1Tabelle3 BewirtungnatkennUhrzeitDatenKM uebernachtungF /C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA  1`F 0C:\Programme\Microsoft Office\Office10\EXCEL.EXEExcel )p0F@C:\Dokumente und Einstellungen\Daniel.Kracht\Desktop\STDOLE2.TLBstdole 1.E .`M C:\WINDOWS\system32\FM20.DLLMSForms 11Y`Aޢ^h0b ,C:\DOKUME~1\dk\LOKALE~1\Temp\VBE\MSForms.exd 19L-[DRWC:\Dokumente und Einstellungen\Daniel.Kracht\Desktop\Platte-Dz:Desktop Folder:MSO97.DLLOffice !F4st:[7NeF@nPG֓`?IDFWorkbook Workbook_Open T4MrU~} y ?????????  k(  $}I ¯NCh0 $ok',(OK'g NpD*.in welchem Land findet die bernachtung statt?{08D J{1,Deutschlandland04DJ{0,Auslandland0AH,,0f.o,CompObj#aVBFrame%* 0Tueberschrift ( Hdeutschlandt{$ Dausland{", 1(landauswahlt  Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} natkenn Caption = "Reiseziel - Land" ClientHeight = 2745 ClientLeft = 45 ClientTop = 345 ClientWidth = 3960 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 36 End (  *d} ¯NCh0|(24labelab1*Abfahrt@*AnkunftD@(OK' Op( Abbrechend Op*:,{1Tahomad @H,Uhrzeit2NnNnf*o,LCompObjDaN{00'0 @H,N{00'0 @H,N{00'0 @H,N{00'0*:,{1Tahomad(lschen Op<D  {1,Tagesreisedreiseart0@D {0,Tag der Abreisereiseart0DD {0,ganztgig abwesendreiseart0DD {0,Tag der Rckreisedreiseart0(24labelan1q  $ ok'( , abbrechenbre (24 trennabSO$ 0stdabab1O$!0minabab'O$"0stdanab1 $#0 minanab' ($24trennanS $%( loeschen( &Lreiseart1bre( 'Preiseart2bre( (Treiseart3breq( )Treiseart4bre  Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} Uhrzeit Caption = "Reisezeit" ClientHeight = VBFrameF$Bewirtung,Nn!NnfKo M2775 ClientLeft = 45 ClientTop = 345 ClientWidth = 4440 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 100 End (  &}& ¯NCh0 ( ,abbrechenou( Abbrechenbre Op(OK'g Np(lschenng Op * Frhstckre @@D!a0,ohne FrhstckefruehFr0\D*!{0,Frhstck normal (in Rechnung inbegriffen)fruehtc0\D*Y!{0,Frhstck (separat in Rechnung aufgefhrt)fruehtc0H,{0*Euro1Tahoma\D+!a0,Frhstck Ausland (in Rechnung inbegriffen)fruehtc0 $ok': , (loesch_pausche(28Label1( Pfrueh_nichts{O( lfrueh_normal{, lfrueh_seperate{ , $eingabe_frueheg ( 24Label2: , l frueh_auslande{ Microsoft Forms 2.0 FormEmbCompObj!_aVBFramea5Daten $!Nn(Nnffnedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} Bewirtung Caption = "Pauschbetrge - Bewirtung" ClientHeight = 3615 ClientLeft = 45 ClientTop = 345 ClientWidth = 5595 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 38 End (  }) R KQ|Arial$(personDo#%h9 CompObj&aVBFrame)KM)(Nnp*Nn H,,0AAH, ,0*Name@*Monat2@(OK'g Op0 R KQlt- GIF89a]P鉊~~ffivvyBAEQQUǽzz~朜\\`JIM[Z^UUY"448FEIXX\^^b..2llp98]]assv__c !ߟꓔwx{bbehhknnqᱲ``dޟ޻ˣ߶ʇ͛㝝""&!kknųWX[|{ccg엗oosuuxggk̘XX[#mmq__bYY]YZ^ijmjjlyz|yz~zz}!񥦩77;!!%!,]P H*\ȰCnQCŋ3Ap`Z1)ݤ J82˗0c#@JI vܒɳgRKI0Ǔ&w*]t:2h MӫX``(сGٳf?Ĉ갟2ʝ!/^ ,=-~Bt̘qhU#נ$2kޜ9VШd ̇f($M3\E@!V 桸*:槖B ?fn4`^=˟?|nvHG&!8sG|8`pNg1LҞ{hbMG3Ch"74 Zτ(cv8703؃ C`YpQa%ָ`<*0)qY I.iNz8T9f=s[itdr\d xjh2pCu)&e0(3, !D9ir҅Lz="|Y$)_y(g Hj=#D0W^2\"Bcz( ^&d=JXڎ-?p⁚"枥G%r@Zm pPDf- [V,$aG.<h(I-ZOUYy1&Olj@wF0{s(#dΟ 0k b Zw0$K3=䡀ԓsc,#pе!h  w~` `} L;࡫ZT8a3 'Hj*ZL9ZzR .IhnIj`(8x$q ]l$QROo Z1D0 oKl.@ ːAwZLWFߌ0l:(e2 DC<=`{!;4uC |TABEX`X!Dt,(ataja(p p8я&6JpFAlPF(1A}9pbOq 12Hb8#<q" H8 8A"dGh84B@B!25B8%A D!z KAC8I8[,jQ$"mwpA30`,Y uCZ2i0&lh@aib<1AA(B@pJ޳(J (TANA!s<U<ȷB^pne dFZ(@ȶ:zSyH)X_ w!&@ eh<ETAu͢@:A= 709M&ȠU wX`J`D 'XdP (cnpt"3퍂X>)S(,"q!&d`.BZ]@,l!Fd@@ 2D=X4:ʪ 5P&H iL`B8jpQ>e f` 'B c%6@;`D!l =V oVJ%=ʼnPq, $ fp-Vq|&X0p@. '~ ~mkYE6aT., a~CpH.PNV-HlAm#SB1~ *,l= ?I @] Au B C D E F E_AdHocReviewCycleID_EmailSubject _AuthorEmail_AuthorEmailDisplayName_ReviewingToolsShownOnce KAW020000 KAW020001 KAW010101 KAW010310 KAW002952 KAW010102 KAW010311 KAW010201 KAW010410 KAW020003 KAW010103 KAW010301 KAW010312 KAW010202 KAW010411 KAW002954 KAW010104 KAW010302 KAW010313 KAW010203 KAW010401 KAW010412 KAW999120 KAW010501 KAW010105 KAW010303! KAW010314" KAW010204# KAW010402$ KAW010413% KAW010502& KAW010304' KAW010205( KAW010403) KAW010414* KAW010503+ KAW010107, KAW010305- KAW010206. KAW010404/ KAW0104150 KAW0109991 KAW0105042 KAW0101083 KAW0103064 KAW0102075 KAW0104056 KAW0104167 KAW0105058 KAW0101099 KAW010307: KAW010208; KAW010406< KAW010417= KAW010308> KAW010407? KAW999983@ KAW010507A KAW010309B KAW010408C KAW010409D KAW999985E999000F KAW9999500RK Pauschalenmail@daniel-kracht.deDaniel KrachtLI6S3W2026920061dk06JW1ZN305 17FrauKrachtMit freundlichen Gren1118 24.05.2006NeumannDanielBBH Group GmbHPCD MandantenNeu20269Firma27/263/01466BBH Group GmbHBBH Group GmbH@Firma BBH Group GmbH Kaiser-Friedrich-Str. 60 10627 Berlin33495Alle Kaiser-Friedrich-Str. 600dk10627 Berlin20269 K0000016Alle Dokumente Sehr geehrte Damen und Herren,(002006999120003PCD006999983008K0000016J10.0 FMicrosoft Excel-ArbeitsblattBiff8Excel.Sheet.89q