Eliminar todos los caracteres de un Campo dejando unicamente los números.

Puedes usar la función Replace. Supongamos que en una tabla Clientes tienes el campo Telefono como

Construyo una consulta de actualización

Le pongo el criterio de que no sea nulo, por si algún registro estuviera en blanco, y cuando la ejecuto

Me funciona perfectamente para los campos con caracteres que contienen puntos. Pero tengo otros campos que contienen: Espacios, /,-,+"

¿Cómo he de hacer para eliminar también todos estos?. Lo he intentado y no consigo hacerlo funcionar.

Sería igual, en Actualizar a

Reemplazar([telefono];"/";"")

Es decir, después del primer punto y coma va el texto que quieres reemplazar y después del segundo va por lo que quieres reemplazarlo, en este caso cadena vacía.

Si fuera en un formulario, se podría crear una función VB que reemplazara todos esos signos de una vez, pero en SQL creo, no lo sé, que hay que ir de uno en uno.

Sin tanta vuelta con una función y una consulta SQL.

TABLA A ACTUALIZAR

Código a incluir en un procedimiento

Docmd. SetWarnings(false)

DoCmd.RunSQL "UPDATE tblusuarios SET tblusuarios.tel = IIf(IsNull([tel]),"",Retirar([tel]));"

FUNCION RETIRAR()

Public Function retirar(Optional strCadena As String) As String

'Retira los elementos del array de un texto
'Elaborado por: Eduardo Pérez Fernández
'Dic/2020
'NOTA: Puede aumentar los elementos en el array separándolos por coma
Dim miArray As Variant
Dim varitem As Variant
If strCadena = "" Then
  retirar = ""
  Exit Function
End If
miArray = Array(".", ",", "+", "/", " ")

For Each varitem In miArray
strCadena = Replace(strCadena, varitem, "")
Next varitem

retirar = Trim(strCadena)
End Function

RESULTADO DESPUÉS DE ACTUALIZAR

Ahora si prefiere hacerlo con una consulta utilizando la función, sería:

Espero le sirva, Si desea el ejemplo escríbame a [email protected] y con gusto se lo envio, favor hacer referencia en el asunto sobre la consulta.