Código para identificar se foi digitado número ou texto

[Jamilson]

Macro

Sub Main
    
    	mysheet = ThisComponent.CurrentController.getActiveSheet()
    	
    	CellA1 = mySheet.getCellrangeByName("A1")
    	CellA2 = mySheet.getCellrangeByName("A2")
    	
    	If IsNumeric(cellA1.getString()) then
    		cellA2.setString("isto e numero")
    	Else
    		cellA2.setString("isto não é número!!!")
    	Endif	
      End Sub

Sub Main2
	MsgBox("Bom dia para Você")
End Sub

[Jamilson]

Obrigado
Olivier pela correção.