O OpenOffice BÁSICO IsNumber

Question

Eu tenho que migrar documento do MS Excel Open Office com macros.Tudo funciona bem, exceto esta função

 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

É de seleção para valores inseridos pelo usuário.Mas eu apenas obter este erro:

BASIC runtime erro Variável de objeto não definida

Então eu verificados duas vezes meu documento, se a célula E12 não é vazio, mas estava cheio.É lá no Open Office de uma maneira diferente para verificar se o formato de entrada?Obrigado

Answer 1

O número no Excel Visual basic é diferente, como em oo.tente usar getCellByName("E12").Valor esta função retorna o Número de

Answer 2

Se a linha If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then falha dizendo: object not set, e que você tenha verificado que Cells(12, 5) devolve um valor e, em seguida, as únicas possibilidades que eu posso pensar seria o de que tanto Application ou Application.WorksheetFunction é Nothing.