Access - #Eliminado

Hola tengo un problema con el SQL ejecutado sobre access desde vba... El codigo es el siguiente:

' construyo la instruccion de insert en la tabla HistoricoEmpresa
strSQL = "INSERT INTO Historico_Empresas (Titular, NombreComercial, NCUESTIONARIO, NIF, Telmovil, metrosCuadrados,"
strSQL = strSQL & " NumTrabajadores, Gerente, F_Juridica, AdaptacionDiscapacidad, Reg_t_local, "
strSQL = strSQL & "ACQ, Asociacion, Nom_asociacion, Clasificacion, Codificacion, ClasificacionComercial, "
strSQL = strSQL & "Act_principal, IAE, IAE2, IAE3, IAE4, ALTAIAE, Marca, TipoVia, Domicilio, "
strSQL = strSQL & "Numero, OtroDomicilio, Poblacion, Provincia, CodigoPostal, Zona_Ub, Tel_fijo, "
strSQL = strSQL & "Fax, E_mail, Web, Act_Comercial, Especializacion, OBSERVACIONES, AnterioresPIE, "
strSQL = strSQL & "GuiaEmpresarial, Equalia, AINPO, NouOctubre, FechaAlta, FechaBaja) VALUES("
' construyo la instruccion de insert en la tabla HistoricoEmpresa ahora con los datos a inserar
strSQL = strSQL & strTitular & "," & strEmpresa & "," & strNCuestionario & "," & strNif & "," & strTelmovil & ","
strSQL = strSQL & strMcuadrados & "," & strNtrabajadores & "," & strGerente & "," & strFJuridica & ","
strSQL = strSQL & strAdapDisc & "," & strRegLocal & "," & strACQ & "," & strAsociacion & "," & strNomAsociacion & ","
strSQL = strSQL & strClasificacion & "," & strCodificacion & "," & strClasifiacionComercial & "," & strActividadPrincipal & ","
strSQL = strSQL & strIAE & "," & strIAE2 & "," & strIAE3 & "," & strIAE4 & "," & strALTAIAE & "," & strMarca & ","
strSQL = strSQL & strTipoVia & "," & strDomicilio & "," & strNumero & "," & strOtroDomicilio & "," & strPoblacion & "," & strProvincia & ","
strSQL = strSQL & strCodPostal & "," & strZonaUb & "," & strTelFijo & "," & strFax & "," & strEmail & "," & strWeb & ","
strSQL = strSQL & strActComercial & "," & strEspecializacion & "," & strObservaciones & ","
strSQL = strSQL & strPie & "," & strGuiaEmp & "," & strEqualia & "," & strAINPO & "," & str9Octubre & ","
strSQL = strSQL & strFechaAlta & "," & strFechaBaja & ");"

' Aqui ejecuto el insert que se ha construido
On Error GoTo SQLError
DoCmd.RunSQL strSQL

' Construyo la instruccion sql para borrar el registro insertado en el historico
strSQL = "DELETE FROM Empresas WHERE Empresas.Nif = " & strNif

' Aqui ejecuto el delete
On Error GoTo SQLError
DoCmd.RunSQL strSQL

Los strings se quedan asi:

Insert:
INSERT INTO Empresas
(Titular, NombreComercial, NCUESTIONARIO, NIF, Telmovil, metrosCuadrados, NumTrabajadores, Gerente,
F_Juridica, AdaptacionDiscapacidad, Reg_t_local, ACQ, Asociacion, Nom_asociacion, Clasificacion,
Codificacion, ClasificacionComercial, Act_principal, IAE, IAE2, IAE3, IAE4, ALTAIAE, Marca, TipoVia,
Domicilio, Numero, OtroDomicilio, Poblacion, Provincia, CodigoPostal, Zona_Ub, Tel_fijo, Fax, E_mail,
Web, Act_Comercial, Especializacion, OBSERVACIONES, AnterioresPIE, GuiaEmpresarial, Equalia, AINPO,
NouOctubre, FechaAlta)
VALUES('David Llopis','Nom Comercial',777777,'21680400W','649694040','25',7,'Razzta','02',-1,'1',-1,-1,
'Junko SA','Clasificacion','Codificacion','ARTES GRAFICAS','Pegar el palo main activity','23','34,5',
'234,056','5,003','12 Agosto','Ganjak','C','Virgen Desamparados','34 C','Virgen del Pilar nº 4 primero derecha',
'Cocentaina','Alacant',3820,'CASCO URBANO','96 344 56 78','96 344 44 54','[email protected]',
'www.laotia.net#http://www.laotia.net#','8.47','Especializacion','observacions',-1,-1,-1,-1,-1,
'13/08/1983');

Delete:
DELETE FROM Empresas WHERE Empresas.Nif = '21680456J'

Porque siempre me hace las operaciones pero me da error...?

Gracias

Hola
Tendrías que poner comilla simple màs comilla doble
'" & strVariable & "'

Para eliminar:
strSQL = "DELETE * FROM Empresas WHERE Nif = '" & strNif & "' "

ya que nif es texto y lo pones como número

Un saludo

Gracias

Al final decidi cerrar los formularios cuando se hace el delete y asi me ahorro toda la parte del error que tiene el sistema al intentar mostrar un registro que acaba de borrar...

Muchas gracias por tu ayuda.....

Hola
Creo que no entendí la pregunta, sí te refieres a que cuando haces una eliminación de un registro en el formulario te aparecen los controles con #Eliminado, tan solo tienes que actualizar el formulario después de hacer la eliminación con :

Me.requery

Un saludo