名称 LibXL 黑夜 3.9置表格日期后显示#

chenshunke

.版本 2

    format ＝ book.添加格式 ()
    format.自定义数字格式 (#EXCEL自定义数字_Date)

    sheet.置单元格数值或日期 (“B” ＋ 到文本 (表格格号), , 1785807420000, format)

因为我这个之前开法的软件用的是3.9，换4.2的要改很多代码，就没换，但是要写日期进表格，没成功

xjc2008gd

chenshunke 发表于 2026-8-5 09:43
日期时间到数值和时间戳_到时间没有这个两个方法

我改用纯换算和 LibXL 自带打包日期的写法，不依赖这两个函数。

那两个不是系统命令，可以完全不用。直接用公式把时间戳换成 Excel 日期数值即可。

推荐：一行公式（不依赖任何转换方法）
.版本 2
.局部变量 format, 类_格式
.局部变量 日期值, 双精度小数型
.局部变量 时间戳, 双精度小数型
时间戳 ＝ 1785807420000  ' 13位毫秒时间戳
' 毫秒时间戳 → Excel日期序列号
日期值 ＝ 时间戳 ÷ 1000.0 ÷ 86400.0 ＋ 25569
format ＝ book.添加格式 ()
format.自定义数字格式 (#EXCEL自定义数字_Date)
sheet.置单元格数值或日期 (“B” ＋ 到文本 (表格格号), , 日期值, format)
如果是 10 位秒级时间戳：

日期值 ＝ 时间戳 ÷ 86400.0 ＋ 25569
25569 是 1970-01-01 相对 Excel 基准日的天数，这是标准换算，不需要额外模块方法。

可选：用 LibXL 自带打包（若 3.9 模块有）
在类_工作簿里搜 打包日期 / datePack / 日期打包，有的话可以这样：

日期值 ＝ book.打包日期 (2026, 8, 4, 12, 0, 0)  ' 年,月,日,时,分,秒 — 以你模块实际方法名为准
sheet.置单元格数值或日期 (“B” ＋ 到文本 (表格格号), , 日期值, format)
自检
写入后 日期值 应该大约在 4万多（例如 46237 左右），而不是 1785807420000。
数值对了，再套日期格式，就不会再显示 #。

如果时区差 8 小时，再加减 8.0 ÷ 24.0 即可（按你时间戳是 UTC 还是本地时间决定

b0y

单元格宽度要够  

chenshunke

b0y 发表于 2026-8-4 11:53
单元格宽度要够

不是，我拉宽了还是一样

xjc2008gd

根因不是列宽，而是写入的日期值不对。

你传的是毫秒时间戳 1785807420000，而 LibXL/Excel 要的是 Excel 日期序列号（大约几万，不是 13 位时间戳）。用日期格式去显示超大数字时，Excel 就会一直显示 #，拉宽列也没用。

---

正确写法

把时间戳先转成日期时间，再用 日期时间到数值() 写入：

.版本 2

.局部变量 format, 类_格式

.局部变量 日期值, 双精度小数型

.局部变量 时间戳, 长整数型



时间戳 ＝ 1785807420000  ' 13位毫秒时间戳



' 毫秒 → 秒 → 日期时间 → Excel数值

日期值 ＝ 日期时间到数值 (时间戳_到时间 (到整数 (时间戳 ÷ 1000)))



format ＝ book.添加格式 ()

format.自定义数字格式 (#EXCEL自定义数字_Date)  ' 或写成 "yyyy-mm-dd hh:mm:ss"

sheet.置单元格数值或日期 (“B” ＋ 到文本 (表格格号), , 日期值, format)



' 建议顺手设一下列宽

sheet.置列宽 (1, 1, 18)  ' B列，按你模块实际方法名调整

如果已是 10 位秒级时间戳，就不要再除以 1000：

日期值 ＝ 日期时间到数值 (时间戳_到时间 (时间戳))

时间戳_到时间 用精易模块里对应函数即可（名称可能略有不同）。

---

纯公式换算（不依赖时间戳转换函数）' 13位毫秒

日期值 ＝ 时间戳 ÷ 1000.0 ÷ 86400.0 ＋ 25569

' 10位秒

' 日期值 ＝ 时间戳 ÷ 86400.0 ＋ 25569

---

对照自检

项目

错误做法

正确做法

写入值

1785807420000

日期时间到数值(...)，约 46237 左右

格式

有格式也救不了错误数值

先转成 Excel 日期再套格式

列宽

拉宽仍显示 #

数值正确后，列宽不够才可能再出现 #

chenshunke

xjc2008gd 发表于 2026-8-4 21:13
根因不是列宽，而是写入的日期值不对。你传的是毫秒时间戳 1785807420000，而 LibXL/Excel 要的是 Excel 日 ...

日期时间到数值和时间戳_到时间没有这个两个方法

b0y

我截图那样不是可以吗  日期时间到数值()  没有的话 看看有没有EXCEL时间之类的名称  可能名称不同