From c3432d181284ae2dbfc3b75b90f7e117430a0e14 Mon Sep 17 00:00:00 2001 From: csh Date: Wed, 17 Apr 2024 16:22:48 +0800 Subject: [PATCH] v1.6.8-patch1 --- funcext/TSOffice/worksheet/xlsxStyles.tsf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/funcext/TSOffice/worksheet/xlsxStyles.tsf b/funcext/TSOffice/worksheet/xlsxStyles.tsf index 6112101..c50b1e2 100644 --- a/funcext/TSOffice/worksheet/xlsxStyles.tsf +++ b/funcext/TSOffice/worksheet/xlsxStyles.tsf @@ -177,7 +177,7 @@ Type xlsxStyles = Class else begin if ifstring(value) then begin - if trystrtodatetime(value, r) or trystrtodate(value, r) then return array('n', r); + if (pos("-", value) or pos("/", value)) and (trystrtodatetime(value, r) or trystrtodate(value, r)) then return array('n', r); if trystrtofloat(value, r) then return array("n", value); return array("s", value); end