ࡱ> "^  !$D%&'()*+,-./0123456789:;<=>?@ABCKEFGHIJLMNOPQRSTUVWXYZ[\]`abcpfghijklmno_qrst}vwxyz{|d~Root Entry FX,#@CWorkbookD_VBA_PROJECT_CUR"~,X,Ctls  `\pPiotrek Ba= ThisWorkbook=7'8X@"1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial1Arial7#,##0\ "zB";\-#,##0\ "zB"A#,##0\ "zB";[Red]\-#,##0\ "zB"C#,##0.00\ "zB";\-#,##0.00\ "zB"M$#,##0.00\ "zB";[Red]\-#,##0.00\ "zB"w*9_-* #,##0\ "zB"_-;\-* #,##0\ "zB"_-;_-* "-"\ "zB"_-;_-@_-w)9_-* #,##0\ _z_B_-;\-* #,##0\ _z_B_-;_-* "-"\ _z_B_-;_-@_-,A_-* #,##0.00\ "zB"_-;\-* #,##0.00\ "zB"_-;_-* "-"??\ "zB"_-;_-@_-+A_-* #,##0.00\ _z_B_-;\-* #,##0.00\ _z_B_-;_-* "-"??\ _z_B_-;_-@_-                + )  , *  A  @A  HA   A  A (A  H (A !A  HA  HA !A   HA  HA  A ` PhPismo00  ;8J" L[,3?Z"E;Ykwl"6!@=;Ykwl"6;|xڭTMJQ ޛ YPQ R=Aמ@= 7pa;^ '%4y/_シq.It {'z um|[҃k WF81t^dLX({-5kxg0A-v8UDy076jIC-c|z *%AzWf뫋20qS u!H}`yf֚](_D=pͺ@g1NNZ/һ(y(w,K-^?&lvܑoYCziʸ>TvO\#[q LZ/;ʹoO_lƵӇT?^)7r׻bL|&zѦ9 u;n^ި /eb=or6ڍu>2/4}fNCs :3w"#C0G9ˑ?r@=C0G9ˑ?rj%|xڕTkQvƦTlJs-il1UEzh=Pbc ?Mԃx μncj-773oxC)of qޅ b6GRvtۄkSg_m(!4307Mnu3R0GF?Ic۶_ &@0&2x'K-;si;=ØX[^e{Kx XpLϒ^TV5TtӮ0=!:p4c((ɛ-b1O, )v*{JG rFk[P.Q]!8s=zׯҏgӷZY<_Ṇ-ª.ASe,c7s_=Na2٣P|Q{l>X<)*{<>H`5ۨ=Hz6u=9$bIz'uŶ'h_joV$ٷ5{_E`}!<}^uy}v7銢_[#[}һN L8pFLl^ Uif,bfaL%LiFHzȔ?tG6E*Qe_Gѵsb3/ zwvQ^m"$ywg99]?\E >w"l"Ŏ[W`qH@=@"Ŏ[W`q0(xڕT=hA~{]b̏$@&!M0Q1`%^~%?k &F )RZe*AAJa(D@8l7{>L\vȠtՍ(!,um0Z-簔Y&{kf(IrM@ L%v6؋~K  h:jhX2W)Lə}Oa;4Adpֶ[O: F}Cjj98S)!v+M-3እ\N8\qYL2yGicZr0@tD>ϧbR>cQcʃu#Mf gdطf4#Ҧ? % p@MWA>3gZ+%T*0 uj3_Qͣ]:5A TU#2{0έrT\ zU)}+%d@?Kze*%] x'م/b ׽RUJlgX;> urNCϡ^t?z,ަޕSSPP@oz zls҇?R"uԊuB\AVAKEC9ZeӠ24; oY !PkTG~O?iX\q~ީ6Ϻ' 52Ȋazvr` |^˃aiE5W7::Z>8N%צߊh"R\TfGfX.@=&\TfGfX0D)|xڵVnA;I;vlS(n"^: JH7CaGJ)GHE$$Bdfᄍ;`h۝o"zMi;f(A]=PB;[·8sSg>D;Oօ^! ^R`EVlN\0FlM3܂}i $:o /.ƾj su`Z-6cZ4M1ly4@1zuERq5=i"%214 v\5G\$]|/\ﰫ}w1&r^V ]D_Ɩ=7VZ7#ɳ`1߃~{zjO;QO=%B~7x/"F)2:;0K tM\w"@=)2:;0K tM\w|xڭU;NA }3 $H @ QAP"!8Aj, .@砢z޵N7u.;icX;f3xl9[xvKr{C&`}nC5 VNEIT#{cT~h%c_HsB-)8"_;HgEF AE~wUɇ}-*ꢃ _%A.d֜g欭8]URz>y"s6\r<(q{0vIl!Bz6@]r1Ʌ=]';2?s(W/vMWSѝԓWV;/;ig\S拄N켸rׂ͸zP%rS׿p{\ǤgRi޶ShR//gn>F+404}s'/o"ؘ uD-@=ؘ uD-ixxڕT?hQK4״M՚jJoQJQ,]lb5`tqj b .RE7AC]{.y=Rwe}BB{M`SW]0C,# L/D B(60}=Ntݦ(Sz3pRz TH$F⺮?C(NE2{q , #Y:+|!X~M:v1#W-/]3l٬5~Wz2SLVLMo?aD?߯''sZq7HΖV{ī*F]q9۴tg ~xQ_\u/"ekH~ʥC`3QOgq|Ome_| ∡8V/̵Ƕs SSB**XB/Q zm[Y޺ۡ^VabErBsAoUƨ5G}U}Q8cJ e[_K("D^5\&[k @=^5\&[k9#|xڭT;NA }3W!H)6 M:@įH*Ԝ z . 8GZ];D(XGV?oƳ52i~0>aA(iphZ39[l4J z-5h2KC;qKeځd `ɀJڈ@ fZuBTtfQ&LCEՙ9_lLSKJciz=g8Vf50&N5k0\cb1;Gus=rr=O JwNGoj1x1 A' aLqp0fFIf"˅5Xx1Qהaժ%Gްt#:KwS#,8b;V޵z`_4~s'% |yyS>m3|}P,NjZ_py𶘂1WJ<2IHth~~yo'= Hޥ4!ߜ- ms<+F\jOsttqĽ6&jN] q=َՖyOP)WgSsE 6,*)_ddփ S?D64qZS1Z-ڛekwyvFmm=nm6" ͽqSGCjK@= ͽqSGCjKh# &*|xڕSkQ&&٤4?*5&\"1hiOXQ/E'1P!Wj=xP\D,Tz&^A(AVXg޾;?&Lvޛo7op֋(tXM!>0Фx'r| |6鹅d [jsZa&b2ARTWQDqp>ō2% dg6]-4awV[ܵ{ꑖWn B22c\XUDz4 Exn1#q7p JKzj^Rƨ;& 5-ǽD]*휾'♆߽`J7ڧ`[/lV"i[} t?䶵7N`'Y~B8h,~%eO31"t/oA>?$9dWDz7h'@q,AyRcX 2"ڤI<߬ϴgܑGfj;LzM˖S^yW] SZWS`wryx< Ws˜rVwr5+[M`kXEb9QNoWa)v]e_sVRvt\R |"@|.1|2{@=|.1|2{|xڭTJA fEhb^,7>@]{ _79zޅ5Mi)xpSB|I:Wt2p違#aq i} `ׁK(hd:(:N[ 'J^K}-c~h'c_LKu|4tgVyR/=3qB""?=7qUXl'nK"CO-9[NwcOp^O~5.iF:. ;iM[(~]4QHXZ~Fڔ3.Z;2?k(W/~:MW?ЇJNɃydrWt3CEU}'~^\9W[ׂ͸PK>~+*6ˌyҫmRjV//gg-{S?BWhah448I:+ؿrn"!Dsۆa j@=!Dsۆa ja xڕTkQM۴jM&ۂ*QExL!UZ)Pscċ=q Ԯ8ac\eBoԊoH zOz㚇u"l2\ƜIckX94t(frTtZYSK\42Xlx1tCSKb6^-o=iY"o9_f1f7Um)K=9jqɱtj.!'̷A<,p~R4_){6} =%F{39_XfkukK?kxYc&_v$ܵ_3H}G.2`yXU9@oa (IS{?)|Idq?`Qiųv,ޤkӚcz>10S(De٬OQ,:Y(RDyWnX29+KTU=5P(P?%,PbfrC/I[ ɓZ QHƶӰgr·Ϥ~ls&r&+JK RwrOSƌɜr>8fפm" i$/vӬt>@= i$/vӬt>a xxڕS=hSQ{mLj5T{ׂTl63H bC`3<7ݒE:883(P١B)J@Pxs}mO=sUt!cN]8 I$OH'[)&@pt gN=A?~fR,6g2.+N(KIE?D(:>_oŞD\/6޲&aj+LYwl~;}AH20a.ysY\[꓄cDevx̴K2V?`JDQ<=a{!0)}W8SQc~I K;O'! ӿݯiiQ%BUVs'VP&}~<ڮNP)ѣ\i54w|_eQh5L2 Y̹*n6E9˞;*FSp/cl1{G a-^]O~ߓn]n숥w(IY ƌ2[/)(JSYeͺ=y٦ ~K }r:g\ `Zqt}FqdNvg5O#{ƾF\È4풆"ZQ9S+@=ZQ9S+Hg4|xڕSkQ&1Q*R:uju4&Vi P̐1Apq(PC PvPtp~P(s}}'Gj8w r* p= "="@!l_ɰc`l 7.ӧfCT& SeJ$ `1INI)oa%Fs2Ɠ7Z=;Ս?p?$MŢ[^r[jX.4b1ť;C} ID>)!OsTp}B5h  !"#$%&'()*+,-./0123456789:;=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]_`abcdefghijklmnpqrtuvwxyz{|}~#-?@,+Tre[ (*)0 r@ArialҋB `H({5Arial#-?@@+&Imi i nazwisko (*) @ArialҋB `H({5ArialҋB `H({5ArialҋB `H({5Arial#-?@+<|#Zu\|wIBfɯۄebwhhm h߲ YLzmNce5[6yogȇZk p/ADm>al!1T$RNnECiz-޾Zzf91 ?[JcKɑ-mkI?&B<:!~-B_s5/TaN}۰.bNy^(c-ԈUԉE⯊\R!9ݟ{K!DCsƈ)-Sпy IsB"\FU{}'xk@=\FU{}'xk !xڭV=LSQ>A 1JbS-5)1@b4R *avpp``pt3DL'M9zUcm{נ5&)sq<eOHlg@GϜ@ +$v yY LQ#Ua)C'rn\gvˊ2EmD ,HX,zBp*f^&4Wz&׍2$k.Q놧ijr]RS! O7OD9s0seVC lRP\CP(݅|A0 t2FuQJ>m'SY=PH56\pcKKAqb0&C!KIL7h2 {,ɘ=;xgBPVd! aM?ODhr96Q 88NVe;}vZe_4~1{Lk-cX~|kYr5vwO)W,պxf[UՎKZ_sU`Ztr1P\}eq(tUTnU1W?Z_qtitQɟP=߿γG+α )yCPwLCb;Jy),']]tC)gV6A\b( 6TO6}$CaiSׂp7CH׾y/=+Y~kK;[0_B{ˈGvj ǂrD~_!o7Ո5"gAV[!(:}l'Ԇ8HJtcVx-qjK!Xgcz3aRb$ef Mտ/}-NxErD^4gj{l9pG;+mo;ڜKhm/d(""ڛ'8b8Px6@="ڛ'8b8Px6|a |zxڕTkA&4XMtSЛVET bAHiih=(x4^x`UDLmf>ipzo~oWGT>!30,j' hB`RwupYOs*R 678'50:Z:I KĻ!z2FʠKd}Oq񦘗>iDޛO`5,bod[J^#G=#5 q0ОY|E{iPJX[n-Ae9p1h N|gB]cz)S KƜr]c\>8F="q5EX΃ʥcʈ@=q5EX΃ʥcʈHKR |ZxڕSMkSQ=%MgMڦZ@XK@,]]"P[Ji@"˂ƍ.n_E".J(bJy澾P޹3s̼(e8f݋q`_iKhGRNJǷH<BSQ4AǼ9:&ED U3D}LX;]7hʑ(QNo.mL)̗嫝I>mUmى{~:c(<B0w ZT^(&؅E)č)!>fkwk]s۟3ѷizuv13 frX,}j}%f9UԐ%/k[v[>?hXkc謯qAgg$ꌋ"O& s-c X,e@=O& s-c X,e ![xڭVMhA~3Ih5/mڤPj["B/,PC1Z`X>3(.KR XQdӍaԮeIT,sF叡>ځD0{T+n΂4岧) nN,󍇞4PdMU5}4-C.4Ef!=/{!׉r?9qXj!̈́$4;.4W {HwA,LRD#ѧ1G&H2cC@Y +툁H1.O71u cmi FjXh^`{@=sQ>mi FjXh^` E! AxڭVMHTQ>sL7&Dlf 6᲍8D 6AeƁ fAѺE A-[0K\Lw{g{=wC0^86ҵ Jq\B#Bi$V=4iĕ8m|ԻCb',RmȊ@VF]UL;hˁ)C7rγG;`иXQHsYT|M%9 O|MK J͌^5?oKjMUFX淝OfHs0{eC)l2\Kє_rvMfivBkan_~ F_u@(eJ{k'^W/kE\+:L]2g,ozF9;R[d½c5JN=lfWpj}"KyΛ&xAk)80U-O=A/QS[ ;'M#䜠QS&8&kˣ&GM&o*l9O y;D: p|Q3/:NX1 X;gw/=;"q] g>wۑύU6Ļ_MV,X`'c౪=}sWϾ{ߍx$"`Zuƻ:t,?< @=4Zuƻ:t,?Tv966xڅMJ1JDp#*D\TVq7Bwz o!Ti_URbۯA;&t$5 PS^i_5QDrKCH\ŋ(LDB)v"M։g\"*JJw3fJz`翺]ӌPf16:f2{)f?,zabxM2)ڋSN~X<_$"a=:Me'I@={a=:Me'Ib|IxڕTkQަMmHhjM{!Rh{p){ z=XIJ0μ}/ZŁo߼y{3Dc C\]8'd0'aR LB~eZ&. >%򇴳dI -*gPUL C䉢Hş'&tmp>$ku`+eu-6`څuPiz/5ɔG 3v|Vo}S:%(~YpG%^Kx^'~/`Rba/p kphhWcYNu"l/OS zf$C8{CG:ž4(#T|[F-͘P˒ct7W/cf2FJ-I:atEwI^g2KsKT{+XG'5ҝjΓx7oyoOzZ Km/1T$\D9}sʣH+/М'2#J3rjh+ >}_ޓjJ#xT,dN53 ~^+N =ksS-˴>{|#$";fU|)Ce4q@=;fU|)Ce4qkgxڕTOAnma)H5قD$$&,+z1<٤@aOʑ^<Ń&gF=p`8M41d}ovM8=]*|}u@; D:E9҅h r$n\_ǎ?ڌ`vrI'C8D aF2$+ ?X3k0ؒqJ 9/b}`L/ \NLb[#u0>{?AHO2b7a҂\Dz+ ;-^,z쒽PXuK+s36# 1Di[~ *H*gK,*?#[_f@z[ӭ׿Up~g % CXvt`j"Mԥ1/T3o6e<[JhygW*\W0E8è?U4^S 1ؘa?yÍyqnjmLDڞz"mIԩ1CVdeЎ>SWI@=AIԩ1CVdeЎ>SWtA@.|xڕU=hSQk&/ƦPj)jjmBiJ0>[3dtlEtQppp `( sp;s{}aP# 2c8g.n4߂Jxk}&ǗȷI21~4JJa#{xjȲ0  KZIYQOH0 US1grD-b\=Lêroy6Fa|GOIo(v}Nr`),*Hl ȝeqLLGcuDtWī@-KEt dDTUg&fMBPeրʚCz:SYw-/8 0!@ GڶH[`3ߗ(I18G Iȓ0m[z4S $SywaVHsCP: HVjtg!Edwu~89{$uځ{`(-*"Nae+S"qnqt\z~P[Dy0{cVcNvco^`[?vP~hZXL+#IƘC E k^{?g5~m}=Tap0C]&<=xݠylUp? =  != ! "= "" #= ## $= $$ %= %% & = &' ') (> (; )** *.+ +-, ,0- -1. .2/ /30 041 152 263 374 4: 5,6#. 7D*@D+@@D,@@D-@@D.@@D/@D0@@D1@@D2@@D3@@D4@7#. TbD(T D6@@M@!XXXX Formularz zawiera bBdy XXXX*@Bez zastrze|eD"?? Do weryfikacji ??B?? Do weryfikacji ?? 7/:;< <&= =&> >&? ?&Dl @ABCDEFG H@I@J`K@NRW@ @&A A&B B&C C&D D&E E&F F&G G(HIJ J< N8R!W"":  ,2(  r  s 8A ?@Label19:3]X Ln,1 .4,R 2 Forms.Label.1`~v  s <A ?@TextBox19a9*]f o,1 <p,R2Forms.TextBox.1`D p,R$zr  s 8A" ?@Label2979']X 0p,1 .,R2 Forms.Label.1t~v  s <A ?@TextBox29*a96]f 4B,1 <,R2Forms.TextBox.1D ,R$~vfUlica i numer (przy braku ulic wyBacznie numer) (*)@Arial#-?@d+JKod pocztowy (*) Miejscowo[ (*)B@Arial0ҋB `AAH({5Arial#-?@(+Wojewdztwo (*) @ArialҋB `H( {5Arial#-?@+woj.{5Arial#-?@$+ Nasz znak:.{5ArialҋB `H(; {5Arial#-?@X+@GBwny Urzd Nadzoru Budowlanego!{@Arial#-?@(+ul. Krucza 38/42{5Arial#-?@(+00-926 Warszawa{5Arial0ҋB `AH(m{ @ArialҋB `H(45ArialҋB `H(; {5Arial#-?@$+ Dotyczy (*):{5Arial#-?@$+ Wasz znak:a{5Arial#-?@(+Rodzaj pisma (*) { @ArialҋB `H(&X@xArialҋB `H(&X @xArialҋB `H(&X@xArialҋB `H(&X@xArialҋB `H(&X@xArialҋB `H(&X@xArialҋB `H(&X @xArialҋB `H(&X@xArialҋB `H(k"X@xArialҋB `H(&X@xArial@2iwA ?@ComboBox1/9E`9Q]x  r,1 N .R2Forms.ComboBox.10L .R$! .R%zr   s 8A ?@Label59E&9N]X  8s,1 .P.R2 Forms.Label.1|\~v   s <A ?@TextBox6U9 9]f  Ht,1 <.R2Forms.TextBox.1D .R$zr  s 8A ?@Label99E,9Q]X Xu,1 ..Rx2 Forms.Label.1L|t  s :A ?@Label109X}9d]X hv,1 ./Rh2 Forms.Label.1hT~v  s <A ?@TextBox79Xa9d]f ,1 <@/RX2Forms.TextBox.1D @/R$"|t  s :A# ?@Label119s9]X ,1 .|/RL2 Forms.Label.1|t  s :A ?@Label129x9]X ,1 ./R/2 Forms.Label.1X|t  s :A ?@Label1399]X ,1 ./Rt12 Forms.Label.1Xx  s >A ?@ComboBox2x99]x ,1 N 00Rd32Forms.ComboBox.1<P 00R$# 00R%~v  s <A ?@TextBox899]f ؗ,1 <l0R\52Forms.TextBox.1D l0R$$~v  s <A ?@TextBox99a9]f ,1 <0RP72Forms.TextBox.1D 0R$%|t  s :A ?@Label1499]X ,1 .0RD92 Forms.Label.1T|t  s :A ?@Label1599]X <,1 . 1R4;2 Forms.Label.1hT|t  s :A ?@Label1699]X ,1 .\1R2 Forms.Label.1`x  s >A ?@TextBox109$9*]f ,1 <1R<2Forms.TextBox.1P 1R$+x  s >A ?@TextBox1199 ]f ,1 <1R<>2Forms.TextBox.1lT 1R$*x  s >A ?@TextBox129197]f ,1 <2RQForms.TextBox.1P 2R$,x  s >A ?@TextBox139>9D]f ,1 <L2RԁQForms.TextBox.1 P L2R$-x   s >A ?@TextBox149M9S]f  ,1 <2RȃQForms.TextBox.1` P 2R$.x ! s >A ?@TextBox159Y9_]f! ,1 <2RQForms.TextBox.1 P 2R$/x " s >A ?@TextBox169n9]f" ",1 <3RQForms.TextBox.1 T 3R$0x # s >A ?@TextBox179L9]f# $,1 <<3RdQForms.TextBox.1T P <3R$1x $ s >A ?@TextBox1899]f$ %,1 <x3R<QForms.TextBox.1 P x3R$2x % s >A ?@TextBox199L9]f% h%,1 <3RQForms.TextBox.1 P 3R$3z & s @A ?@PRZ_WiecejK3K]`& x&,1 6$3RQForms.CommandButton.1D x| ' s BA ?@PRZ_SprawdzK3K]`' ',1 6$,4RQForms.CommandButton.1 T ) s LA ?@"Text_komZbiorczyLiM]f) (7,0 <X9@<d@@@7 Arkusz1gg VBA~,@G,Arkusz1e,__SRP_2 u__SRP_3<AHHPxX`hp8xh(XHx8h( X(08@ HH Px X ` h p8 xh  ) "   "   " ( 0 " 8@H " PX` " hpx "  "  "  " xoh@oXoHA o0A$o@A(oA,ohoXoH@o80(Attribute VB_Name = "Arkusz1" Basx0{00020820- C$0046} |GlobaBlSpacFalse dCre atablPr@edeclaI"dTru BExposeTemplateDer iv$BustomizD2ControlLab el1, 0, MSForms,  TextBox2 -3, 84, 8$q 5, @ 6<, @97,> G8, @ ComboCd9, FE}@71@&V71=e1@PRZ_Inicjuvj@e1@=@-mandButton. 4,_1,1F=D?,F !%19g4#,2j|@Q2u?$eGa) MsgBox wart & " ? " & dzis RBrak daty pisma'> R$XeNiepoprawna data pisma'> R D e+(Data pisma nie moe dotyczy przyszoci'>k >G'PjB_dPi >AT Nazwa nNa$V'Rdza'> R+Brak imienia i nazwiska (lub nazwy) petenta'> R$Zero : 8 '>D R$\eBr <'>k >G'PjmB_nNa >AT Ulica i numernUl$V'RB_'> RBrak ulicy i/lub numeru'> R$Ze : 8 '> R$\e <'>k >G'PjB_nUl >AT Kod pocztowynKP$V'R (#'@ R Brak kodu pocztowego'@(&3@ R$$^ R$$^ R$- R$$^ R$$^ R$$^eP7Format kodu pocztowego niezgodny z oczekiwanym (99-999)'@k0 @G'Pj Call wstaw("B_nKPMi", kom) MiejscowopnMi$V'R (#'B R+Brak nazwy miejscowoci'B R$Ze : 8 'B R$\e- <'BkH BG'Pj @ )# @  B'>d B'>kB_nKPMi >AT WojewdztwonWo$V'R'> R $Brak nazwy wojewdztwa'> e R$`eNiepoprawna nazwa wojewdztwa'>k0 >G'Pj$B_nWo >AT Znak nadawcyznN$V'RX'> R$Z : 8 '> R$\eP <'>k >G'PjB_znN >AT Rodzaj pismaroP$V'R'> R Brak rodzaju pisma'> R$beNiepoprawny rodzaj pisma'>k >G'Pj@B_roP >AT% Pismo dotyczy$@pDo$V'R%'> R%@ Brak okrelenia przedmiotu pisma'> R$Ze : 8 '> R$\e <'>k >G'PjB_pDo >AT Znak sprawy powoanej` zSP$V'R'> R$Z : 8 '> R$\e <'>k( >G'PjB_zSP >AT Tre pismatr$d'R'> R Brak treci pisma'>X R$Ze : 8 '>kp >G'PjB_tr >AT Data wpywu (wypenia GUNB)dWp$V'R'> MsgBox wart R R$XX Niepoprawna data wpywu'> R R D e)Data wpywu nie moe dotyczy przyszoci'>k@ >G'PjB_dWp >AT  Range("G4").Select If blad Then) ActiveCell = "!!! ## BDY ## !!!" With Selection.Font* .ColorIndex = 3 ' czerwony End With Elsed$ ActiveCell = "Bez zastrzee" With Selection.Font) .ColorIndex = 10 ' zielony End With End If]h#$h'f fA fX $jB@Hk8 niebieski: &H00FF0000& zielony: &H0000C000& czerwony: &H000000FF&$@Text_komZbiorczy l%n!p!r(@F ActiveSheet.OLEObject("Text_komZbiorczy").Object.ForeColor = &HFF&o@'^ tGzj t0 t9 Gzj'^i]@ v$h'f, Z 9&v,xME(6 << < <@@P@B@F @J( @6 (`0w 14`P P`R`f+^` itBrak+VX`  ivma n`fysz+d`iv'`z`| enia`~wy) T`@iv`Gi`f+h@`iv`z$\`| `~j+`` i +b` i+`@ iR`$^iv`zodu `| z o`~'@+Xp ` I p`(#`+`cowo+\ ` ij+Z` ` i W`nWo`z'> , ` m 14`fdztw $8 ` u 14`fznN` '>  `xi 148@:@>( @Dx@H$@x(8P@Xp `% 80&H ]wH$*\Rffff*2849c0c61fm  @ "P X0h,   8H P  h $  00`h  4   0@HPh      (@  Xp 8@ $  (@ H X x     (@X `p&  0 8H Xhpx    @ H `  x    (       ( @  X x            0  8 H  h x     "      @ ` 2       0( X 0x   *  0  P h x    <( Lh B "B  (0 @PpxB   ( @P `hp"  B  ( @Ph   B B (B 08PX`h    (08B @H `h PF  ( H hX0 08 B @H PpB x " (8  Xh x0p " "8@ Xhp L <*0(`(, " (@Xp(x]](Px# fXA fX $jB@H' x'Vd'VkpihX]'z'|'d | zdl zX '~ B ~$jB@H x# v A ~$jB@H d x 'd x##e'|k z 'z xip] v$h'f fA fX $jB@H 'xko]('z'| | zd zX '~B ~$jB@H x# v z'hzp kh x##'|kH z 'z0 'hi @ wo$'`i  rPP$'bi ]''z'| | zd zX '~B ~$jB@H x# vA ~$jB@H R xGzjk x##'|k z 'z 'i ](@X'X  Gzj$(5@MZer $$^ $$^ $$^ $$^ x$- $$^ $$^ x$-  $$^  $$^Gzj $$' m 3 Gzj $$'   Gzj  $$'   Gzj        Gzj  Gzj    Gzj'Xip'\  HG'\ji]0H'Z z 8 8 z$'  Gzj'Zi`]trW$h'f fB fX $jB@H lB@ !B@#tr'x   ' 3  lB@ ko MsgBox "Poka dat wpywu"]dWpW$h'f f]  f$!'  f$(F ActiveSheet.OLEObjects("Etyk_wypelniaGUNB").Object.Visible = h5 ActiveSheet.Etyk_wypelniaGUNB.Visible = Not h Etyk_wypelniaGUNB l%n( Etyk_dataWplywu l%n( Text_dataWplywu l%n( Text_blad_dataWplywu l%n(ko8statNATB_dPiATB_nNaATB_nKPMiATB_nUlATB_nWoATB_znNATB_roPATB_pDoATB_zSPATB_trATB_dWpAToAttribute VB_Name = "Module1" Option Explicit Dim znZakazane As Sng",*Kom 0kom^LF&. L 1 2 dzis DTDateR d, CR tSub Weryfikacja(X)  .P(roc-aInvoke_Funcw\n14 #  Nie naley uywastpuj cychakpw: zn nowej linii= NownP= Left( C(), 1 0?'MsgBox A N= Chr(AÂS3) +KACCbladfBoolean, 0warting  = FalsoCall wstaw("@t", "T"@* ' e pis ma= pobierz("dPi @P@G9 & " ?&H= IfC* ThenBrak` datyD]E@0Not czyPopr(()p@ awnaAaQ)>' GA nmoe doty@ przyszocEEnd If3*3<> ""b d1TruD1ɉ0B_!*, `0 ' Nazw/nNa/!7B{+imienia iczwiskPa (lvn y) petenta.istnZ bi*dozw/gu=r+#9 LFw !$+= +a&+UB umer D'f\nUl, FBXu y i/kB+ u_*trY_*s~e@?_*_*?V†B_#E*OVKodcztowy*KP*1A"W*ke ego*_ĄCyfrap(MidBL@)) Or 2G3A z-" 4 P[, 5;rN 6smSFormatDduKzgodny z oczekiwanym (99-999)5>1RKaKnK8PMiPd%XdMiejscowov adn@2 >6 2K MtXb61K _6G2KK \ 0KRP.aKis a1 Av2va  ""r bladdTrueDCall wstaw("B_zShP",f):' Tre pismavApobierzWiel("tr"0""+.'Brak 2tbcic8ElDse dzisR"Ioa}a uiRodzP(r? j\rPrPPo : ·Q]e /*A/* St'* gB++tpѠ[5++0U(O0 aXU UǨAqR .Bm)......k{m(t"%nW/ rok#fvmies ewNj2Rvat0жCSMid(, 1 ))!_  Not czyCyfra(Mid(napis, 3, 1)) Or _ 4 PActiveCell, 5@ <> "-"m 6 O7 ( x8 'x9'<10Then Exi t Funxonrok = Val1, 4D))If <` 1901>@ 2099 -mies-2-.,> 12,dzi4N-@FF. 31@;(!= 2$= 4 6911) And)A 0'_Mod$m0R2gPoprDataiTrue E0  istnZnakiLF As String=s Bopolea @F8alsAWIn@ (@nCLF)stdole h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files\CommonMicrosoft Shared\@10\MSO.DLL# 10.0 Ob LibraryKMSForms>SFrms3D452EE1-E08F`A-8-02608C4D0BB4SFM20L'BF _&/;"1?jIqAHq00}#@8@q# 5h0 A2DCE9337-E3CD-4C96-A942-9288E9FB21786DOCUME~1\PIOTR.GUN\@USTAWI@Temp\Excel8.dB9.exdeU>$.E .`M AԈ&BnArkusz1GBnArkuA@mz1 2UHB1XC@,B7T"B+BBThisWorkb@ookG TniWGkbo2odEo6 kbXoPdule$!Md !A%!M#! 9v!b %!m2/ 2/2i2=/u3333>VK*yrU~~~~~__SRP_0__SRP_1PROJECTwmPROJECT}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\Office10\MSO.DLL#Microsoft Office 10.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{2DCE9337-E3CD-4C96-A942-9288E9FB2178}#2.0#0#C:\DOCUME~1\PIOTRE~1.GUN\USTAWI~1\Temp\Excel8.0\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M   ]wH&Arkusz12749c0c58eArkusz17ThisWorkbook1Q49c0c5875ThisWorkbook6 EModule12849c0c61f6Module1v09Module21S49c0c587Module2uHModule31T49c0c587Module3V`x0H`īa,$J>"{ݓ TMTN!ٰIRaTpMY'Je.E>#xQCL':Excel+ VBA Win16 Win32 Mac VBA6# VBAProject stdole` Officeu MSFormsC Arkusz1Ӎ _Evaluate CommandButton1_Click CommandButton2_Click Label2_Click PRZ_Inicjuj_Clickj InicjujFormularzlG PRZ_PokazDW_ClickX PokazDateWplywus PRZ_Sprawdz_Click$> Weryfikacja) PRZ_Wiecej_Click WiecejMiejscax TextBox10_Changear TextBox2_Change TextBox9_Change ThisWorkbook$ Module1b znZakazane znZakazaneKom3 komZakLF{` kom kom1 kom2 dzis2 dzisDTYh LF^ CRLF. Now& ChrK~ blad wart wstaw pobierz/M czyPoprDatajC istnZnakiNiedozwp istnZnakiLFB czyCyfrajs czyPoprWoj czyPoprRodzPr pobierzWiel wierszM znajdz' Range ActiveSheet%N Shapes< Fill, ForeColor znakz id] ActiveCell i` kon iTx# napism wn czyNaLiscie{ ri rok~ miesV dzienE Val znZak] Unprotect? SelectionZ EntireRow Insertr Protectf DrawingObjectsI Contents= Scenariosk AllowFormattingCellsE AllowFormattingColumns AllowFormattingRows A~~~ ~[ m]@L [