24小时热门版块排行榜    

查看: 3559  |  回复: 22
【奖励】 本帖被评价19次,作者shex增加金币 15
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

shex

金虫 (小有名气)


[资源] Excel计算LD50、EC50等版数量的VBA源程序

看到有不少战友没有合适的LD50计算软件,将以前编的一个小程序与大家分享。
LD50、IC50、ED50等XX50半数量计算方法都相同,只是意义不同,本程序都可以算。算法为Bliss正规法,参考孙瑞元主编《定量药理学》一书相应部分,计算结果同NDST基本一致。
本程序采用Excel的宏(VBA)编写,大量应用Execl提供的函数,故程序简短,可读性强,有爱好编程的朋友可以参考。
用法:打开表格,选择启用宏,任意位置输入相邻的三列数,鼠标选中,选择菜单“工具”-宏-宏(或按alt+F8),执行main即可。熟练的朋友可在工具栏上添加一个按钮,指向main,使用方便。
第一列:剂量(实际值,不用对数转换);第二列:每组总动物数;第三列:死亡/有效动物数。如:
3502020
2452017
1722016
120206
84202
5920 
记得之行前一定要选中三列数据,用于计算,可在表格的任意部分。该程序在excel2000上通过,2003可能行,2007和2010估计不行,但只是函数表达更新,过程一致。可供爱好者参考。待明天上传支持新版excel的。
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : LD.xls
  • 2013-05-09 23:17:20, 104 K

» 收录本帖的淘帖专辑推荐

收藏资料

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

milertom

铁虫 (小有名气)


★★★ 三星级,支持鼓励

顶一下,感谢分享!2003能用。2016用不了。
15楼2016-12-01 17:48:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 23 个回答

iwish297

禁虫 (小有名气)

本帖内容被屏蔽

4楼2013-08-27 09:52:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wang2020

金虫 (正式写手)


略微简单点,标题都没有,看不懂
13楼2016-07-22 14:57:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
简单回复
2013-06-18 21:36   回复  
五星好评  顶一下,感谢分享!
SunnyRsGs5楼
2014-01-17 17:45   回复  
五星好评  顶一下,感谢分享!
huwenjun6楼
2014-02-27 23:24   回复  
顶一下,感谢分享!
emilyjc7楼
2014-06-02 20:04   回复  
五星好评  顶一下,感谢分享!
glssg9楼
2015-01-06 14:24   回复  
五星好评  顶一下,感谢分享!
2015-02-22 15:59   回复  
顶一下,感谢分享!
2015-02-25 22:52   回复  
五星好评  顶一下,感谢分享!
wang202012楼
2016-07-22 14:56   回复  
五星好评  顶一下,感谢分享!
csp245814楼
2016-09-16 14:16   回复  
五星好评  顶一下,感谢分享!
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 2JOx3r2CYEgw 2026-08-21 5/250 2026-08-23 14:33 by KM5EcsNQRBPn
[论文投稿] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 2JOx3r2CYEgw 2026-08-21 8/400 2026-08-23 14:30 by KM5EcsNQRBPn
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +3 process2012 2026-08-23 4/200 2026-08-23 12:54 by huixian257
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 9/450 2026-08-23 10:44 by IXZuIJ2Q7OVy
[基金申请] 让我中一个面上吧! +12 大萍1987 2026-08-20 14/700 2026-08-23 10:30 by wrm
[基金申请] 今天放榜吗? +15 布布和一二 2026-08-19 16/800 2026-08-23 09:55 by 张春生
[博后之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 DpSrDtM079iu 2026-08-22 5/250 2026-08-23 04:07 by OEbVnUOu01ol
[论文投稿] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 2JOx3r2CYEgw 2026-08-22 4/200 2026-08-23 04:04 by OEbVnUOu01ol
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 2JOx3r2CYEgw 2026-08-22 7/350 2026-08-23 03:55 by OEbVnUOu01ol
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 2JOx3r2CYEgw 2026-08-22 6/300 2026-08-23 03:40 by OEbVnUOu01ol
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 QTy3jDtz1uLt 2026-08-21 11/550 2026-08-23 02:55 by OEbVnUOu01ol
[基金申请] 范进中举一文的中心思想 +3 zjuhero 2026-08-22 4/200 2026-08-22 20:02 by mycsru
[基金申请] 只有每年这种时候来逛逛小木虫 +24 yaoyewhu2008 2026-08-20 26/1300 2026-08-22 17:43 by kammury
[基金申请] filecode,4个jtjc了 +13 ziyangfang 2026-08-19 16/800 2026-08-22 17:08 by WH3796
[基金申请] 建议基金发布提前给出明确的时间点 +10 kulium 2026-08-21 13/650 2026-08-21 21:58 by alongwaytogo
[基金申请] 科研孤儿太难了 +17 我4大白菜 2026-08-20 18/900 2026-08-21 20:57 by zhangev
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[论文投稿] 投稿咨询 +5 wwm09 2026-08-17 7/350 2026-08-21 10:11 by 期刊论文帮手
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
请填处理意见