Página 1 de 1
[RESUELTO] Macro para borrar campos de una columna
Publicado: Lun Abr 20, 2020 10:08 am
por JFRAN80
En esta ocasión, quiero saber si hay alguna macro, para borrar el contenido de una columna en una tabla.
Re: Macro para borrar campos de una columna
Publicado: Lun Abr 20, 2020 10:35 am
por mauricio
Para esto no necesitas macro, o tal vez si, pero debes de dar más detalles de lo que "exactamente" quieres hacer.
Re: Macro para borrar campos de una columna
Publicado: Lun Abr 20, 2020 3:11 pm
por Longi
"Pos eso!"
Que según lo que quieras, pero con un SQL "Delete" se puede eliminar todos los datos, o solo los que se quieran seleccionar.
Lo que en Access se llama una consulta de acción.
Un saludo!

Re: Macro para borrar campos de una columna
Publicado: Mié Abr 22, 2020 11:09 am
por JFRAN80
OK, a ver si se explicarme correctamente.
Tengo una base de datos con la cual saco los informes en Writer mediante la opción combinar correspondencia (se que esta forma es la menos ortodoxa pero me está funcionando). La cuestión es que ese informe de Writer tira de una consulta y hasta aquí todo bien, pero en Writer me aparecen todos los registros de la consulta y yo solo quiero que aparezcan aquel o aquellos que quiero imprimir.
Para ello, he creado un campo en mi tabla principal denominado "Informe", de tal modo que si el usuario quiere sacar únicamente un informe determinado de la consulta, indique en dicho campo "Si" o "No", obviamente si es si, la consulta filtra por dicho valor y en mi informe de writer aparece todo perfecto. Así estoy trabajando pero es un poco engorroso tener que volver a desmarcar manualmente los que he puesto como "Si" cuando no quiero que me aparezcan para la próxima vez.
Por ello, quiero que cuando se cierre la base de datos, automáticamente se borren todos los registros de la columna "Informe", es decir que no aparezca ni "Si" ni "No".
Si veis que no me explico bien, subo la base de datos, aunque me llevará un rato bastante grande porque tengo que borrar todos los datos confidenciales.
Gracias por vuestro tiempo!!
Re: Macro para borrar campos de una columna
Publicado: Mié Abr 22, 2020 2:56 pm
por RMG
Hola,
Algo así como esto te puede valer.
Código: Seleccionar todo
Sub Actualizar()
Dim oStat As Object
Dim sSQL As String
oStat = ThisDatabaseDocument.CurrentController.ActiveConnection.CreateStatement
sSQL = "UPDATE ""nombretabla"" SET ""nombrecampo"" = NULL"
oStat.ExecuteUpdate(sSQL)
End Sub
Esta macro la puedes asignar al evento "Documento va a ser cerrado"
Desde la ventana principal menú Herramientas->Personalizar->Eventos->Documento va a ser cerrado
Saludos
Re: Macro para borrar campos de una columna
Publicado: Jue Abr 23, 2020 7:48 am
por JFRAN80
Efectivamente era la solución. Muchas gracias por vuestra ayuda.
Saludos,