vba - OpenOffice BASIC IsNumber

Question

我必须使用宏将文档从 MS Excel 迁移到 Open Office。除此功能外，一切正常

 If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then
   MsgBox "Nesprávne zadané číslo účtu alebo kód banky!", vbCritical
   ActiveSheet.Protect Password:="****", DrawingObjects:=True, Contents:=True, Scenarios:=True
   Exit Sub
 End If

它检查用户插入的值。但我只得到这个错误：

BASIC 运行时错误 未设置对象变量

所以我仔细检查了我的文档，如果单元格 E12 不是空的，但它已被填满。Open Office 中是否有另一种检查输入格式的方法？谢谢

Answer 1

Excel Visual Basic 中的数字与 oo 中的数字不同。尝试使用 getCellByName("E12").Value 这个函数返回你的数字

Answer 2

如果该行If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then没有说object not set，并且您已验证Cells(12, 5)返回 aa 值，那么我能想到的唯一可能性就是Applicationor 或Application.WorksheetFunctionis Nothing。