【笔记】VBA计算e的值

bowangbuqi · 发表于 2019-5-3 22:53

Sub 计算e的值()
Dim i As Integer
m = 1
For i = 1 To 20
m = m * i
n = n + 1 / m
Range("b" & i) = m
Range("c" & i) = n
Next
Range("a1") = n + 1
End Sub

yanoo · 发表于 2019-5-3 23:52

最后a1是多少？

bowangbuqi · 发表于 2019-5-5 20:02

yanoo 发表于 2019-5-3 23:52
最后a1是多少？

2.732……

yigerenwa · 发表于 2019-5-25 08:32

动作命名计算e的值
定义 i(变量) 是一个整数类型
m=1 （m是指？这句有点不懂）
批循环 i(变量) 为 1至20
m=m*i （m是指？这句有点不懂）
n-n+1/m(这个应该是一个可控的逻辑语言命令)
指定区域（b列和i行）=m
指定区域（c列和i行）=n
紧接着
指定（a列1行）=n+1
结束动作

yigerenwa · 发表于 2019-5-25 08:44

不知道翻译的对不对

bowangbuqi · 发表于 2019-5-26 12:48

yigerenwa 发表于 2019-5-25 08:44
不知道翻译的对不对

差不多啦

birdrenro · 发表于 2020-7-22 13:12

n的值是多少

luozh7682 · 发表于 2020-11-6 15:35

yanoo 发表于 2019-5-3 23:52
最后a1是多少？

2.718281828

帐号		自动登录	找回密码
密码			注册[Register]

[其他转载] 【笔记】VBA计算e的值