аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ 5 ўџџџ-2" !#$%&'()*+,ўџџџ./016I4ўџџџўџџџ789B;<=>?@A3CDEFGHJKLMNQOPRўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РFр3сžчУ e*‰!чУ€=WorkbookџџџџS_VBA_PROJECT_CUR"џџџџџџџџРU“ˆ!чУр=!‰!чУCtls џџџџџџџџHўџџџ ўџџџ !"#$%&'()*+,-./0123456789ўџџџ;<=>?@AўџџџCDўџџџFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdўџџџfghijklmnoўџџџqrstuvwxyz{|}~€@2зiЮЭЇwн_-* #,##0.00\ "Ќ "_-;\-* #,##0.00\ "Ќ "_-;_-* "-"??\ "Ќ "_-;_-@_-{+;_-* #,##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">Ј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_-;_-@_-рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р рЋѕџ јР рЉѕџ јР р ѕџ јР рЊѕџ јР рЈѕџ јР “€џ“€џ“€џ“€џ“€џ“€џ`… VB-fun-DemoŒ11Ўўџўџ UserFormAnzeigenСС€8ыŸ№—№№="№5ˆьКЇ5н/ЗJ.Uмџb@=№ ˆьКЇ5н/ЗJ.UмФ t$PЙxзўxкЕUKOSAўfZZ† 1QH йŠ]ƒЈ1BBŒ&.и@EгаmaAтЂqсš?рaсЮЎмёHиљШѕ;sgnXus™›г™sц|чœof:cМBЏЕ)гJџ6|Ь…GkƒOCР,эœkйи8j€Яв ŒSžЌ<}HsWц7Ъо‹ћw#б,ѓ‹ZW{AЬ иXБШш’AЧeМŽ<Ztž‘“Й"N0УЈТЂg1д„Q@FQ” ђ›vHœAЖ UdЗлMVљщ#ОЙыЌy||œ 3ЪЏрц ВIБ ђшш(Af•п§,П?g&QчZeњЎЁŒŒ•˜‚[0qdЫucџУžFёКЦKёЖмЎnж’ \„!Uvlixˆ9›cuL RЋVv ѕэМЋ!Я/‹ї м4QЮЭeЉ‰2(UR$‡2уw@ыкwиЯ…vоЗш§nx ѓvзизќйжg<ш&СžЈШнхўуЗ >GK§ŸBN“RЎРŠЃnE56>šз[*GагцhЧПх9нx=mŽsзїZO‹уMЪ5Е~ёmбуnЮеЄаGO“Лѕqз 7/`к_ыeзs КфКРМ/!OаыrЗІ”їїз„ЏKюшqЕџЯ)Ћ&^‡гј Kкa88r_ѓ†ЉbгёЉБ?Р*xKл2Е і8jЂGMЎp•Ж_єіOЙЁJИЛИGыњДнL Ћєэ1‹Зƒu7зР6gярОCtw“і=z6‰hpTТnё›eœчqРкеЏХеЮcЫЁ™a‹пЂЊхЕЏЄПП5“ДЖОS№‚ђЮŸ3й‹u§_<љR~ЙџЕцф]YѕoaЮлъ~Я6\х5Зž;ŒV'ПМ:Cy/Yџох§},up;Ѓgъ\Ш;Їі~Nе;JЙт§Цќј7DГ^3 №П Р@@ё  їќџ ЏЭЩ@ Ї  dќЉёвMbP?_*+‚€%џСƒ„M\HP LaserJet 5Lд† іјќџ'Xџ'_;ЩгјјіXќџЁ" dќџŠ<ќ§~п?Š<ќ§~п?U ьц№о№№Ц№( №€€€€РРР€€€ №№Ž’ № “ №TПA ?ПР@џ€УПCommandButton1№ёк№]` ј5b1 6$Шwєј Forms.CommandButton.1H>Ж@  я7К Tabelle1 VBAџџџџџџџџріšˆ!чУрг‰!чУDieseArbeitsmappe$ џџџџTabelle1џџџџk__SRP_4 џџџџ:ќџџџџџџџџџџP[LџџџџSџџџџS”џџџџ<џџ<џџ<џџ<џџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}8H€ўџџџџџџџ(џџџџџџџџџџ%џџџџ80џџџџџџџџџџџџ|џ@џџџџe˜Œiƒўџџџџџџџџџџџџџџџџџ ˜(јƒўџџџџџџџРџџџџџџџџџџџџџџ %‚ џџџџўџџџ№џџўџџџџџџџџџџџ %џџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџ Pџџџџџџџџџџџџџџˆlџџџ џџ џџџџ@ўџ\џџџ џџ џџџџ@ўџLџџџ џџ џџџџџџџџHџџџ џџ џџџџ@ўџ8џџџ џџ џџџџ@ўџ(џџџ џџ РџџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШ˜@œ˜џџџџџџџџџџџџџџџџџџџџџџ0ЧЏsA пўЪ€€ џџџџ€ џџџџџџџџ(ЭџџxџџџџЈџџџџ@џџџџhџџџџPџџџџЪАAttribute VB_Name = "DieseArbeitsmappe" "  Bas 0{00020819ъ-0C$ 0046} |GlobalкSpa‚cIFalse dCreatablPredeclaIdЖTru BExposeTemplate`Deriv’BuРstomizD2€Option /€licit 0ьh]w7Ы‹іхџџcˆЖџџџџџџџџDџџypъ‡mKЁ†+оХыА= РF.мдГ˜њI‚Bш‘ОyЁџџџџџџџџџџџџx,CommandButton1, 2, 0, MSForms, CommandButton.мдГ˜њI‚Bш‘ОyЁypъ‡mKЁ†+оХыА=џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSLџџџџSџџџџS”џџџџsџџџџ6"џџџџџџџџš"џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџј€ўџџџџџџџ(џџџџџџџџџџ% %ƒўџџџџџџџ`џџџџџџџџџџџџџџ%‚ џџџџўџџџџџўџџџџџџџџџџџ%џџџџ`*€•џџџџ80@џџџџџџџџ –џџџџ`џџџџџџџџ8|џkџџџџe(œiƒўџџџџџџџџџџџџџџџџџ Ш џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџˆШџџџџџџџџ џџџџШџџџџџџџџ џџџџџџџџh8H,џџџџџџџџџџџџџџџџџџџџџџ(ЧЏsA *\R8003*#5d$*\Rffff*494173b0b4$*\Rffff*484173b075пџџџџ4 <ўЪ€€ џџџџ"  џџџџ8Эџџxџџџџp–Шoџџ B@ џџџџџџџџ*БAttribute VB_Name = "Tabelle1"  јBas|0{00020820-; C$0046} |Glob„alШSpac’ False dCr@eatablP€redeclaDId­Tru BE xposeTemplateDeriv$’Bust0omizD2Co ntrol—CommandButton1, 2, 0, MSFo`rms, ŠO@ption €Rlicit †P€E€I Sub 1_Ck() frmUser*OhneTitel.Show  End rU€€€ `@ бљ! џџџџЉ4I aq џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ <‘ Й Ј§џџ`Сџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€EyЯH$ў €$b 8 <ArU€€€ џџџџџџџџH$Й`(џџџџџџџџ Ёџџџџ@Щ8nrU€€€ 0 a с1™YщЁ9 щ™ б‰Y1__SRP_5џџџџџџџџџџџџBŽfrmUserFormOhneTitel*џџџџџџџџџџџџЇ+__SRP_2 џџџџEж__SRP_3џџџџџџџџџџџџeš*\R1*#229*\R0*#1e*\R0*#1d*\R0*#14пџџџџ<е@зDиHйLкP ўЪy€ 4€ <8€ x€ џџџџ€ D˜€ 8р€ џџџџ€€  € џџџџ€ @€ @P€ BH€и€ џџџџ€ №€ @H€H€ џџџџ€ `€ 6xH€А€ џџџџ€ Ш€ @рH€ € џџџџ€ 0€ &HH€p€ џџџџ€ ˆ€  H€Р€ џџџџ€ џџџџ„ Ш„ ш€ џџџџ„ „8€ џџџџ€P€X€ џџџџ€ џџџџ"`6h$?€Ј$?Аи€ џџџџ рш€ џџџџ€  € 8Ш € џџџџ№€ џџџџ"ј€€ џџџџ€ џџџџ€ 4 а ДЄL–ж"Ы‹VџџˆЖџџа(UџџeFindWindowA(4GetWindowLongA(Xџџ џџSetWindowLongAџ(|џџDDrawMenuBar(œhџџSendMessageA(РџџˆReleaseCaptureџџџџџџџXџџёВUEvGDzIхШ=фйВТџiKƒХ)m‚w:ФџЉ:щ0Ѕ$H”Ё‹1)ЙЖ­fШ“DjJЈ:пє ЗлџџџџџџџџџџџџxfШ“DjJЈ:пє ЗлёВUEvGDzIхШ=фџџMEЌџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ SPџџџџSџџџџSџџџџSџџџџ>"џџџџџџџџLџџџџџџџџџџџџLџџџџLџџџџ”џџџџ”џџџџ џџџџџџџџ<џџџџџџš0{C2B2D901-69FF-4B1B-83C5-296D82773AC4}{E93AA9FF-A530-4824-94A1-8B3129B9B6AD}ˆp +"€pџџџџџџџџџџџџ@џџ iƒ$џџџџџџџџџџ`„ctyiƒ&џџџџџџџџџџџџџџ„tџџ+* pџџџџџџџџџџџџРџџ  iƒ,џџџџџџџџџџр„iƒ.џџџџџџџџџџџџџџ„9+0 Dpџџџџџџџџџџџџ@џџD iƒ,џџџџџџџџџџ`„uchtiƒ.џџџџџџџџџџ€„ndeniƒ2џџџџџџџџџџџџџџ„nen +4hpџџџџџџџџџџџџрџџh iƒ,џџџџџџџџџџџџџџ„џџџџ+6Рˆpџџџџџџџџџџџџ@џџˆ iƒ,џџџџџџџџџџ`„›xiƒ8џџџџџџџџџџ€„/fyfiƒ:џџџџџџџџџџ „ŽЗiƒ<џџџџџџџџџџџџџџ€‚ю +>ЌpџџџџџџџџџџџџџџџџџџЌ B˜DXBџџџџџџџџџџџџџџb€HP4џџџџ@џџџџџџџџb€Jџџџџ8џџ џџ@џџџџџџџџ%%X Lа`џџџџџџџџ@XџkџџџџџџџџЄ.” V(`џџџџџџџџИtџkџџџџџџџџЈ=”`„Xџџџџxџџџџџ+Ю" Zш`џџџџџџџџџџџџzџJhџџџџЌX”iƒ\џџџџ џџџџˆ„Ю"нiƒ^џџџџџџџџЈ„й Еiƒ`џџџџџџџџШ„кКxiƒbџџџџџџџџџџџџ„нЕ d(`џџџџџџџџˆ |џkџџџџџџџџА j” fh`џџџџџџџџ@ |џkџџџџџџџџД o” hџџџџ`џџџџџџџџј јўkџџџџџџџџИ t”€ўџиџџаџџЈџџџџџџџџ%ўџџџџџџџџџџџиџџџџџџџџ %b˜@0№џџџCџџџџџџџџџџџџџџb˜BРCџџџџџџџџџџџџџџB˜F(ЁBџџџџџџџџџџџџџџџџџџшPџџџџџџџџ0аX (€(Рџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџhƒўџџџџџџџxџџџџџџџџџџџџџџ‚ џџџџўџџџ€џџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџј(џџџџџџџџџџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџPNT"HJVџџџџ@ўџџџџџxџџџ џџ џџџџ@ўџ@tџџџџџ џџџџ@ўџџџџџdџџџ џџ џџџџ@ўџX`џџџџџ џџџџ@ўџџџџџ\џџџџџ џџџџ@ўџџџџџXџџџџџ 0џџџџrЈHџџџ џџ @ўџџџџџxџџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX џџџџџџџџH@*JB04џџџџ@ўџџџџџtџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ( џџџџџџџџJVџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџр џџџџџџџџJVџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ А џџџџ˜ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџ@ўџШ hџџџ џџ џџ@ўџр Xџџџ џџ џџџџ@ўџј Hџџџ џџ џџџџ@ўџ 8џџџ џџ џџџџ@ўџ( (џџџ џџ џџџџ@ўџ@ џџџ џџ џџџџ@ўџџџџџџџџ џџ (@ўџџџџџјўџџ џџ џџџџ џџџџ џџџџЈџџџџџџџџhџџџџPиџџџџџџџџџџџџ№\МЄџџџџџџџџџџџџџџџџџџџџџџ€ЧЏsA $*\Rffff*484173b075ю*\G{7EB6C528-ADB1-4530-9594-58352ADAE875}#1.1#0#..\..\WINDOWS\MSApps\MSForms\SHDocVw.exd#Microsoft Internet Controls*#4*\R0*#10*\R1*#b3*\R1*#c4X€ џџџџ€ 8p ЈАРШи€ џџџџ€ Dр(€ џџџџ€ @ `p€ џџџџ€ џџџџ€ Lx€ LШ€ J€ h" x€ Hˆ€ Dа€ € џџџџ€ 0€ :H€ :ˆ€ <Ш€ џџџџ € џџџџ 0 8 P X € џџџџ"`  h p x € џџџџ"€  ˆ  ˜ € џџџџ"   Ј  + И € џџџџџџџџH р-Dieser Source stammt von http://www.vb-fun.deџр6und kann frei verwendet werden. Fќr eventuelle Schфdenрwird nicht gehaftet.XУ'р>Um Fehler oder Fragen zu klфren, nutzen Sie bitte unser Forum.р2Ansonsten viel Spaп und Erfolg mit diesem Source !ЭџџррWindows API-Aufrufe:џџџџџџр FindWindowр9 versucht ein Top-Level-Fenster zu finden, das dem ќber-р< gebenen Klassennamen und/oder dem Fenstertitel entspricht.џџџџџџІ–џџџџџџр GetWindowLongјр9 gibt den aktuellen Wert eines Window-Attributes zurќck.І–€К'Qр SetWindowLongЛћЙр/ фndert ein Attribut des angegebenen Fensters.ћІ–ћЙFZ“Юр DrawMenuBarьвЮ!р: erzwingt das Neuzeichnen der Titelleiste eines Fensters.І– ьр SendMessageвЮ!K;р Nachricht an Fenster schicken.QZІ–ZЛћЙFрReleaseCaptureр gibt Mausaktionen frei.–Р]DЌђр. Fensterstil]DЏРђ0р. Titelleiste]DЌђBO!W]DЎЁђXр.%linke Maustaste im Non-Client-Bereich]@ђ(]@ђP– P!R$NЌ œрЖ ThunderDFrame џџ!T$"'HнzBDdџџPЖ ThunderXFrame џџ!T$"'HЗ„kџџ З'JA@Voџџ–а]ђ HЌ›G|jOvр /‚р.UserForm Fensterstil (Window Style) ermitteln:‹Р H @$*'X…j*Ср2UserForm Fensterstil (Window Style) neu festlegen: Jœ X B'XŽ?dџџ8 X B'Xkџџ р>UserForm Fensterstil (Window Style) фndern - ohne Titelleiste:'„Ф H @ XA@0џкОрUserForm neuzeichnen:/ HA@4Š•+oџџˆрEUm eine UserForm ohne Titelleiste mit der Maus verschieben zu kіnnen,рEmuss man dieser einen Klick auf die nicht mehr vorhandene TitelleisteЮ"ћgрCvorgaukeln, wenn der Anwender auf eine beliebige Stelle im FormularЕKМрklickt.МEІ –(_„рAHier sei darauf hingewiesen, dass das UserForm_MouseDown-Ereignisр= nur dann funktioniert, wenn auch noch freie UserForm-Flфche˜wр vorhanden ist!!!рButton-Kontanten:р3fmButtonLeft 1 Die linke Taste wurde gedrќckt.єЋОЙр4fmButtonRight 2 Die rechte Taste wurde gedrќckt.ЗКLр5FmButtonMiddle 4 Die mittlere Taste wurde gedrќcktƒЃ HЌ›G|j\Ф/‹Ї \ЌœЗ$ŠA@> H F DЌA@6§єkџџЈoџџ –шЗ'JA@Voџџ€–(З'JA@Voџџ`–h џџA@ršЮ"ЕAКoџџ8џџџџ0р1WebBrowser1.Navigate ("file://c:\dummy\test.htm")р hier Pfad anpassentm Жich bin ein ProtokollA@ЈџџџџX џџџџYИAttribute VB_Name = "frmUserFormOhneTitel" ЌBasЌ0{C2B2D901-69FF-4B1B-83C5-296D82773AC4}@{E93AA@A530-4824-94A1-8B3129B9B6AD} dGlob„al–Spaco False ŠCr@eatablP€redeclaDIdпTru BE`xpose0TemplateDeriv–Cus tomiz‹D'Die€Ѕ Sour€`stammt von http://www.v€b-fun.dK'und kann frei verwendet werden. Fќr eve ntuelySchф€ 'wird nicht gehaftet. Um Fehler odFragen zu klфren, nutz@Sie bit™Р‚un,Рum€'AnsonstA€viel Рbп )Erfolg@ mit dA9m…E9!СOpti€9A€Vlicit"Windows API-Aufruшfe:B(F@  =suС1ein@ Top-LС „tAЕ РQиsprM:P€w€y DC‹ FuncТ0Ч' Lib "u€G32" AlBi _ "Ч A" (ByVРal lpC"ТжAs SРлng,f †lpУ?‹ )B @ LongBIG et C' gLib€^@;akƒƒn@ Wert РMeTs  -†эs@NrјќckY:j ›JчœhwXФХnI@X\x ІФЫSЮф Ѓ … =s aиngeх<Є9s™* 7›JŸeedw8New!5e8ЋDrawMenuBarтVerzwingР9 JNeuze€RYAv"Аlei`pѓd;пn H ‹$SЦ1I6m2ndMessУ †ЁNach‚e@0`ŠУqschickщ@“ hS`˜фё/n"ш€. …h‘JwMsge+….wPaЈramM lC@OAnyЋReleРйCapturУaА$kMaus k ˜п@lСБ™L‹Ћ(ъ ч$CСЊ GWL_S0TYLE…`д-16cŠ '…=tilmWS_CAPTIONˆ&HC0?aHGˆ%4#HT…= 2ЎM_NCLBUTTONDOWNP &HA1@#'link$e Ata‘)im Non-Cli‘PU-Be№kchIphWndA…Ѕ bGБбbрBooрnCSub 5‰_Initialize()БWIf ЁV(Appfa[ .Vers№) >= 9 The'№a &= ЧZ("DTh№lerDАqm€e", Me. mEB‡џd#VіX'џѓ QIf gІУŒ PGХ S˜tyl (б6hiаzаPfadа6pвlP WebBr@ter€1.Navigk@("fileР„c:\dummy\test.htmт"№ E№я mгDp ‚—tј0b Ex[рФ'U ХAs + (S o  ) erЋƒЅnА PŽm“д= e(•,ї1В ?? neu f§ lpbs0"–ч vт=‡Or W5aзяe AАNot_=Pџ џ ’nnа - o№Ж 8;2Яp#тdE,ж !џ`ud‚aeк!&ћаЂсƒ І- ѓž )‘?Вš`Q—™kіn@k,pmuss mЌanЃЁ0ЋiбlK:`k aufaдЊmehrБrhan Ќeщpvorgрaukel€Њ А№y An ‘q‘т bТe`Gbige`&‚БлP,БFupПPkqёА#љ/%_MoDo„wn”qButt ЋбРHInt $rѕe˜i`Shiftё1,XЅ1S |leUY'Љ ,'Hq=sРНdРjхhРewД ­' ­0€Я -EUgnis№ @Лr d1rТunk1OPt, `Т УaаГ noc"hp!eieЖ-Fplфchnp )`…!!"Л'ƒ-K0ontaЁ3'fђmSLe№0P`@Э у_TЂ_wurd:e`ЧdёЅaVRibgЩ 2Qr^e€Н0obFФMШiddаЭ 4d!CЯЬ№Ќ Х џIўIзFѓ №l1˜a ]€+‘Y ‡7WЌq, q–t, 02Cє?ŸW ‘WoptєeOn_љsckГWШaSъПaп\sл<ffO№,gFkАormStyle End Sub Privatep cmdBeenden_Click() Unload Mм MsgBox "ich bin eProtokoll" В™ С щ  9 џџџџ™ <a щ‰ џџџџџџџџџџџџњџџџ`Ѓ§џџ` ‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @‘ a еееЈ§џџ`IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџD )) зззџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHA Ii иииž§џџ`ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџLA I‘ йййž§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPЙ iс кккџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџbW—зWџџџџџџџџџџџџџџџџџџџџџџџџд6tџѕ xџ$ xџ dltџ эє ыс/tџxџz?adџ€`#`џ\џ4l\џtџ4ltџ^qXџstdo€le f%\*\G{00€020430-C 0046}#2.0#0#C:\WINNT\System32\c2.tlb#OLE Automation#^€MSForms>!SFEr ms3€DD452EE1-E08F-101A-8-02608C4D0BB4DcDFM20.DLL#Microsoft E‚9 €\ ObЌ Library/є;C1€„sˆƒˆ00}#0‚Ž#€j0•wРA9E500716-1CC3-479E-A9€5B-238B7 56328KXDOWS\TEMP\Excel8.0Т\„P.exd 8@€с.E р….`ŒM Дœƒ†Offic„†O€ƒfic5‚†ŒР ‚Р.2DF8D04C-5BFAAdB-BDЄE5€FAA€…4РB2.D:\o\У`C 97\C1јO97Li Р8Œi!€УZSHDocV‚wSHD cVwi€ +EAB22AC0-30C1-11CF-A7EBBrC05BAE0РB}#1.1FВТY(SYS€Z\€OCVWL'Internet Contprols?"b0‰k„F4A44FD7-A61F-45DE-8645-E6A038F6B7AЦ1‚GVBEС!'ьFЮ  @Р*ВъС0ЯЇыPР[Ў a—т”тЫ‹ DieseArbeitsmap`peG"СрHe zeArb Jis`|apб eг2пТZ€ р?С1ЂŸБ-І"a,Ђs†+AрTabell e1GЁaЕТl"Ђ1Рi2rMo=РЌmіхk  frmUser’OhneTit`elG(!Р$mUB&rЦЂOhTn€'TР)tрlkрѕ2џчoмѓРmVc!Ѕ(Ё&“K*mџџџџrU€€€€~~~~~~~~~~~~~~~~~~~~~~~~4 Ai ЉгJBs‡оcщє фџџџџ џџџџџџџџџџџџЙƒŠa i џџџџ1 џџщƒ€a ™џџџџ YyAљЙББ 9iџџ  сЙ™DieseArbeitsmappeTabelle1frmUserFormOhneTitel VBAProjectяРF /C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA aџџџџ ‰ёРF /c:\Programme\Microsoft_Office\Office\EXCEL9.OLBExcel YЬamџ фњ*\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.3#0#c:\Programme\Microsoft_Office\Office\EXCEL9.OLB#Microsoft Excel 9.0 Object LibraryИ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINNT\System32\stdole2.tlb#OLE Automationк*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#c:\WINNT\System32\FM20.DLL#Microsoft Forms 2.0 Object Libraryю*\G{9E500716-1CC3-479E-A95B-238B02656328}#2.0#0#C:\WINDOWS\TEMP\Excel8.0\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#D:\office\Microsoft Office 97\Office\MSO97.DLL#Microsoft Office 8.0 Object Libraryв*\G{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}#1.1#0#C:\WINDOWS\SYSTEM\SHDOCVW.DLL#Microsoft Internet Controlsж*\G{F4A44FD7-A61F-45DE-8645-E6A038F6B7A1}#1.1#0#C:\WINDOWS\TEMP\VBE\SHDocVw.exd#Microsoft Internet ControlsР*ВъС0ЯЇыР[Ў   џџџџџџЧЏsA џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЫ‹"DieseArbeitsmappe464173afc7џџ"DieseArbeitsmappeџџs†БџџTabelle1494173b0b4џџTabelle1џџіхHџџџџ=џџ(frmUserFormOhneTitel484173b075џџ(frmUserFormOhneTitelџџVHм"џџ0hџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџк"—зНр Lƒ=ІьрЈкѕџџџџЄZЛњ1lOВnв]П=еџџџџџџџџŠ8зЉr"аџџџџ@MЙ9BEЃи5эШГЬМџџџџџџџџ€TWџф0€џcallД€џTrue Excel€+ VBAїтWin16С~Win32MacГВVBA6­# VBAProjectОПstdole“`MSFormsCOfficeu DieseArbeitsmappeЏ €џ_Evaluateй Tabelle1RŠmodUserFormShowќQUserFormAnzeigenДž frmUserFormOhneTitel!ЃShowѕ FindWindowK lpClassName‚з lpWindowNameЈuser32*Ю GetWindowLong/hwnd/СnIndex' SetWindowLong ї dwNewLongтч DrawMenuBar.  SendMessageя‘wMsg+awParamblParam…7ReleaseCaptureИ“ GWL_STYLEšм WS_CAPTIONв  HTCAPTIONGWM_NCLBUTTONDOWNЊЂhWndFormтЃbCaption7jUserForm_Initialize5cValнт ApplicationЅ*VersionЁХCaptionxSetUserFormStyleдхfrmStyleіUserForm_MouseDownfОButtonкцShiftфыXoYloptCaptionOn_Click optCaptionOff_Clickї.cmdBeenden_Click’KWorkbookkUserFormN cmdBeenden5ЅFrame1Й optCaptionOn optCaptionOff˜( €џInitiaџџџџщ 0РFC:\WINNT\System32\stdole2.tlbstdoleзOЄєІоE†Eц 8іЗЁ YџџџџЩАс.E р….`ŒM Дc:\WINNT\System32\FM20.DLLMSForms aa‰ЩРPžУžGЉ[#‹ec( $C:\WINDOWS\TEMP\Excel8.0\MSForms.exd 9aaЩаLај-њ[НхЊDоR .D:\office\Microsoft Office 97\Office\MSO97.DLLOffice џџџџ9ЁрР*ВъС0ЯЇыР[Ў C:\WINDOWS\SYSTEM\SHDOCVW.DLLSHDocVw 9№C:\WINDOWS\TEMP\VBE\SHDocVw.exd с иРFypъ‡mKЁ†+оХыА= РF.мдГ˜њI‚Bш‘ОyЁDРF WorksheetС{lЏЮŸFЊWJOCommandButton1@2зiЮЭЇwнРOЩтn„ƒ(х €<cmdBeendenaa$$е€#Frame1@Їk(х € œ€WebBrowser1ЇЇ(€BBeenden Тu€ЅTahoma@LfrmUserFormOhneTitel*џџџџџџџџрг‰!чУu‰!чУfџџџџџџџџџџџџУњoџџџџЧиi07џџџџџџџџ n`єЮ›ЭЊ`Žрг‰!чУрг‰!чУёLраWs5ЯЎi+.bLРF@H  €€џџ}1qTitelleiste ... Rу ‘ЮуЊKИQВDBTahoma`‚(х €XoptCaptionOnЇд,х € XoptCaptionOffy-ЇO8FР €€€ €e {0y- einblendenfџџџџџџџџџџџџЫЭoџџџџЯАCompObjџџџџџџџџџџџџвpCompObjџџџџдa5€ЅВTahoma@8FР €€€ €a {1y- ausblenden5€ЅВTahoma@ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вqўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmUserFormOhneTitel Caption = "Demo - UserForm ohne TVBFrameџџџџџџџџџџџџжJPROJECTwmџџџџм’PROJECTџџџџп“PROJECTlkџџџџџџџџџџџџъitelleiste" ClientHeight = 5940 ClientLeft = 45 ClientTop = 330 ClientWidth = 4800 StartUpPosition = 2 'Bildschirmmitte TypeInfoVer = 20 End DieseArbeitsmappeDieseArbeitsmappeTabelle1Tabelle1frmUserFormOhneTitelfrmUserFormOhneTitelID="{D74C8CEA-5AAE-4503-874A-F8036D7F711C}" Document=DieseArbeitsmappe/&H00000000 Document=Tabelle1/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=frmUserFormOhneTitel Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="0301FCE5E5E9E5E9E5E9E5E9" DPB="E8EA17E818E818E8" GC="CDCF322BF211F311F3EE" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={00020818-0000-0000-C000-000000000046};Excel8.0;&H00000000 [Workspace] DieseArbeitsmappe=154, 154, 750, 487, C Tabelle1=44, 44, 640, 377, C frmUserFormOhneTitel=110, 110, 821, 481, , 22, 22, 824, 517, C aљVˆ 4аЉkРOзЂўџ р…ŸђљOhЋ‘+'Гй0дHP|œ Д РЬф!Demo - UserForm ohne Titelleiste Ex VB-fun.derFNEfMicrosoft Excel@€МЌЮС@€чДˆ!чУSummaryInformation(џџџџыDocumentSummaryInformation8џџџџџџџџџџџџ№ќCompObjџџџџџџџџџџџџєiџџџџџџџџџџџџўџ еЭеœ.“—+,љЎ0Ь PXd lt|„ Œ Єфnэ  VB-fun-Demo Arbeitsblфtterўџ џџџџ РFMicrosoft Excel-ArbeitsblattBiff8Excel.Sheet.8є9Вq