OpenOffice BASIC IsNumber

Question

Je dois migrer un document de MS Excel vers Open Office avec des macros. Tout fonctionne bien sauf cette fonction

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 

Il est vérifié pour les valeurs insérées par l'utilisateur. Mais je ne reçois que cette erreur:

erreur d'exécution BASIC Variable d'objet est pas défini

Je revérifié mon document, si la cellule E12 est pas vide, mais il a été rempli. Existe-t-il une manière différente de vérifier le format d'entrée dans Open Office? Merci

Answer 1

Le nombre dans Excel Visual basic est différent comme dans oo. essayez d'utiliser getCellByName ("E12"). Valeur cette fonction vous renvoie le nombre

Answer 2

Si la ligne If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then tombe en panne en disant object not set, et vous avez vérifié que Cells(12, 5) retourne une une valeur, alors les seules possibilités que je peux penser serait que ce soit Application ou Application.WorksheetFunction est Nothing.