
MACRO BORRAR DATOS PERO NO FORMATO
Publicado por ANTONIO (1 intervención) el 17/01/2024 18:24:20
Hola:
Utilizo la siguiente macro para borrar datos:
Sub BorrarCeldas1()
Dim oDoc As Object
Dim oRango101 As Object
'Este documento
oDoc = ThisComponent
'Hoja por nombre rango por nombre
oRango101 = oDoc.getSheets.getByName("D01").getCellRangeByName("D5:E1244")
'Borramos todos los datos en cada rango
oRango101.clearContents(1023)
End Sub
Funciona bien, pero las celdas a borrar están pintadas con fondo amarillo, cuando se ejecuta la macro, borra el dato y el formato, es decir el fondo amarillo.
¿Que sentencia habría que poner para borrar el dato y no el formato ?
Gracias anticipadas.
Utilizo la siguiente macro para borrar datos:
Sub BorrarCeldas1()
Dim oDoc As Object
Dim oRango101 As Object
'Este documento
oDoc = ThisComponent
'Hoja por nombre rango por nombre
oRango101 = oDoc.getSheets.getByName("D01").getCellRangeByName("D5:E1244")
'Borramos todos los datos en cada rango
oRango101.clearContents(1023)
End Sub
Funciona bien, pero las celdas a borrar están pintadas con fondo amarillo, cuando se ejecuta la macro, borra el dato y el formato, es decir el fondo amarillo.
¿Que sentencia habría que poner para borrar el dato y no el formato ?
Gracias anticipadas.
Valora esta pregunta


0