excel中vba怎么使用fix函数取整?

时间:2021-05-22

excel中vba使用fix函数的方法

软件名称:
Excel2003绿色版 EXCEL2003精简绿色版 (附excel2003绿色工具)
软件大小:
13.3MB
更新时间:
2012-06-19立即下载

1、首先我们打开一个工作样表作为例子。

2、使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:

Option Explicit

Sub ddt()

Sheet3.Activate

Dim num1 as Integer

Dim num2 as Integer

Dim msg as String

num1 = InputBox("请输入一个小数")

num2 = InputBox("请输入一个负数")

msg = "fix取整数为:" & Fix(num1)

MsgBox msg

Sheet3.Range("a1") = msg

msg = "fix取整数为:" & Fix(num2)

Sheet3.Range("a2") = msg

End Sub

3、我们对变量做声明,这里可以使用最小整数类型的num声明,另外对msg声明为文本类型。

4、输入num1和num2的值,并对其添加提示语内容,num1为小数,num2为负数小数。

5、将值赋予msg变量,在msg变量中我们进行fix()函数的运算。fix()函数只有一个参数,就是取整数值。

6、这里需要注意的是fix()函数和int()函数虽然同样是取整,但是int()函数返回值依循四舍五入运算法则,最后得值是取大的整数,而fix()函数则是取的小的整数。

相关推荐:

excel2010怎么创建自定义函数?

excel使用vlookup函数计算出现错误值怎么办?

Excel怎么使用MMULT函数返回两个数组的矩阵乘积?

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章