定义的数组中值0.5变成.5

zzl903 · 发表于 2022-11-30 14:52

本帖最后由 zzl903 于 2022-12-1 09:14 编辑

各位大侠好

我定义了一个数组arr来赋值

<div>Sub test()
Dim arr As Variant
arr = Sheet1.Range("l2:w3")
For i = 1 To 2
For j = 1 To 12
Debug.Print arr(i, j)
Next
Next
End Sub</div>

复制代码

其中Sheet1.Range("l2:w3")中有公式生成0.5的倍数的一定范围内的值（比如0.5-2.5之间）
但是把数组中的值赋给别的单元格时0.5没问题，但是在Word 表中的单元格变成.5,用Debug.Print也是.5
( 1.5,2.5没问题）
这是怎么回事？？怎么解决？
谢谢

hongshan2019 · 发表于 2022-11-30 16:33

限定格式试试

gwjkkkkk · 发表于 2022-11-30 18:09

格式化一下，试试。。。
Format(arr(i, j), "0.0")

zzl903 · 发表于 2022-12-1 09:14

gwjkkkkk 发表于 2022-11-30 18:09
格式化一下，试试。。。
Format(arr(i, j), "0.0")

好用,谢谢!

		自动登录	找回密码
密码			免费注册

[已解决] 定义的数组中值0.5变成.5

评分