Arrays 在数组中保留格式时间（VBA Excel）

我将几个数据（名称、日期、时间和值）放入一个数组中。日期和时间有问题。 我哪里出错了？下面是我的一段代码：

    For i = 1 To LastRow + 13
    For j = 1 To 10
    strArray(i, j) = Cells(i, j).Value2
    Next j
 Next i

所以0000983796应该变成0:01:25

在Excel中，日期是自1900年1月1日起开始的天数 1900年1月1日为“1”。之后的每个日期，Excel都会添加一个 那个序列有更多的数字。因此，2013年8月26日是41512，或41512 自1900年1月1日起的天

数字的整数部分用于天数。小数部分 数字的小数部分是一天中的小数部分，也就是时间。所以呢 将是一天中的50%，或中午12:00。那就 41512.5相当于2013年8月26日中午12:00

从

您可以将此数值转换回更漂亮、更可读的值

dim pretty as String
pretty = Format(Cells(i, j).Value2, "h:mm:ss")

---

Value2

返回一个双精度值。改为使用

Value

。不起作用。它将值0000983796保留在数组中。您应该使用

变量

数组或

类型

数组。你是如何确定你的阵列尺寸的？Dim strArray作为Variani我知道你的第一部分。但是谢谢你的例子。它只是完美地工作！“我曾为程序的另一部分做过类似于这种格式的事情，但我忘了它可以用于这种情况。”赫尔芬斯坦很高兴听到它起作用。如果不需要更多帮助，请将其标记为已解决：）