| 查看: 1686 | 回复: 10 | |||
| 本帖产生 1 个 博学EPI ,点击这里进行查看 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
[交流]
求助一道求解年均增长率Excel公式编辑的数学题(截至2010-11-20)
|
|||
|
已知 2006 年的 销售额数值 为 A,以及2006~2010五年销售总额为 B 求年平均增长率 x 公式为 A + A(1+x) + A(1+x)2 + A(1+x)3 + A(1+x)4 = B 如何在Excel中编辑求 x 的公式?(即将x用A、B的式子表示出来) [ Last edited by wolaiye2014 on 2010-11-14 at 11:07 ] |
» 猜你喜欢
售SCI文章,我:8O.5.5.1O.54,科目全,可十急
已经有4人回复
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
已经有4人回复
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
已经有4人回复
售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急
已经有4人回复
售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
售SCI文章,我:8O.5.5.1O.54,科目全,可十急
已经有3人回复
售一区SCI文章T0P,我:8O.551.O54,科目全,可十急
已经有3人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有4人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有3人回复
售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急
已经有3人回复
» 抢金币啦!回帖就可以得到:
2026年材料结构与力学性能国际会议(MSMP 2026
+1/817
缘分快到了吧!男征女,深圳及东莞
+2/452
专利代理人
+1/96
北京计算科学研究中心半导体计算模拟方向招收推免/硕博/博后
+1/86
南科大薛亚辉课题组诚聘离子输运、二维材料、原子力显微镜等方向“快响行动”博士生
+1/70
中国科大-合肥国家实验室冷原子量子网络团队招聘启事
+2/66
南方科技大学力航系急招收纳米材料、力学、机械等方向推免硕士研究生两名
+1/64
急招哈尔滨工业大学(深圳)机械学科2027级"申请-考核"博士研究生1名
+1/41
华南师范大学胡勇军教授课题组招收2027年推荐面试攻读研究生(推免生)
+1/35
澳大利亚昆士兰大学化工学院钙钛矿光电方向招博士
+1/25
浙江理工大学2027年硕士研究生招生简章
+1/10
浙江海洋大学2027年接收推免生工作办法
+1/8
浙江海洋大学2027年硕士研究生招生专业目录及自命题科目考试大纲
+1/7
为多肽行业添砖加瓦;新课题组首肽免费合成
+1/6
【2027硕士招生】招收材料、化工、环境、冶金类硕士研究生
+1/4
哈工大(深圳)赵院士近期招收能动、低空和碳中和博士生
+1/3
哈工大(深圳)赵院士近期招收能动、低空和碳中和博士生
+1/2
哈工大(深圳)赵院士近期招收能动、低空和碳中和博士生
+1/1
2027 International Conference on Healthcare, Medicine and Medical Science
+1/1
中科院动物所招收2027年联合培养博士生(北京;有机化学或生命科学背景)
+1/1
9楼2010-11-15 09:26:21
2楼2010-11-12 13:27:12
3楼2010-11-12 14:15:14
wolaiye2014(金币+5, 博学EPI+1):不好意思,确实不会用宏,能不能说一下操作流程?数据A在表格的D6:D80,数据B在I6:I80,创建x在J6:J80。 2010-11-13 20:15:11
|
楼主是一元多次方程求解,没有固定解,只有数值解,过程如下: 例如在第一行填入A, B,下面第二行是对应值,A=1.5 B=10 A B X 1.5 10 0.144 那么用下面的宏,运行,然后,X自动填入X下面,(别告诉我宏不会用) Sub CalIncrease() ' ' CalIncrease Macro ' Macro recorded 11/12/2010 by Evan Ren ' ' Set wb = ActiveWorkbook Set ws = wb.ActiveSheet A = ws.Cells(2, 1) B = ws.Cells(2, 2) prec = 0.001 st = B / A - 1 If (st > 0) Then For i = 0.01 To st Step prec tolerance = ((1 + i) ^ 5 - 1) / i - B / A If Abs(tolerance) <= 0.01 Then ws.Cells(2, 3) = i Exit For End If Next i End If End Sub |
4楼2010-11-12 15:15:36










回复此楼