ࡱ;   !"#$%&'()*+,-./0123456789:;<=Root EntryF@qZABook zqCompObj^SummaryInformation(@  FMicrosoft Excel 5.0 WorksheetBiff5Excel.Sheet.5;  Oh+'Oh+'0H`xPK2 functions PK functions Atul DesaistultulMicrosoft Excelinf:O {'AUMC0_t:3P  * AUMC0_time:/Q  Conc_Data` P  @$@3333331@9@=@:@ffffff3@*@@@?) Conc_last:Q Counter - ElimRateConst:Q <0ElimRateConstant:7R <&ERROR0:gR &ERROR1:R 'ERROR10:R 'ERROR11:!S &ERROR2:QS &o l=  -   1 (((1, NameCommandsComments! PK2 Functions<"4Written by: Atul Desai, M.S. and Joel Usansky, Ph.D.Area Under A CurveAUC0_tB`+#Define the result - number or text( Conc_DataABQ+#Select the concentration data range( Time_DataABQ"Select the time data range!\NcH a " #9H a5BKCError check - invalid, missing or blank value in conc. data range !\Nc%H a "1 #9H a5BNFError check - invalid, missing or blank value in the time data range S =#1H B@@ ##(H A5B91Error check - negative values  \ Joel Usansky BPK2(AUC0_inf:N j&AUC0_t:O ) AUC0_time:sO ) AUMC0_inf:O {'AUMC0_t:3P  * AUMC0_time:/Q  Conc_Data` P  @$@3333331@9@=@:@ffffff3@*@@@?) Conc_last:Q Counter - ElimRateConst:Q <0ElimRateConstant:7R <&ERROR0:gR &ERROR1:R 'ERROR10:R 'ERROR11:!S &ERROR2:QS 'ERROR21:S 'ERROR22:S 'ERROR23: T 'ERROR24:?T 'ERROR25:qT 'ERROR26:T 'ERROR27:T 'ERROR28:U 'ERROR29:9U &ERROR3:iU 'ERROR31:U 'ERROR32:U 'ERROR33:U &ERROR4:/V &ERROR5:_V &ERROR6:V &ERROR7:V &ERROR8:V &ERROR9:W ) Half_life:S Time_Data` W  ??@@ @(@2@8@B@A@R@ Time_last Totalgffff@= <X@"1Geneva1Geneva1Geneva1Geneva1Geneva1Geneva1Geneva"$"#,##0_);\("$"#,##0\)"$"#,##0_);[Red]\("$"#,##0\) "$"#,##0.00_);\("$"#,##0.00\)%""$"#,##0.00_);[Red]\("$"#,##0.00\)5*2_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_),))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)=,:_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)4+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_)                ( &      RI@  RI@  R @ R RA        R @ @  @ 8dq:F ``iݜ*o?H6A^BbzbO/(fvEE>j(9jJ2BBB PK2 @  $B2EUMkq  dMbP?_*+%$#&LPage &P of &N&C&F [&A]&R&D &T$#&LExcel 97 SR-1&RSystem ID: 2200L &RQ?'(?)?"PXX??cU} I } :} m} I} }   'in conc. data rangeS  =#%31H B@@ #"(H A5B8 0Error check - negative values in time data rangeS  =#1H B@@ #!(H A5B8 0Error check - only one value in conc. data rangeS  =#%1H B@@ # (H A5B7 /Error check - only one value in time data range   !\  NcE1H a " #9H a5B8 0Error check - text character in conc. data range   !\ Nc%1H a " #9H a5B7 /Error check - text character in time data rangeN8# 1 H AM##H A5BC;Error check - more then one column specified for conc. dataN8#%1 H AM##H A5BB:Error check - more then one column specified for time databL#1 H AL#%E1H AL # 7H A5B3+Error Check - arrays are of different size.AUCno_of_trapezoids0&@#1 H ALCalc. no. of trapezoids*CounterDBvA#%1 H C H B#%W12H C f1AH B # aH A5B3+Error check - time data in ascending order.AAUCTotal$TotalBXInitialize Total*CounterDBFor each trapezoid...l?VA#1 H C 1H "#S12H C b1AH "B+# Average the two concentrationsj8@TA#%1 H C 1H B#%12H C 1AH B*" Calculate the time difference#B@ @DD# Multiply them together9# TotalC'H DBX4, Add area of this trapezoid to the TotalA) #'Z1H B7"Return the resulting value!Area Under A Moment Curve@.DQ@2b[Rv.XONuS !"'#$&%o&'()l=*+-,-. /101 23(45678(9(;1<=,>? AUMC0_t !B`+ #Define the result - number or text(!" Conc_DataABQ+!#Select the concentration data range("# Time_DataABQ""Select the time data range###!\##$Nc|1H a " #19H a5BK#CError check - invalid, missing or blank value in conc. data range $$$!\$$%Nc%1H a "1 #g19H a5BN$FError check - invalid, missing or blank value in the time data range S%&=#a1H B@@ ##1(H A5B9%1Error check - negative values in conc. data rangeS&'=#%1H B@@ #"1(H A5B8&0Error check - negative values in time data rangeS'(=#G 1H B@@ #!h1(H A5B8'0Error check - only one value in conc. data rangeS()=#% 1H B@@ # 1(H A5B7(/Error check - only one value in time data range)))!\))*Nc 1H a " #?19H a5B8)0Error check - text character in conc. data range***!\**+Nc%I 1H a " #19H a5B7*/Error check - text character in time data rangeN+,8# 1 H AM#1#H A5BC+;Error check - more then one column specified for conc. dataN,-8#%9 1 H AM#_1#H A5BB,:Error check - more then one column specified for time datab-.L# 1 H AL#% 1H AL # 17H A5B3-+Error Check - arrays are of different size..AUMCno_of_trapezoids0.&@/#C 1 H AL.Calc. no. of trapezoids*/0CounterD.B01vA#%U 1 H C 1H B#% 12H C  1AH B # 1aH A5B30+Error check - time data in ascending order.12A2 AUMCTotal$23TotalBX2Initialize Total*34CounterD.B3For each trapezoid...4T@5A# 1 H C = 1H B#%. 12H C 1AH B#1\H C 91kH B#%*1H C c1H BB74/ Average the two concentrations*time valuesj58@6TA#%y1 H C 1H B#%12H C 1AH B*5" Calculate the time difference#6gffff&@7 @D4D5#6 Multiply them together978# TotalC'1H D6BX47, Add area of this trapezoid to the Total89A)9<#'X1H B7"9Return the resulting value;!;Elimination Rate Constant*;< ElimRateConst<=B`+<#Define the result - number or text(=> Conc_DataABQ+=#Select the concentration data range(>? Time_DataABQ">Select the time data range???!\??@NcT1H a " #19H a5BK?CError check - invalid, missing or blank value in conc. data range BXc[Rw.YONuS]i[R@AB'CD&EoFGHIl=JK-LMN O1PR ST(UVWXY(Z([1\],^_@@@!\@@ANc%1H a "1 # 19H a5BN@FError check - invalid, missing or blank value in the time data range SAB=#_1H B@@ ##j 1(H A5B9A1Error check - negative values in conc. data rangeSBC=#%1H B@@ #" 1(H A5B8B0Error check - negative values in time data rangeSCD=#E1H B@@ #! 1(H A5B8C0Error check - only one value in conc. data rangeSDE=#%1H B@@ # l 1(H A5B7D/Error check - only one value in time data rangeEEE!\EEFNc1H a " # 19H a5B8E0Error check - text character in conc. data rangeFFF!\FFGNc%G1H a " #m 19H a5B7F/Error check - text character in time data rangeNGH8#1 H AM# 1#H A5BCG;Error check - more then one column specified for conc. dataNHI8#%71 H AM# 1#H A5BBH:Error check - more then one column specified for time databIJL#1 H AL#%1H AL # q 17H A5B3I+Error Check - arrays are of different size.JAUCno_of_trapezoids0J@K#A1 H ALJCalc. no. of trapezoids*KLCounterDJBLMvA#%S1 H C 1H B#%12H C 1AH B # ] 1aH A5B3L+Error check - time data in ascending order.MNA8Ngk?O"#1H #%,1H B3#NDo a logarithmic regressionOfd?PDNAOCalculate the "k" valuePS$OB7"PReturn the resulting valueRR Half-Life*RS Half-lifeSTB`+S#Define the result - number or text(TU Conc_DataABQ+T#Select the concentration data range(UV Time_DataABQ"USelect the time data rangeVVV!\VVWNc1H a " #19H a5BKVCError check - invalid, missing or blank value in conc. data range WWW!\WWXNc%1H a "1 #19H a5BNWFError check - invalid, missing or blank value in the time data range SXY=#1H B@@ ##h1(H A5B9X1Error check - negative values in conc. data rangeSYZ=#%11H B@@ #"1(H A5B8Y0Error check - negative values in time data rangeSZ[=#1H B@@ #!1(H A5B6Z.Error check - only one row in conc. data rangeS[\=#%1H B@@ # j1(H A5B5[-Error check - only one row in time data range\\\!\\\]NcC1H a " #19H a5B8\0Error check - text character in conc. data range]]]!\]]^Nc%1H a " #k19H a5B7]/Error check - text character in time data rangeN^_8# 1 H AM#1#H A5BC^;Error check - more then one column specified for conc. dataN_`8#%1 H AM# 1#H A5BB_:Error check - more then one column specified for time dataB0Xv.cEHMe[R`ab'cd&eofgijl=kl-mno p 1q r s t (u v w x y ,(z ,({ ,1| ,} ,,~ , ,b`aL#1 H AL#%C1H AL # o17H A5B3`+Error check - arrays are of different size.aAUCno_of_trapezoids0a@b#1 H ALaCalc. no. of trapezoids*bcCounterDaBcdvA#%1 H C ;1H B#%U12H C d1AH B # [1aH A5B3c+Error check - time data in ascending order.deA8egk?f"#1H #%~1H B3#eDo a logarithmic regression%f8> g$@gADeA%fCalculate the Half-life valuegj$fB7"gReturn the resulting valuei1i)Area Under A Curve for time 0 to infinityijAUC0_infjkB`+j#Define the result - number or text(kl AUC0_timeBQ2k*Enter Area under the curve for time 0 to t(lm Conc_lastBQ&lEnter last concentration value/mnElimRateConstantBQ'mEnter Elimination rate constantOno9CH @@ #$H A5BInAError check - area under the curve for time 0 to t value negativeOop9CH @@ #$H A5B7o/Error check - last concentration value negativeOpq9C H @@ #$H A5B>p6Error check - elimination rate constant value negativeFqr0C#1H A#H A5BNqFError check - area under the curve for time 0 to t value contains textFrs0Cu1H A#H A5B<r4Error check - last concentration value contains textFst0C 1H A#H A5BCs;Error check - elimination rate constant value contains textKtu5C1H A# H A5B;t3Error check - missing or invalid value of AUC0_timeKuv5Ca1H A# H A5BEu=Error check - missing or invalid value for last concentrationKvw5C 1H A# H A5BKvCError check - missing or invalid value of elimination rate constantEw+@x/C1H C?1H C 1#H =w5Calculate Area under the Curve for time 0 to infinityx{$wB7"xReturn the resulting valuey z 8z0Area Under A Moment Curve for time 0 to infinityz { AUMC0_inf{|B`+{#Define the result - number or text{ )|} AUMC0_timeBQ2|*Enter Area under the curve for time 0 to t| (}~ Conc_lastBQ&}Enter last concentration value} (~ Time_lastBQ4~,Enter time of last concentration measurement~ /ElimRateConstantBQ'Enter Elimination rate constant B+Xv.cRHIdbV^H"dywjx , , ,' , ,& ,o , , , ,l= , ,- , , ,  ,1 , ,  , ,( , , , , ,( ,( ,1 , ,, , , ,S=#H B@@ #B1(H A5BIAError check - area under the curve for time 0 to t value negative S=#1H B@@ #1(H A5B7/Error check - last concentration value negative S=# 1H B@@ #1(H A5B>6Error check - elimination rate constant value negative S=#&H B@@ #(H A5B.&Error check - last time value negative F0C!1H A#/1H A5BNFError check - area under the curve for time 0 to t value contains text F0Ck!1H A#w1H A5B<4Error check - last concentration value contains text F0C !1H A#1H A5BC;Error check - elimination rate constant value contains text F0C&"1H A#H A5B3+Error check - last time value contains text K5Cm"1H A# 1 H A5B;3Error check - missing or invalid value of AUC0_time K5C"1H A#Z1 H A5BE=Error check - missing or invalid value for last concentration K5C "1H A#1 H A5BKCError check - missing or invalid value of elimination rate constant K5C&E#1H A# H A5B;3Error check - missing or invalid value of last time pC#1H C#1H C&w$1#H C )$13H C$1DH C $1SH C %1bH D<Calculate Area under the moment curve for time 0 to infinity $B7"Return the resulting value   ERROR0C-'The time data is not in ascending orderB7Display error message ERROR1P:4The two ranges specified have different nos. of rowsB7Display error message ERROR2H2,More than one column specified for time dataB7Display error message ERROR3Q;5More than one column specified for concentration dataB7Display error message ERROR4L60Invalid data - text character in time data rangeB7Display error message ERROR5U?9Invalid data - text character in concentration data rangeB7Display error message ERROR6L60Invalid data - only one value in time data rangeB7Display error message ERROR7U?9Invalid data - only one value in concentration data rangeB7Display error message ERROR8Q;5Invalid data - negative time value in time data rangeB7Display error message ERROR9U?9Invalid data - negative value in concentration data rangeB7Display error message ERROR10N82Invalid data - blank or invalid in time data rangeB7Display error message ERROR11WA;Invalid data - blank or invalid in concentration data rangeB7Display error message  ERROR21]GAInvalid data - elimination rate constant value missing or invalidB7Display error message ERROR22V@:Invalid data - last concentration value missing or invalidB7Display error message ERROR23lVPInvalid data - area under the moment curve for time 0 to t is missing or invalidB7Display error message Dl\'&oERROR24S=7Invalid data - text character in elimination rate valueB7Display error messageERROR25U?9Invalid data - text character in last concentration valueB7Display error messageERROR26WA;Invalid data - text character in area under the curve valueB7Display error messageERROR27WA;Invalid data - elimination rate constant cannot be negativeB7Display error messageERROR28R<6Invalid data - concentration value can not be negativeB7Display error messageERROR29S=7Invalid data - area under the curve can not be negativeB7Display error messageERROR31H2,Invalid data - time value missing or invalidB7Display error messageERROR32G1+Invalid data - text character in Time valueB7Display error messageERROR33Jerr4.Invalid data - time value can not be negative B7Display error message> " ࡱ;