- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] 如何将这段变量代码放进表中 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20022)
-- 发布时间：2012/5/27 11:24:00
-- [求助] 如何将这段变量代码放进表中
Dim sq,xq,Avg1,nD1,qs1 As Double
Dim Dbs As Double() ={3.55,3.70,3.85,4 ,4.15,4.3,4.45,4.6}
sq =4.5
xq =4.28
Avg1=(sq+xq)/2
For Each nD1 In Dbs
If nD1 < sq And nD1 > Avg1 Then
qs1 = nD1
End If
Next
如何将上面这段代码放入表中，自动求出选用【垫片】列，SP=【上差】列的值： Xq= 【下差】列的值：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:计算公式.rar |
-- 发布时间：2012/5/27 14:28:00
--
问题已经解决，谢谢各位。