Boas pessoal coloco aqui a seguinte questão: tenho esta macro em excel e está a rolar a 100%, o mesmo já nao acontece em libreoffice em calc. Eu indiquei umas setas (<–) a indicar os sitios onde eu penso que são os erros. Neste codigo em calc ele nao me reconhece os pontos finais que são usados para chamar um determinado form, etc. Mais abaixo no codigo tenho uma linha que diz “SAP_Send.Hide”, e ele nao me reconhece nem o ponto, nem o metodo hide que aqui é utilizado para esconder o SAP_Send. Agradeço se alguem me poder dar uma ajudinha a resolver esta macro para que fique a rolar, visto que tenho muita urgencia em resolver isto porque tenho pouco tempo para entregar um trabalho. Desde já obrigado, pela atenção. Cumps.
Private Sub OK_button_Click()
If Not IsDate(SAP_Send.TB_dti) Then '<--
MsgBox ("Data inválida")
SAP_Send.TB_dti.SetFocus '<--
ElseIf Not IsDate(SAP_Send.TB_dtf) Then '<--
MsgBox ("Data inválida")
SAP_Send.TB_dtf.SetFocus '<--
ElseIf Not IsDate(SAP_Send.TB_dtl) Then '<--
MsgBox ("Data inválida")
SAP_Send.TB_dtl.SetFocus '<--
ElseIf Not IsDate(SAP_Send.TB_dtf) Then '<--
MsgBox ("Data inválida")
SAP_Send.TB_dti.SetFocus '<--
ElseIf SAP_Send.TB_descr = "" Then '<--
MsgBox ("Introduzir uma descrição válida")
SAP_Send.TB_descr.SetFocus '<--
Else
SAP_Send.Hide '<-- e o hide tambem nao reconhece este metodo
Call Envia_para_SAP
Status ("Concluído")
End If
End Sub