[Resolvido]Salvar registro com campo em branco (sem preenchimento)

Olá!

Bd em Access 2010.

O bd possui um formulário de cadastro de clientes.
Possui um campo chamado "ccNomFan", que corresponde ao nome fantasia do cliente.
Acontece que nem todos os clientes possuem um nome fantasia, ficando assim esse campo sem preenchimento ou em branco.
Porém, se esse campo estiver vazio o sistema não está salvando nada do registro do cliente em edição. Já se for inserida uma simples letra no campo citado, o sistema salva todo o registro perfeitamente.

O ideal seria que todos os dados fossem salvos, mesmo que o campo "ccNomFan" não seja preenchido.
O que posso fazer para corrigir isso?
Desde já agradeço pela ajuda!

Segue parte do código que está sendo usado:

Private Sub Atualizar()
If AçãoBotão = "IncluirClientes" Then
Set dbs = CurrentDb
If optTipoCliente = 1 Then
strSQL = "SELECT * FROM viewClientes WHERE ccCPF = " & "'" & txtCPF & "'"
Else
strSQL = "SELECT * FROM viewClientes WHERE ccCGC = " & "'" & txtCGC & "'"
End If
Set rst = dbs.OpenRecordset(strSQL)

If rst.RecordCount > 0 Then
If optTipoCliente = 1 Then
MsgBox "Existe um cliente cadastrado com este CPF !", vbInformation, "Cadastro"
Else
MsgBox "Existe um cliente cadastrado com este CNPJ !", vbInformation, "Cadastro"
End If
End If
rst.Close
End If


"strSQL = "UPDATE tbl_Clientes set "
strSQL = strSQL & "ccNomCli = '" & UCase(txtNomCli) & "',"
strSQL = strSQL & "ccTipCli = " & optTipoCliente & ","

strSQL = strSQL & "ccNomFan = "
If IsNull(txtNomFan) Then
strSQL = strSQL & "null,"
Else
strSQL = strSQL & "'" & UCase(txtNomFan) & "',"

End If

strSQL = strSQL & "ccBairro = "
If IsNull(txtBairro) Then
strSQL = strSQL & "null,"
Else
strSQL = strSQL & "'" & UCase(txtBairro) & "',"
End If

Avelino, bom dia!

Funcionou perfeitamente.

Muito obrigado!

Abraço