如何判断EXCEL工作薄的单元格中是数字而不是文字

Question

如题，谢谢提供源代码！

Answer 1

这个，简单的写一下如下
引用 Variants 单元VarIsNumeric(Sheet.Cells[j,i])

Answer 2

try
  strtofloat('单元格内容');
except
  showmessage('不是数字');
end;

Answer 3

建议不要按照这种写法，因为我们一般设计原则是，不使用异常机制来实现条件判断和跳转。
Cell的Value是variant类型，需要首先使用函数VarIsNull判断是否为NULL，再判断是否为数值VarIsNumeric如果你要使用转换函数来判断的话，也应该写成if TryStrToFloat(VarToStr(单元格值), Num) then
  ....