Macro borrar un rango de celdas de una determinada hoja de cálculo en OpenOffice Calc
Para eliminar en Hoja2 el rango de celdas D8:F14 en tu editor Basic llama a la macro de este modo:
BorrarCeldas( "Hoja2", "D8:F14")
La macro:
Sub BorrarCeldas(NombreHoja as string, RangoCeldas as string)
Dim oDoc As Object
Dim oRango As Object
'Este documento
oDoc = ThisComponent
'Hoja se define por nombre, rango por nombre
oRango = oDoc.getSheets.getByName(NombreHoja).getCellRangeByName(RangoCeldas)
'Borramos las celdas del rango en la hoja
oRango.clearContents(1023)
End Sub
1 comentario
Tengo una pregunta Como elimino filas que en una de sus columnas esta en cero o vacia?
28.05.22 @ 21:17 Reply to this comment