Já procurei de cabo a rabo aqui no fórum e no Google, porém, sem sucesso.
Meu problema é o seguinte, eu usei aplicativo para criar um formulário a partir de uma data base do access que contem campos de número e data, até ai sem problemas, mas, ao preencher o formulário e salvar os dados no BD, eu não posso deixar esses campos em branco mesmo não sendo um campo obrigatório e o campo de Data é preciso que esteja escrito no formato "dd/mm/aaaa" senão eu não consigo grava-lo no access.
O que eu preciso é que haja uma maneira de eu salvar esses campos mesmo em branco.
Obs: campos de texto curto não tem esses problemas.
Conto com a ajuda de todos. Obrigado.
Uma coisa que eu descobri, é que todas as vezes que tento salvar um campo de Data em branco, gera um erro de "Formato inválido", e o erro é redirecionado para esta formula:
Código: Selecionar todos
Private Function GetValue(ctl As MSForms.Control, strTypeName As String) As Variant
On Error GoTo HandleError
Dim Value As Variant
Value = ctl.Value
If IsNull(Value) And strTypeName <> "Variant" Then
Select Case strTypeName
Case "String"
Value = ""
Case Else
Value = 0
End Select
End If
HandleExit:
GetValue = Value
Exit Function
HandleError:
Resume HandleExit
End Function