ࡱ>   L !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqstuvwyz{|}~rRoot Entry Fs&A@LWorkbook/_VBA_PROJECT_CUR" gzr@>rVBA |r r  !"#$%&'()*+,-/012456789:;<=>?@ABCDEGHIKMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ \pKilian Eisenegger Ba= ThisWorkbook=ZN9<X@"1nArial1nArial1nArial1nArial""SFr."\ #,##0;"SFr."\ \-#,##0'""SFr."\ #,##0;[Red]"SFr."\ \-#,##0(#"SFr."\ #,##0.00;"SFr."\ \-#,##0.00-("SFr."\ #,##0.00;[Red]"SFr."\ \-#,##0.00F*A_ "SFr."\ * #,##0_ ;_ "SFr."\ * \-#,##0_ ;_ "SFr."\ * "-"_ ;_ @_ .))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ N,I_ "SFr."\ * #,##0.00_ ;_ "SFr."\ * \-#,##0.00_ ;_ "SFr."\ * "-"??_ ;_ @_ 6+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_                 + ) , *  `Sheet1)flfa_hh_h"cc    dMbP?_*+%"??00U>@2227 Sheet1 rU x  Y  #4YiThisWorkbook __SRP_3 0__SRP_2.Sheet13_AddinInstall() 'Fr Of fi.0 Fehl4besei0tige.If( Ap.a4.CommandBa@rs.Adav@eMenusT |ThEAR E`nd If)*P;onalisi@ertes A 3)'addL @? CUlniCa6ientfernen wennVsheet geschlosj wir@ A1#delet@$ctiv@mfeAssist @@e,chalCEant.VEÛ@OpenBeim St art dVProgramms @ltt9tzv3HbMH?HOH|HFH(Be foreC>e(CanyAs Boolean l#?JJJeJj000-C000-000000000046}h(``0`` ` I W`1rtx! x dt pkr)xtZ'tx! x dt t)xt `$ xt8 $ X$x$ Px \x$$ xh1rtx! x dt pkr)xtZ'tx! x dt t)xt  h$ xt<   $ 444448rU @$`T$A`X $`\$$``((`d,#nx@x Dr2;#<"m4 G~E Fu!Nixu!Ni"m4 G~EME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%@h % %Xp@@HH07I$*\Rffff*2V48b7d6974xAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2  "X PrU 9a4__SRP_8F__SRP_9JBFormeln(__SRP_4x&| 2 @ 2;}#<!3w`DqXIF]Т&jEb8xPmx]Т&jEb8xPm!3w`DqXIME([LSS6" LLLL<,<0<4<8<<<N0{00020819-0000-0000-C000-000000000046}h(% p` xk\ `rk`  `|kd&i $rRWX % % 0`X|kXp0 `prkT p0p0@@(x @t @r t x@x r@x @t @r `0@hTP7I$*\Rffff*1L48c6b870$*\Rffff*1t4937b787*\R3*#73*\R1*#e8*\R1*#2ac*\R3*#4d*\R1*#d74- 0 0 Ph"0 (18'`P  $p  "X P ( "p $x   " 4  (1 '8H  $Px  "  P   *Energie Berechnung in Excel mit VBA Makros(C) Kilian Eisenegger 2007hft-so Version0Office Assistenten einschalten (oHp.Beim Start des Programms alle Bltter schtzen!Fr Office 2000 Fehler beseitigen r!!* H) * r!(2 kXPersonalisiertes Menu startenA@o IPersonalisiertes Menu aus Excel entfernen wenn Worksheet geschlossen wirdA@oo(!Fr Office 2000 Fehler beseitigeno( r!!instalk r!(Personalisiertes Menu startenIPersonalisiertes Menu aus Excel entfernen wenn Worksheet geschlossen wirdMenuadd MenudeleteʲAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2'Energie Berechnung in Excel mitA Makros '(C) Kiliaisenegger 2007hft-so Version Opt%plicit PNR Sub `rU @nrU @`!1 ++++++@`!1 ++++++@`} D  (0 : B % * %.!P%% B % *%>)%& B  F (pb@ B  F n  B H P p   fFp B ( &0 X h6& B  ,   ^ xU  >8 ( 0B P .` $"X B  8 @ P</h B  (   " (0Xh<+ B `a2;0HxME,@(L<`<< <<<<< <$<("L*LLLL> h`tiZ%+``:Pk ix iLX i: i  i i+%`Kt+%iN. +f@``=t+`  5`\Lo5v  3`Wk3\ x 4`H[|k4q"Ei>  |i 8iB iD i i&  `Hz`x t% p%+v`+t+( .i((iHi*(@i@i +l`At+ i\+(`XD,k +r`P)t+ i& 0 i@  h`(?\+  i@i\`i+j`@t+iL iiZiT iBpi P+t`(*t+'i0 i2i4 i6i8iiiDi* i 0 X+`B,k`ipii`i*i i(i0i*Pi,iD +Tp `Ft+ iJ  iV+np`p'dkPi: pi<ii>i@+ZA"`Ht+0"i\ P i^I +pH`@(dki: i<i(i>0Pi@PiB +X!`PHt+ !iRiLiNhi`+b`8>t+iZ i\ i+d8 `p<t+@%+J` Ft+hiL iNiPiRi iZ(i\HiiViB i+h&`XLt+&ib (iHpi .'`0M\+ ' i+,`Qt+,&iV (iL+x#.`@St+.2i i(&x"@+*`Ot+*i 8i`t+)`Ot+)i i`Oi++`Pt+P+!i pii!i`i+H-`hRt+0 -.i P ip i i i(+!0`Ulk8!0 ?"i"i X!ix!i+8"1`Vlk!1 Ji !x i"i+ 2`Wt+"2 S`nti # ii "i#i+`&t+# + /`Ttk"/9ii< #hi<$i8$i@X$iBx$i# 8 x#@.Hh 8 Y 0ppp !8"H8 (pA 8 x 8# @Z`ZYZ Z HD"F@((8$X$#x$$XX &x"Pp(x"&@((l @d 0P )()&`ptD"F@8)l 0@d P)0)*`rt*) ***`tt**+(@H++`vt++x,Ppx,,`xt,x,P-x @hpP--h-`ztx-P-"pP0x@.x.X.`|th.@."`Tt...".`~t+p(`hNt+8/(iL X/i Nx/i/ 8  ...0.P.000."111`t11"2p22`t22x30x33`t3x3hP4(HP44h4`tx4P4"Xx@5@5x5X5`t5h5@5"0606H6`tX606xX7`77x77H7(7`t877 r" 7@p @7` @7P @7@ @70 @8 @ @ 8 9888`vt88|z@l 9x :H:0:9:9`~t99 r@p @` @P ; P;;h;;8;;`t(;; r@p ;@` @P Xx88<8<P<`t`<8<H=(=H=(=`dt` 8== "` >>`ft(>>>>?>`bt?>" @`?@??@hl ??@\ @@@`jt@@`lt-+#`It+PA#i pAiAibAi @@pBB@0CpPC0ChCHC`tXC0C@T@Cl @Cd @C\ @CT @CL @DD @(D< @@D4 @, `HED0EE`t ED @@`El @xEd @E\ @ET @EL @ED h@E< @F4 @, hFFF`JtFFGGGG`TtGG"`XtHG8H"tII9Gh G HH0P II8H`Zt"pJAAPApApJJ`tJpJ HK x HK`K`tpKHK L L8L`tHL LHL(LM`t MLMNMM@l x/MM@\ `tHN NN@BXN8/x/X/ N8NOO`tOO8PPP`tPPXQPpXQpQ`tQXQ0R(0RHR`tXR0R0 P p SS S`t0SSS!"SS`tTST#"TTT`tX!TTUx!8!X!UUUU`tUU"@l V"!!WVVV`tPWVV#@l W#""WW`tWWXpXZX Y [X8[r@Xl @Xh @8YX @YT @PYP @L @hY< @8 @Y( @Z 0C+8#`%t+Yi< ZQQQdi< ZQQQQi@Zi@`ZiBZ{{{iZ X@Z @ @Z @[ @  `Y [ [ΙL\\]\0]rNA@\x Ж@]t @@]d @` \ `]@L W66Y8 x 8 S$7I$*\Rffff*1t4937b787*\R3*#50$*\Rffff*0u48d0bcbf*\R3*#34*\R3*#30*\R3*#4f*\R3*#4e*\R3*#4d*\R3*#8c*\R1*#d7*\R1*#e8*\R1*#2ac*\R0*#15 4 ( 8 P "h (<+ 4 x B H (P x4, B  . :. @ B h ,p 4& B  2 8R:P` B  0 :2  B H 6P  h  B 0 "8  ` @ B x $ ,    8V8 ( (  B p ,x  ('     ( @ 0 B P @8,X p B x 6x, H ,   B  6 J5 p B 8 ,@ t`p  B P P"(X B  $0( B @ @(6.H B  8tR` B 0 <J5`8 6` P XB P 4hX B  > 2  B ( B 0+( B 0F98 B " .  B  *:'@ B H P"` B   B  &,0 B 8 ,@p 8  B  2" B H " $XP B  @)  B  > (!X P B ! & ( ! @! @! H!B !<(X!P! B 8!0 !! B0$  $ ($B  " x$ $("P"h" B p" *$ x" ("$""" ("$"#0#8# B @# 2$ H#2+X##2+### B # $*#$  $ "   T h84oX  /     " 0@( "089@1xX` &(C) K.Eisenegger fr hft-so]$-DT! @8 xHHertzsche Pressung PH maxfl in mNs in mmb in mmPhmax in N/mm2( ? & (  * , (  ,?'riFaktor H fr Hertzsche Pressung E in N/mm2 v Poissonzahl 0  2 4  6 'ti%Lagergeometrie mit gegebener Pressungfl in mN ph in N/mm2Xdl = (0.5642 ^ 2 * (fl / 1000) / (b * H) * 2 * s / ph ^ 2 + s ^ 2 / 4) ^ 0.5 + 1 / 2 * s( ? & (  * 8 ( ? ( 'vi8 2Berechnen der verfgbaren Energie auf dem AnkerradPr in uW Mmax in Nmm < " > @  B D'zi"Pr berechnet mit Trgheitsmoment I I in mgcm2ampl meistens 220Q Faktor zwischen 150 - 350%!n Wirkungsgrad der Hemmung ca 0.4]x% " 'P% Nh "'R% H R P J L'|i .Trgheitsmoment vom Balancier mit Pr berechnet%pr in uW% Ibal in mgcm2%ampl meistens 220Q Faktor zwischen 150 - 350%!n Wirkungsgrad der Hemmung ca 0.4]% " 'P% Nh "'R% J L : R P'Ti"Gewicht der Schwungmasse (Segment)wichte in N/mm3% X " * Z \ '~%ip(Gewicht der Schwungmasse (Schrgsegment)$wichte in N/mm3% X " b  `  '%i0&Kraftmoment der Schwungmasse (Segment)wichte in N/mm3 X * Z \ 'FCi,Kraftmoment der Schwungmasse (Schrgsegment)Zqwichte in N/mm3 X b  ` `    '-Bi*Trgheitsmoment der Schwungmasse (Segment)dichte in g/mm3? j * " Z \ 'Di0Trgheitsmoment der Schwungmasse (Schrgsegment)edichte in g/mm3? j b  " ` `  ? `  ?  '̂&%iSchwerpunkt der SchwungmasseNGR d V'EiBremswinkel fr Schwungmassen%Mmax Drehmoment Federhaus M0 oder M24n Wirkungsgrad Rderwerk.i Rapport Rderwerkormg Gewicht der Schwungmasse < L H p ( r%t "'& Alternative fr Arc Sin innerhalb VBA x x , x x x $|$z'v xesm$z'v xe$z'vkpi8 x r%t'~i x r%'DERi/Maximale Umdrehungsszahl der Feder im Federhaus  Z \ ? Z \ 'stii%Umdrehungszahl der Feder im Federhaus&%  \   " ? Z   " ? Z \ 'di ]X]p]] r%!!'H H r%%!' l  r%!%.CF l !%..d About Energieberechnung9 9about9Z!9qPoH Formel-To&ol (ox  r% ArcsiqXoPPi Formel-To&ol7B@@iBerechnet die Lnge der Feder " Z \  'bi@1Berechnet die Dicke der Feder anhand von Faktor k8 i Z L   L  L ?   L   L 'jJBerechnet die Anzhal Umgnge vom Federhaus in Funktion von der Gangdauer d   B D'fi'Berechnet Mmax mit dem Federquerschnitt  * 'xsmax in N/mm2 z.Bsp 3400N/mm2=Uhrenkonstruktion Formelsammlung als VBA Add-In Excel 2003 XPhii i L Z \ ? Z \ 'l5Berechnet die Dicke der Feder mit dem Federkernradius ~jtx? \ HzG? 'h9Berechnet die optimierte Lnge der Feder (Nivaflex Feder)-Berechnet die Auslenkung der Winkelhebelfeder    $ * * $  $  *  *  $   *  $   $  $ * $  $ 'xi &   $ * * $  $  *  *  $   *  $   $  $ * $  $ '47Berechnet die Kraft F mit einer vorgegebenen Auslenkung4( B@6L~MsgBox "Formelsammlung mech. Uhren" & vbLf & '"(C) Kilian Eisenegger 2007" & vbLf & '"kilian.eisenegger@watchmaking.com"?Lagerkraft A in Bezug auf Winkel alpha und Hhen L1 L2 und Lges alpha in rad < $D B > < "  $F B : @  > ?'niHp?Lagerkraft B in Bezug auf Winkel alpha und Hhen L1 L2 und Lges alpha in rad < $D > B  > < "  $F > B  : > @   > ?'piPH( L N P R'Ji J " V'Tip T " V  R L N'Xi8 " ` \ ^ 'Z HiA# Berechnet die Dehnung eines Orings     b  ?'i Mittelmass     'iP Mittentoleranz   'i Verpressung vom oring in Prozent b    d'ih%Nutlnge fr Oring mir Druchmesser d2333333? 'iPH( Formeln fr die Verpressung von Oringen V3 Formeln fr die Berechnung der Hertzschen Pressung8 Formeln fr die Berechnung der Energie auf dem Ankerrad- Formeln fr die Berechnung von Schwungmassen! Allgemeine mathematische Formlen (Achtung bei Openoffice)% Formeln fr die Berechnung der Feder0 Formeln fr die Berechnung der Winkelhebelfeder+ Formeln fr die Berechnung der Spiralfeder Mens fr Microsoft Excel (nicht gltig fr Openoffice)H9 Alternative fr Arc Sin innerhalb VBA (nicht Openoffice)0Excel Funktion der Wurzel VBA (nicht Openoffice)X.1 Formeln fr Druckbelastung Glas und Gehusebodeni` L    'stant pi  `@ 'Verformung vom Gehusebodenp Druckonimy Poissonzahl MaterialVerformung vom Glas      `@ ' i0I +?  ?'8Empirische Formel fr die ntige Bodendicke bei Gehuseni0 Abscherkraft pro ZifferblattfussDo VQ#@ L'h HiP         ( 'ublei: Formeln fr die Berechnung des Durchmessers vom Federhaus  (     'P x#Ry = Exp(1) ^ (-lamda * time)+  $'i!  ko"Fy = 1 - Exp(1) ^ -((ta / tb) ^ b)   $ 'd-qd`!"Fy = 1 - Exp(1) ^ ((-ta / tb) ^ b)   $ 'Mk!i!!  TA= $   '[-d  $   'i okh i` 8"      'u10;i < Formeln fr die Lebendsdauer und Ausfallwahrscheindlichkeit*IE ReliabiliyWeibull mit b 0.5, 1 und 2,Ausfallwahrscheinlichkeit mit b 0.5, 1 und 2uaL%Q#Ausfallverhalten mit b 0.5, 1 und 2~:(Y#Lagerkraft auf der Federhaustrommel <  @ < B  'ddi$8##Lagerkraft auf der Federhaustrommelddd{{{ <   @  <  B   'ri($ $|Attribute VB_Name = "Formeln" 'Uhrenkonstruktion psammlung alstA Add-In Excel 2@003 XP~(C) K.Eisenegger$fr hft-@so OpSExplicit Pub Cq pi As Do3.14159265358`979 Mn Vdie Be rechnder Hertzschen Pre ss5 Func{flfa_@h(mmax6, zk2 rfe2dl1ltot) 'Lakraft auf RDFehauo>mMȃN* 1000 / F4* A+S2) < End ntbtU:&V:(T-@<) <42)>'yAyzkm yalphak, lgesV}ZyA in Be zu|WinkKCu@kHL1 L2 LĊ rad2AJ(A/* Sinr(B ) )P ^ 2J(D Cos(-8 uR11"(a0.5:II)){@-{Hh)B)`})bqflN)(?Nk*@)i+f1#U,e Phmax@vflPJRb)hd/*Ƣ PH O@NmNs.tmmb!N/mm2C$T I642A#(` /c0* (s UCw(bh!@- sQ/ A^ QH@$vJsEvʳE:MFaktoɏ$ E'v Poissonz8ahlt1 <- q+ z(b2Atb`&dnl?h?p4jgeomee mit gegebpzrrk !'= (G!"HaG@+ sJ/ 4dG@K1! s!$i$7o'7'/N'E0nerg`{m A\rYf gM;f(e9, set !dem quer@nit02e z.Bsp 3400h e2* h6pr_wTet]bfzjrhoble'nverfgbap Lke2Pra9uWtb!uKa OĔ*)q*  *b r * fb+p * )iw(Q, Qnamp\X b'@ :Trgheitsmp;nt IIqmgcW'bmeistens 220DQ NzwiS1D50J350n Wirk`sgC`-"Hemm caX4sDimd w ph(3wf3a= / 360'#r_iab!CEZwp+31QnIbal(a, pr,. aS 'vom Balanci0ǡD() ! ';  * 0`vS6]5W@'vSchw8masR WG_a(wichV, *qRKr+7Ge0 (Segment'RG4F3/a$mb`,- /,',pseg R+b_ ] Oungmasse (Schrgsegment) 'wichte in N/mm3TG_a = t* pi / 2 * ab(R -4 1(3 End Functi@on  Mr_a(HAs Double,H h  Ra ri ) Kraftmo der w ށHn2^rhka ^ 3nBlnRZ,tb .mp m^r-"/9* Ro +]r6Y=JsdC5sTheitst@gG%a@t0.250D*#B* (^ 4Eu47u84u 8v9uM:w[烱RYwb`<0.##>@0.1d>J3y"S`>MrZgXArerpunk>tNtx 5@ / Hg vbwmmaxIns geBremswinkel \fbMDHrehDSFehaus M0 oaM24n Wirksgrad Rwerki Rapport.g Ge"4%A @%Applica.Asin("/ (n7i``* s))@180@pi+' Allgemeine matheische Formle@0' (A`@ bei OpenofficeD'xArcH3 ternve, S`Zinnerhalb VBAc$If x <And > -1 Th!1a#!tn(x@Sqr(-x x)Else = k4!bA1o-S IfWa $_@_$ R$uMaximale Umd=sszahl"" im >/C e'(([ ce2'‚27^z AV->fONo K f#, l? _fj  lP ebC)cA z+ds2 / Q d(DY fzRInteger, rho_!e0e"AnzCPgnOvoH+vonGanPgdaudD_fd3600D0f(@ *lO'ǭ) { L .Q= |1)1 'X>C ltot0 X#q, ) ' optimier< (Nivaflexs2B 2p "(-0.007 /P.3ÏHee_kf m/k #9 Dic ke"0 anhaZ Fakto|r y1P n0k/=n+h* k!n12k- CEaKe_r ) ; miіd0k`wius@KK KO0[}[WRhebelf.\`fl_w(@(, (lpha) _Q,Bus2!O !, Q1+@^Tan(a 2A(h8a\+ 10M+lKu+p]* |)VhdY)!* Log(1 Ph^1 / (2 * Tan(alpha))) End Function , f_w(fl As Double, e b - h )  'Berechnet die Kraft F mit einer vorgegebenen Auslenkung= = "** b ^ 21(hh +* l) + l b+) - h?#!3Log(12h$' Formeln fr dSpiralfe 'vM_sp(Emoduf, DickxHoeh LaengHsA@d*^ 3?>CJdI_0bal(BFrequenz!/@!4piY* @)10XhK"B|, `T`/A/* /.A!9O]WLjsendurchmessF(In`ntWi`A`r0! @/*" * (+ 5 ) b22^Verpr`_von0 Ori^dg(d1F, d2a' KDehnassdg +)a(a`b@^ 0.5Omm(mass$totu0'M`ittelam&mc + A + 3 un.FmmSRؾCXFZ;ug\kD `#yDx\kD `#yD[y 4aI]$kMEPSPSSS>"<<0{C7F8792E-02AA-466A-8244-1E55EB4B0DB6}{A4C6A93B-9555-4F3D-B4E4-478DE1C127EE}0(%X0 % &`(|kei `% %.``0T7I$*\Rffff*0u48d0bcbf48<@DH" (`op B@.XAttribute VB_Name = "about_uf"  Bas|0{C7F8792E-02AA-466A-8244-1E55EB4B0DB6}{A4C6A93B-9555-4F3D-B4E4-478DE1C127EE} dGlobaBlSpacoFalse Cre atablPr@edeclaI"dTru BEx0pose0TemplateDerivCustomizDP Sub OKCommandButton1_Click() C.HidOEnd rU 0@ A4   8  ` < )1 @I q D )1 H I bH$$ 8XrU T$`n0* pHdVBAFormelsammlung XMechanische Uhren J@@JechaniTse~Urn ForTm l!a mlu1gC=   7I %<9stdole>stdilg" }^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\system32\22.tlb#OLE Auto@mationEAEOfficEOfi_VBA_PROJECTdir__SRP_0__SRP_1letexWorkbook_ActivategWorkbookk AssistantVisible Workbook_Open Worksheets ToggleButton1GValueK ToggleButton2H AdaptiveMenusTOWorkbook_BeforeCloseCancel WorksheetActivate| BeforeClose~;Itemz EndFunction7 _B_var_EndFEndFCunctionʒ _B_var_EndFJWorkbook_AddinUninstallWorkbook_AddinInstall AddinInstallAddinUninstalldoublem_B_var_FunctionOe_kIkbN_dcD[smax  _B_var_DoubleBe_rPr1^ltoti(fl_walphadoubpe-Tan-Ln^ _B_var_LnLogd(f_w _B_var_r1 UserForm1)MSFormsC about_ufUserFormNImage1_Label1,Label2,OKCommandButton1VImage2`OKCommandButton1_Click4abour_uf8$Click_B_var_abour_ufHide9zabour}) _B_var_abourufd_Showflaَzk1zk2lgesql1^l2^SinCosOflbڎ(M_spjEmoduljDickeKHoehevLaenge"(I_balFrequenzV(h_sp(L_spAussendurchmesser;BInnendurchmesser-} Windungen<(l_f(N_fe(N_fd(ltot_f](e_kfʟ(e_rf͠(fla_htr(flb_hw(Phmax_hF-(H_hQ(dl_hww(Mmax_f(pr_w(pr_iwd(G_a(G_asegX(Mr_a(Mr_aseg$m(J_a(J_aseg˜(S_aSs'_(bw_ao!(Nmax_f _B_var_Phmax(dg\d1\d2\(mmC^mass-tob'tun(mmam(compR(nlg^(d_gmyK^Fucntion_B_var_Fucntion(fmax_bpg(fmax_g(e_b@barw(f_z VBAFormelsammlung(rencmdz1`u2P_ha~]DownBarsz2 `(mrenc$(Ry_lamdatimeExpK(FyH]ta:_tb;_(aw\(wb_(flfa_hrfed"flfaN(flfb_hflfbO _B_var_flfa{dx! H1 %b [-]\e&FlB e 4E2DF8D04C-5BFA-101B -BDE5EAAC42EProgram Files\CommoMicrosoft Shared\OFFICE11\MSO.0DLL#G& 11.0 Object Library%@MSAxs>Sns3VSD452EE1-E08F0A-8-02608C4D0BB4SFM20L'BF _&/;"1?jIqAHq00}#0Bq# 5h0 A400B6164-5F24-4592-B200-98EB597F9D756DOCUME~1\keisene\LOCALSTemp0\VBE@b6.e1`gP&HH  p!3w`DqXI]Т&jEb8xPmdgmmmmacompnld_gfmax_bfmax_ge_bf_zVBAFormelsammlungrencmrencRyFyawwb  J NB[MI4' [y 4aI]$kM&M$>SRؾCXFZ;ug\kD `#yD)121CBm= i flfa_hflfb_hF4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel q@0FC:\WINDOWS\system32\StdOle2.Tlbstdole PL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice a`.E .`M C:\WINDOWS\system32\FM20.DLLMSForms riradichteMrGgexldkalpha 9  9  9 ( I 8 )YHCancel )X I hzk1zk2lgesl1l2EmodulDickeHoeheLaengeM_spFrequenzI_balAussendurchmesserInnendurchmesser Windungen )I xd1d2masstobtundgeRDmypbarng  Mechanische Uhren Formelsammlungsmz1z2harenclamdatimetatb I mmaxrfedltot7 F3Dynamic $  }4+]R KQDBabout_uf r)rf3oCompObjaK*yrU~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~K BK??R@^(r: e Aie a  `61IYq !9IayQ i )A !1AYq!y a  a ) )  ThisWorkbookSheet1Formeln UserForm1 VBAProjectF@C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLLVBA Q y 0F4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel q@0FC:\WINDOWS\system32\StdOle2.Tlbstdole PL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice a`.E .`M C:\WINDOWS\system32\FM20.DLLMSForms pda @$_EYu 1C:\DOCUME~1\keisene\LOCALS~1\Temp\VBE\MSForms.exd aPhmaxHFdlMmaxprPr_iIbalGG_segMrMr_segJJ_segS BremswinkelArcsinasin_sqr_NmaxNN_dlltote_ke_rfl_wf_wMenuaddabout Menudelete about_uf cfJ5+.'?Oh|"Bl;KCd4tDF BosDFWorkbookWorkbook_AddinInstallWorkbook_AddinUninstallWorkbook_Activate Workbook_OpenWorkbook_BeforeClose @FType FFF1Y" F1(AsinVBE6.DLL  f 8  I XSqrt  H x  K  F F F Formel-To&olControlsfla .About Energieberechnung Style about FaceIdF"m4 G~E Fu!NiDF Worksheet?]"E(iHN ۜZR nK"%M3^K̅p0ohGM:Xd $ q fTahoma$w  Image1(2TLabel1q(2Label2q078OKCommandButton1g $ډ Image2 t.IDT: T Microsoft Forms 2.0 FormEmbedded Object9q2PN rqM}Ƿ,o_OVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} about_uf Caption = "UserForm1" ClientHeight =       !"#$%&'()*+,-.0zzzqqqqqqqqqqqqrrrzzz{{{{{{|||{{{qqqddddddRRRqqq{{{{{{|||qqq{{{qqq|||{{{qqqqqqrrrqqqqqqpppʺqqqQQQQQQ{{{ʳddddddqqq{{{rrrqqqqqqqqqqqq{{{ppp|||{{{{{{{{{{{{rrrccceeecccqqq{{{{{{{{{{{{qqq{{{|||zzz{{{{{{|||{{{rrrqqqqqq{{{|||zzzpppeee|||{{{qqq{{{{{{qqqߔdddqqqQQQ444qqqʳddddddqqqqqqţqqqdddqqqppprrrpppqqqqqq{{{{{{{{{qqqqqqPPPQQQppppppqqq{{{cccrrr{{{{{{{{{{{{{{{{{{{{{{{{qqqdddqqqqqq{{{{{{{{{rrr{{{|||dddqqq|||{{{{{{ppp{{{rrr||||||{{{PPPRRR555ddd̺ppp{{{{{{qqqqqqqqqqqq{{{zzzqqqqqqqqqqqqqqq{{{qqqrrrQQQPPPdddpppqqqdddeeezzz|||zzzrrrooorrr{{{{{{zzz{{{{{{{{{rrrppprrrcccqqq|||{{{qqq{{{pppcccrrr{{{qqqqqq{{{{{{⫫dddqqqPPPdddիeee{{{Ŵqqqrrrdddpppeeeppp{{{qqqqqqqqqqqqqqq|||pppdddQQQQQQccceeedddeeeddddddqqq{{{rrrcccrrrqqq{{{{{{{{{rrr{{{{{{|||zzz{{{||||||pppqqqrrrddddddqqqqqq{{{qqqeeeqqq{{{{{{qqqqqq{{{qqqqqqǺqqqccceeedddګRRRcccqqq{{{{{{qqqddddddeeedddrrr|||qqqcccqqqqqqqqqqqqrrrddd555PPPQQQddddddQQQdddQQQQQQqqqddddddqqq{{{|||{{{qqqzzz{{{{{{|||zzz|||rrrqqqppppppqqqeeeddd{{{|||pppdddccc{{{{{{{{{zzzrrrqqq{{{{{{qqqQQQRRRpppغqqq|||qqqqqqŤpppdddddddddcccdddcccppprrrqqqqqq{{{qqqqqq{{{qqqdddPPP666QQQQQQPPPeeeddd555555dddddddddqqq{{{rrrqqq{{{{{{{{{zzzqqq{{{{{{qqqqqq{{{qqqqqqrrrddddddrrr{{{{{{rrreeedddzzz{{{{{{|||{{{|||zzz{{{QQQPPPrrr{{{|||̫ѫƣǴ{{{zzzdddddddddddddddqqqddddddppp}}}pppqqqqqqzzz|||qqqddd666444555555RRRcccqqqQQQ555QQQddddddpppqqqqqqrrrzzz{{{|||qqq{{{{{{dddeeezzz{{{pppqqqqqqdddddddddqqq{{{{{{qqqqqqqqqddddddeeedddpppzzz{{{dddPPP{{{qqqqqq{{{ūȺzzz|||{{{{{{dddQQQdddQQQddd{{{cccddddddppprrrqqqqqq{{{qqqddd555555555666QQQdddeeeQQQ555555dddddddddeeeddd{{{{{{{{{{{{ppp{{{{{{{{{qqqQQQeee{{{qqqqqqqqqdddqqqqqqdddzzz{{{{{{qqqddddddQQqqR KQltG GIF89aOOO___ooo!  ,pI8`(difǩlr+t}v#/H,ΆƤ88 t.IDT: TsЍ<pv\\  ^Ėapvx{ZqhX uoqf I_w?QdT`5Pop}2PN rqM}Ƿ,o_OlH ^ у 0-Ga{ =Ԁ^oJ{B.a  *pbI -(O"ߜ7)%6$XE.'^x aE68M@gJXU}Ie\y+p*3.9TA=@Nuh`4н`(! Ch ">Mp!n傧[-@ZէAdA1M)k`%PXKQ.n$5%f0(,@FoGi od?RA-k],( 0+o@LD[& $,& p^Xau10;4c_LC8g rG&xX5>-%X=͞F׏^h] Tv3jBH C&goN!FR@z *IETGqBwzk`#lF(RX~]C`p!&I>ڃ MX+0d:' {X!TO k:Dߠ}_`g-2oz $B-$;k $;p.m Fejx ]< `+;uaL%Q60l6^b6tbׂN iIJN\~:i K%|#PH4RH ? 5~q` p.d y i8х+(@!pɈb}pW@>bLmS@$`ee0D`򊟕lUdw ޣ;3 .CZ &5@;SFiwj)4TCS,A\p.JZSkYUR2cpHЗsA7Cl~ 67oVKaNU '^` IAUU sg==P6i\e 9*VIֹ *a09Jֹˠh vt' L.G`Rh#Y %-J[G)?R^L(S ;e5})=]LUP t080"X5 <8 Гq-!Q@)Ĕ\zN+;) `gukp:qV։Yì=u>փH5G RWtkR"vH&l8*$!@ %L70Uig#L*3PU$l(!28^2]~ԜM#[J /j9{Eag˙6Xl׈V=z|7W͍]"ڐi  yW7x81ZU_wThS5ٖ`#i}27l]Qq5Kn4 do-\c, r|erHkpe 9bNƉG?;W\3㾼L>n.]޶H8Ym5TMQ7]m2Ct|粡 '=S%ouBCz)v8k*^5 m3ՠ֮k&@nFlj!Ì,p809˦yd~۽4C^z h rl`i ?hu2roEx 㡨wo?fo)U@*R, { 7l0߂<3ᆪK"2U Kilian Eisenegger U  MHVFU Research0GU@0>U Kilian Eisenegger U  MHVFU Research0  *H udeѽ35_m SnJ =k';8eBzugZ1ܮk? xHeZRpCZYb%u>%y1TIKAbx5&2Fr:4WEH!i&rfz8NCMF|'x\ S+ SJ*o_/u7G=̡ÙE4c;&dxW/tMEY1(7MB%Kx$jz 1000t10UKilian Eisenegger1'0% *H  kilian.eisenegger@iwc.ch1 0 U MHVF10U Research1 0 UCH OFP&00 *H R0 +7 100 *H  1  +70 *H  1itCkFsw0  *H &D[68#"tgOh7Žv26C6.y#yw[a(q朴n업r/_ڡ͝ɍjrU9ѫ;+*JEոϹB|0Ukla] $'U')uKne{t B6D2 *bk؈ RⓈf%-#-<[&U Kilian Eisenegger U  MHVFU Research0GU@0>U Kilian Eisenegger U  MHVFU Research0  *H udeѽ35_m SnJ =k';8eBzugZ1ܮk? xHeZRpCZYb%u>%y1TIKAbx5&2Fr:4WEH!i&rfz8NCMF|'x\ S+ SJ*o_/u7G=̡ÙE4c;&dxW/tMEY1(7MB%Kx$jz h :B_PID_LINKBASEAwww.hft-so.ch F!Microsoft Office Excel WorksheetBiff8Excel.Sheet.89q